Toniolo and Linder, Equation (3b), real

Time bar (total: 19.1s)

start0.0ms (0.0%)

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

analyze265.0ms (1.4%)

Memory
15.4MiB live, 445.5MiB allocated; 85ms collecting garbage
Algorithm
search
Search
ProbabilityValidUnknownPreconditionInfiniteDomainCan'tIter
0.0%0.0%99.9%0.1%0.0%0.0%0.0%0
0.0%0.0%99.9%0.1%0.0%0.0%0.0%1
0.0%0.0%99.9%0.1%0.0%0.0%0.0%2
0.0%0.0%99.9%0.1%0.0%0.0%0.0%3
0.0%0.0%99.9%0.1%0.0%0.0%0.0%4
25.0%25.0%74.9%0.1%0.0%0.0%0.0%5
43.8%43.7%56.2%0.1%0.0%0.0%0.0%6
43.8%43.7%56.2%0.1%0.0%0.0%0.0%7
53.1%53.0%46.8%0.1%0.0%0.0%0.0%8
60.9%60.8%39.0%0.1%0.0%0.0%0.0%9
60.9%60.8%39.0%0.1%0.0%0.0%0.0%10
64.8%64.7%35.1%0.1%0.0%0.0%0.0%11
68.4%68.3%31.6%0.1%0.0%0.0%0.0%12
Compiler

Compiled 18 to 14 computations (22.2% saved)

sample2.0s (10.7%)

Memory
67.6MiB live, 3 843.8MiB allocated; 518ms collecting garbage
Samples
1.7s8 256×0valid
Precisions
Click to see histograms. Total time spent on operations: 1.3s
ival-sin: 748.0ms (58.4% of total)
ival-pow2: 255.0ms (19.9% of total)
ival-sqrt: 127.0ms (9.9% of total)
ival-mult!: 52.0ms (4.1% of total)
ival-div!: 51.0ms (4.0% of total)
ival-add!: 29.0ms (2.3% of total)
adjust: 20.0ms (1.6% of total)
Bogosity

preprocess51.0ms (0.3%)

Memory
-8.0MiB live, 37.9MiB allocated; 5ms collecting garbage
Iterations

Useful iterations: 1 (0.0ms)

IterNodesCost
046166
1142163
2566163
33361163
Stop Event
node-limit
Alt Table
Click to see full alt table
StatusAccuracyProgram
93.8%
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
Symmetry

(abs kx)

(negabs ky)

(negabs th)

Compiler

Compiled 32 to 26 computations (18.8% saved)

series62.0ms (0.3%)

Memory
17.3MiB live, 113.0MiB allocated; 12ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
04172998
Stop Event
iter-limit
Counts
13 → 63
Calls
Call 1
Inputs
ky
(sin.f64 ky)
kx
(sin.f64 kx)
#s(literal 2 binary64)
(pow.f64 (sin.f64 kx) #s(literal 2 binary64))
(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)))
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
th
(sin.f64 th)
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
Outputs
#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 (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
#s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 kx #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))))
#s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #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 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))))))
#s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 #s(literal 2/45 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 (sin.f64 ky) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 kx #s(literal 2 binary64)) (sin.f64 ky)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))) (/.f64 (sin.f64 ky) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
#s(approx (/ (sin ky) (sqrt (+ (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 -1/2 binary64) (/.f64 (*.f64 (sin.f64 ky) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 ky) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 5 binary64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 ky) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (/.f64 (sin.f64 ky) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
#s(approx (/ (sin ky) (sqrt (+ (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 -1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 ky) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 ky) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 5 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (sin.f64 ky) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 5 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 ky) (-.f64 #s(literal 2/45 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 ky) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 ky) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 5 binary64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 ky) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (/.f64 (sin.f64 ky) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 kx #s(literal 2 binary64)) (*.f64 (sin.f64 ky) (sin.f64 th))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (+.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 -1/2 binary64) (/.f64 (*.f64 (sin.f64 ky) (*.f64 (sin.f64 th) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 5 binary64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (+.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 -1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 ky) (*.f64 (sin.f64 th) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 5 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (sin.f64 ky) (*.f64 (sin.f64 th) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 5 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 ky) (*.f64 (sin.f64 th) (-.f64 #s(literal 2/45 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 ky) (*.f64 (sin.f64 th) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 5 binary64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (pow.f64 (sin.f64 ky) #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 (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #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 (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))
#s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 ky #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))))
#s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #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 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))))))
#s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 #s(literal 2/45 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (*.f64 ky (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (*.f64 ky (+.f64 (*.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (*.f64 ky (+.f64 (*.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/5040 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 #s(literal 2/45 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/120 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/120 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 ky (+.f64 (*.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (/.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 ky (+.f64 (*.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (*.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 th) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (/.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 ky (+.f64 (*.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (*.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 1/120 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (*.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/5040 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64))))) (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 th) (-.f64 #s(literal 2/45 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/120 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 th) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64))))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 th) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (/.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))))
#s(approx (sin ky) (sin.f64 ky))
#s(approx th th)
#s(approx (sin th) (*.f64 th (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 th #s(literal 2 binary64))))))
#s(approx (sin th) (*.f64 th (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 th #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 th #s(literal 2 binary64))) #s(literal 1/6 binary64))))))
#s(approx (sin th) (*.f64 th (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 th #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 #s(literal 1/120 binary64) (*.f64 #s(literal -1/5040 binary64) (pow.f64 th #s(literal 2 binary64))))) #s(literal 1/6 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 th (sin.f64 ky)) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 th (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (sin.f64 ky)) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 th (+.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/120 binary64) (/.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (sin.f64 ky)) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))))) (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 th (+.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/5040 binary64) (/.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (sin.f64 ky)) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/120 binary64) (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))))))) (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))
#s(approx (sin th) (sin.f64 th))
Calls

9 calls:

TimeVariablePoint
5.0ms
ky
0
4.0ms
kx
0
4.0ms
th
-inf
4.0ms
kx
inf
3.0ms
ky
-inf

rewrite167.0ms (0.9%)

Memory
-5.9MiB live, 375.9MiB allocated; 38ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
01366
02266
16966
221666
3108066
0430266
Stop Event
iter-limit
node-limit
iter-limit
Counts
13 → 494
Calls
Call 1
Inputs
ky
(sin.f64 ky)
kx
(sin.f64 kx)
#s(literal 2 binary64)
(pow.f64 (sin.f64 kx) #s(literal 2 binary64))
(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)))
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
th
(sin.f64 th)
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
Outputs
ky
(*.f64 #s(literal 1 binary64) (sin.f64 ky))
(*.f64 (sin.f64 ky) #s(literal 1 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (neg.f64 (neg.f64 ky)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (neg.f64 (sin.f64 ky))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (neg.f64 (+.f64 (PI.f64) ky)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (neg.f64 (sin.f64 ky))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 ky) (PI.f64)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (neg.f64 (sin.f64 ky))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (+.f64 (PI.f64) ky) (PI.f64)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (neg.f64 (sin.f64 ky))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 ky (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (neg.f64 (sin.f64 ky))) #s(literal 2 binary64))
(134-z0z1z2z3z4 #s(literal 1 binary64) (cos.f64 (+.f64 (PI.f64) ky)) #s(literal 0 binary64) (neg.f64 (sin.f64 ky)) #s(literal 1 binary64))
(134-z0z1z2z3z4 #s(literal 1 binary64) (cos.f64 ky) #s(literal 0 binary64) (neg.f64 (sin.f64 ky)) #s(literal 1 binary64))
(134-z0z1z2z3z4 #s(literal 1 binary64) (neg.f64 (sin.f64 ky)) #s(literal -1 binary64) (cos.f64 ky) #s(literal 0 binary64))
(neg.f64 (neg.f64 (sin.f64 ky)))
(sin.f64 (neg.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))
(sin.f64 (+.f64 (+.f64 (neg.f64 ky) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (+.f64 (+.f64 (PI.f64) ky) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (PI.f64)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (PI.f64)))
(sin.f64 (neg.f64 (neg.f64 ky)))
(sin.f64 (neg.f64 (+.f64 (PI.f64) ky)))
(sin.f64 (+.f64 (neg.f64 ky) (PI.f64)))
(sin.f64 (+.f64 (+.f64 (PI.f64) ky) (PI.f64)))
(sin.f64 ky)
(-.f64 (*.f64 (cos.f64 ky) #s(literal 0 binary64)) (*.f64 (neg.f64 (sin.f64 ky)) #s(literal 1 binary64)))
(-.f64 (*.f64 (cos.f64 (+.f64 (PI.f64) ky)) #s(literal 0 binary64)) (*.f64 (neg.f64 (sin.f64 ky)) #s(literal 1 binary64)))
(-.f64 (*.f64 (neg.f64 (sin.f64 ky)) #s(literal -1 binary64)) (*.f64 (cos.f64 ky) #s(literal 0 binary64)))
(cos.f64 (neg.f64 (+.f64 (neg.f64 ky) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))
(cos.f64 (neg.f64 (+.f64 (+.f64 (PI.f64) ky) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))
(cos.f64 (neg.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (PI.f64))))
(cos.f64 (fabs.f64 (+.f64 (neg.f64 ky) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))
(cos.f64 (fabs.f64 (+.f64 (+.f64 (PI.f64) ky) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))
(cos.f64 (fabs.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (PI.f64))))
(cos.f64 (+.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(cos.f64 (+.f64 (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)) (PI.f64)))
(cos.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)) (PI.f64)))
(cos.f64 (+.f64 (neg.f64 ky) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(cos.f64 (+.f64 (+.f64 (PI.f64) ky) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(cos.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (PI.f64)))
(+.f64 (*.f64 (neg.f64 (sin.f64 ky)) #s(literal -1 binary64)) (*.f64 (cos.f64 ky) #s(literal 0 binary64)))
(+.f64 (*.f64 (neg.f64 (sin.f64 ky)) #s(literal -1 binary64)) (*.f64 (cos.f64 (+.f64 (PI.f64) ky)) #s(literal 0 binary64)))
kx
(sin.f64 kx)
#s(literal 2 binary64)
(*.f64 (neg.f64 (neg.f64 (fabs.f64 (sin.f64 kx)))) (neg.f64 (neg.f64 (fabs.f64 (sin.f64 kx)))))
(*.f64 (neg.f64 (neg.f64 (neg.f64 (sin.f64 kx)))) (neg.f64 (neg.f64 (neg.f64 (sin.f64 kx)))))
(*.f64 (fabs.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) #s(literal 1/2 binary64))
(*.f64 (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 1 binary64)) (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 1 binary64)) (fabs.f64 (sin.f64 kx)))
(*.f64 (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1 binary64)) (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1 binary64)) (neg.f64 (sin.f64 kx)))
(*.f64 (sin.f64 (*.f64 #s(literal 1 binary64) kx)) (sin.f64 (*.f64 #s(literal 1 binary64) 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 (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 #s(literal 1 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))
(pow.f64 (neg.f64 (fabs.f64 (sin.f64 kx))) #s(literal 2 binary64))
(pow.f64 (neg.f64 (neg.f64 (sin.f64 kx))) #s(literal 2 binary64))
(pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 2 binary64))
(pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 2 binary64))
(pow.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) #s(literal 1 binary64))
(pow.f64 (sin.f64 kx) #s(literal 2 binary64))
(/.f64 (-.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 kx kx)))) #s(literal 4 binary64))
(/.f64 (neg.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) #s(literal 2 binary64))
(/.f64 (fabs.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) #s(literal 2 binary64))
(/.f64 (fabs.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) #s(literal 2 binary64))
(/.f64 (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 1 binary64)) (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal -1 binary64)))
(/.f64 (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1 binary64)) (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal -1 binary64)))
(/.f64 (+.f64 (cos.f64 (+.f64 (+.f64 kx (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 kx (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (-.f64 (+.f64 kx (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 kx (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (neg.f64 kx) (neg.f64 kx))) (cos.f64 (+.f64 (neg.f64 kx) (neg.f64 kx)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (neg.f64 kx) (+.f64 kx (PI.f64)))) (cos.f64 (+.f64 (neg.f64 kx) (+.f64 kx (PI.f64))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 kx (PI.f64)) (neg.f64 kx))) (cos.f64 (+.f64 (+.f64 kx (PI.f64)) (neg.f64 kx)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 kx (PI.f64)) (+.f64 kx (PI.f64)))) (cos.f64 (+.f64 (+.f64 kx (PI.f64)) (+.f64 kx (PI.f64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (neg.f64 kx) (+.f64 kx (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (sin.f64 (+.f64 (neg.f64 kx) (+.f64 kx (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 kx (PI.f64)) (+.f64 kx (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (sin.f64 (+.f64 (+.f64 kx (PI.f64)) (+.f64 kx (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #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 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) #s(literal -2 binary64))
(/.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) #s(literal -1 binary64))
(/.f64 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) (pow.f64 (sin.f64 kx) #s(literal -1 binary64)))
(/.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal -2 binary64)))
(/.f64 #s(literal 1 binary64) (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal -2 binary64)))
(/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 kx) #s(literal -2 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) #s(literal 1 binary64))
(134-z0z1z2z3z4 (neg.f64 (sin.f64 kx)) (cos.f64 kx) #s(literal 0 binary64) (sin.f64 kx) #s(literal 1 binary64))
(neg.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))
(-.f64 #s(literal 1 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 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (neg.f64 kx)))))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 kx (PI.f64))))))
(-.f64 #s(literal 1/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)))
(sqrt.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))))
(fabs.f64 (-.f64 (/.f64 (cos.f64 (+.f64 kx kx)) #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(fabs.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))
(fabs.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))
(exp.f64 (*.f64 (log.f64 (fabs.f64 (sin.f64 kx))) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (neg.f64 (sin.f64 kx))) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (sin.f64 kx)) #s(literal 2 binary64)))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 kx (*.f64 (PI.f64) #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 (neg.f64 (neg.f64 (fabs.f64 (sin.f64 ky)))) (neg.f64 (neg.f64 (fabs.f64 (sin.f64 ky)))))
(*.f64 (fabs.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))
(*.f64 (pow.f64 (fabs.f64 (sin.f64 ky)) #s(literal 1 binary64)) (pow.f64 (fabs.f64 (sin.f64 ky)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (fabs.f64 (sin.f64 ky)) #s(literal 1 binary64)) (fabs.f64 (sin.f64 ky)))
(*.f64 (pow.f64 (neg.f64 (sin.f64 ky)) #s(literal 1 binary64)) (pow.f64 (neg.f64 (sin.f64 ky)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (neg.f64 (sin.f64 ky)) #s(literal 1 binary64)) (neg.f64 (sin.f64 ky)))
(*.f64 (pow.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))
(*.f64 (sin.f64 (*.f64 #s(literal 1 binary64) ky)) (sin.f64 (*.f64 #s(literal 1 binary64) 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 (neg.f64 (fabs.f64 (sin.f64 ky))) (neg.f64 (fabs.f64 (sin.f64 ky))))
(*.f64 (fabs.f64 (sin.f64 ky)) (fabs.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) (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 (neg.f64 (sin.f64 ky)) (neg.f64 (sin.f64 ky)))
(*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (pow.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
(*.f64 (sin.f64 ky) (sin.f64 ky))
(pow.f64 (neg.f64 (fabs.f64 (sin.f64 ky))) #s(literal 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 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) #s(literal 1 binary64))
(pow.f64 (sin.f64 ky) #s(literal 2 binary64))
(/.f64 (-.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 4 binary64))
(/.f64 (neg.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal 2 binary64))
(/.f64 (neg.f64 (+.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky))) (sin.f64 (+.f64 (neg.f64 ky) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 (neg.f64 ky) (+.f64 (PI.f64) ky))) (cos.f64 (+.f64 (neg.f64 ky) (+.f64 (PI.f64) ky))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (PI.f64) ky) (neg.f64 ky))) (cos.f64 (+.f64 (+.f64 (PI.f64) ky) (neg.f64 ky))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (PI.f64) ky) (+.f64 (PI.f64) ky))) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (PI.f64) ky))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (PI.f64) ky) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky))) (sin.f64 (+.f64 (+.f64 (PI.f64) ky) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky))))) #s(literal -2 binary64))
(/.f64 (fabs.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal 2 binary64))
(/.f64 (fabs.f64 (+.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky))) (sin.f64 (+.f64 (neg.f64 ky) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky))))) #s(literal 2 binary64))
(/.f64 (fabs.f64 (-.f64 (cos.f64 (-.f64 (neg.f64 ky) (+.f64 (PI.f64) ky))) (cos.f64 (+.f64 (neg.f64 ky) (+.f64 (PI.f64) ky))))) #s(literal 2 binary64))
(/.f64 (fabs.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (PI.f64) ky) (neg.f64 ky))) (cos.f64 (+.f64 (+.f64 (PI.f64) ky) (neg.f64 ky))))) #s(literal 2 binary64))
(/.f64 (fabs.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (PI.f64) ky) (+.f64 (PI.f64) ky))) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (PI.f64) ky))))) #s(literal 2 binary64))
(/.f64 (fabs.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (PI.f64) ky) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky))) (sin.f64 (+.f64 (+.f64 (PI.f64) ky) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky))))) #s(literal 2 binary64))
(/.f64 (fabs.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))
(/.f64 (pow.f64 (fabs.f64 (sin.f64 ky)) #s(literal 1 binary64)) (pow.f64 (fabs.f64 (sin.f64 ky)) #s(literal -1 binary64)))
(/.f64 (pow.f64 (neg.f64 (sin.f64 ky)) #s(literal 1 binary64)) (pow.f64 (neg.f64 (sin.f64 ky)) #s(literal -1 binary64)))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)) (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)))) (cos.f64 (-.f64 (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)) (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)) (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)))) (cos.f64 (-.f64 (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)) (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky))) (cos.f64 (-.f64 (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)) (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)))) (cos.f64 (-.f64 (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)) (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)) (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)))) (cos.f64 (-.f64 (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)) (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky))) (cos.f64 (-.f64 (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)))) (cos.f64 (-.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)))) (cos.f64 (-.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (+.f64 (neg.f64 ky) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (neg.f64 ky) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (-.f64 (+.f64 (neg.f64 ky) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (neg.f64 ky) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (+.f64 (neg.f64 ky) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (+.f64 (PI.f64) ky) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (-.f64 (+.f64 (neg.f64 ky) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (+.f64 (PI.f64) ky) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (+.f64 (neg.f64 ky) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (PI.f64)))) (cos.f64 (-.f64 (+.f64 (neg.f64 ky) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (PI.f64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (+.f64 (+.f64 (PI.f64) ky) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (neg.f64 ky) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (-.f64 (+.f64 (+.f64 (PI.f64) ky) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (neg.f64 ky) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (+.f64 (+.f64 (PI.f64) ky) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (+.f64 (PI.f64) ky) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (-.f64 (+.f64 (+.f64 (PI.f64) ky) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (+.f64 (PI.f64) ky) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (+.f64 (+.f64 (PI.f64) ky) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (PI.f64)))) (cos.f64 (-.f64 (+.f64 (+.f64 (PI.f64) ky) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (PI.f64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (PI.f64)) (+.f64 (neg.f64 ky) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (-.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (PI.f64)) (+.f64 (neg.f64 ky) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (PI.f64)) (+.f64 (+.f64 (PI.f64) ky) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (-.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (PI.f64)) (+.f64 (+.f64 (PI.f64) ky) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (PI.f64)) (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (PI.f64)))) (cos.f64 (-.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (PI.f64)) (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (PI.f64))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 ky))) (cos.f64 (+.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 ky)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (PI.f64) ky))) (cos.f64 (+.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (PI.f64) ky)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (neg.f64 ky) (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (neg.f64 ky) (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (PI.f64) ky) (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (+.f64 (PI.f64) ky) (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (neg.f64 (neg.f64 ky)) (neg.f64 (neg.f64 ky)))) (cos.f64 (+.f64 (neg.f64 (neg.f64 ky)) (neg.f64 (neg.f64 ky))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (neg.f64 (neg.f64 ky)) (neg.f64 (+.f64 (PI.f64) ky)))) (cos.f64 (+.f64 (neg.f64 (neg.f64 ky)) (neg.f64 (+.f64 (PI.f64) ky))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (neg.f64 (neg.f64 ky)) (+.f64 (neg.f64 ky) (PI.f64)))) (cos.f64 (+.f64 (neg.f64 (neg.f64 ky)) (+.f64 (neg.f64 ky) (PI.f64))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (neg.f64 (neg.f64 ky)) (+.f64 (+.f64 (PI.f64) ky) (PI.f64)))) (cos.f64 (+.f64 (neg.f64 (neg.f64 ky)) (+.f64 (+.f64 (PI.f64) ky) (PI.f64))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (neg.f64 (neg.f64 ky)) ky)) (cos.f64 (+.f64 (neg.f64 (neg.f64 ky)) ky))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (neg.f64 (+.f64 (PI.f64) ky)) (neg.f64 (neg.f64 ky)))) (cos.f64 (+.f64 (neg.f64 (+.f64 (PI.f64) ky)) (neg.f64 (neg.f64 ky))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (neg.f64 (+.f64 (PI.f64) ky)) (neg.f64 (+.f64 (PI.f64) ky)))) (cos.f64 (+.f64 (neg.f64 (+.f64 (PI.f64) ky)) (neg.f64 (+.f64 (PI.f64) ky))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (neg.f64 (+.f64 (PI.f64) ky)) (+.f64 (neg.f64 ky) (PI.f64)))) (cos.f64 (+.f64 (neg.f64 (+.f64 (PI.f64) ky)) (+.f64 (neg.f64 ky) (PI.f64))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (neg.f64 (+.f64 (PI.f64) ky)) (+.f64 (+.f64 (PI.f64) ky) (PI.f64)))) (cos.f64 (+.f64 (neg.f64 (+.f64 (PI.f64) ky)) (+.f64 (+.f64 (PI.f64) ky) (PI.f64))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (neg.f64 (+.f64 (PI.f64) ky)) ky)) (cos.f64 (+.f64 (neg.f64 (+.f64 (PI.f64) ky)) ky))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 ky) (PI.f64)) (neg.f64 (neg.f64 ky)))) (cos.f64 (+.f64 (+.f64 (neg.f64 ky) (PI.f64)) (neg.f64 (neg.f64 ky))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 ky) (PI.f64)) (neg.f64 (+.f64 (PI.f64) ky)))) (cos.f64 (+.f64 (+.f64 (neg.f64 ky) (PI.f64)) (neg.f64 (+.f64 (PI.f64) ky))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 ky) (PI.f64)) (+.f64 (neg.f64 ky) (PI.f64)))) (cos.f64 (+.f64 (+.f64 (neg.f64 ky) (PI.f64)) (+.f64 (neg.f64 ky) (PI.f64))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 ky) (PI.f64)) (+.f64 (+.f64 (PI.f64) ky) (PI.f64)))) (cos.f64 (+.f64 (+.f64 (neg.f64 ky) (PI.f64)) (+.f64 (+.f64 (PI.f64) ky) (PI.f64))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 ky) (PI.f64)) ky)) (cos.f64 (+.f64 (+.f64 (neg.f64 ky) (PI.f64)) ky))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (+.f64 (PI.f64) ky) (PI.f64)) (neg.f64 (neg.f64 ky)))) (cos.f64 (+.f64 (+.f64 (+.f64 (PI.f64) ky) (PI.f64)) (neg.f64 (neg.f64 ky))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (+.f64 (PI.f64) ky) (PI.f64)) (neg.f64 (+.f64 (PI.f64) ky)))) (cos.f64 (+.f64 (+.f64 (+.f64 (PI.f64) ky) (PI.f64)) (neg.f64 (+.f64 (PI.f64) ky))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (+.f64 (PI.f64) ky) (PI.f64)) (+.f64 (neg.f64 ky) (PI.f64)))) (cos.f64 (+.f64 (+.f64 (+.f64 (PI.f64) ky) (PI.f64)) (+.f64 (neg.f64 ky) (PI.f64))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (+.f64 (PI.f64) ky) (PI.f64)) (+.f64 (+.f64 (PI.f64) ky) (PI.f64)))) (cos.f64 (+.f64 (+.f64 (+.f64 (PI.f64) ky) (PI.f64)) (+.f64 (+.f64 (PI.f64) ky) (PI.f64))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (+.f64 (PI.f64) ky) (PI.f64)) ky)) (cos.f64 (+.f64 (+.f64 (+.f64 (PI.f64) ky) (PI.f64)) ky))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 ky (neg.f64 (neg.f64 ky)))) (cos.f64 (+.f64 ky (neg.f64 (neg.f64 ky))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 ky (neg.f64 (+.f64 (PI.f64) ky)))) (cos.f64 (+.f64 ky (neg.f64 (+.f64 (PI.f64) ky))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 ky (+.f64 (neg.f64 ky) (PI.f64)))) (cos.f64 (+.f64 ky (+.f64 (neg.f64 ky) (PI.f64))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 ky (+.f64 (+.f64 (PI.f64) ky) (PI.f64)))) (cos.f64 (+.f64 ky (+.f64 (+.f64 (PI.f64) ky) (PI.f64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)))) (sin.f64 (+.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)))) (sin.f64 (+.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky))) (sin.f64 (+.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (neg.f64 ky) (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)))) (sin.f64 (+.f64 (neg.f64 ky) (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (neg.f64 ky) (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)))) (sin.f64 (+.f64 (neg.f64 ky) (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (PI.f64) ky) (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)))) (sin.f64 (+.f64 (+.f64 (PI.f64) ky) (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (PI.f64) ky) (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)))) (sin.f64 (+.f64 (+.f64 (PI.f64) ky) (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (neg.f64 (neg.f64 ky)) (+.f64 (neg.f64 ky) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (sin.f64 (+.f64 (neg.f64 (neg.f64 ky)) (+.f64 (neg.f64 ky) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (neg.f64 (neg.f64 ky)) (+.f64 (+.f64 (PI.f64) ky) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (sin.f64 (+.f64 (neg.f64 (neg.f64 ky)) (+.f64 (+.f64 (PI.f64) ky) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (neg.f64 (neg.f64 ky)) (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (PI.f64)))) (sin.f64 (+.f64 (neg.f64 (neg.f64 ky)) (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (PI.f64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (neg.f64 (+.f64 (PI.f64) ky)) (+.f64 (neg.f64 ky) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (sin.f64 (+.f64 (neg.f64 (+.f64 (PI.f64) ky)) (+.f64 (neg.f64 ky) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (neg.f64 (+.f64 (PI.f64) ky)) (+.f64 (+.f64 (PI.f64) ky) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (sin.f64 (+.f64 (neg.f64 (+.f64 (PI.f64) ky)) (+.f64 (+.f64 (PI.f64) ky) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (neg.f64 (+.f64 (PI.f64) ky)) (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (PI.f64)))) (sin.f64 (+.f64 (neg.f64 (+.f64 (PI.f64) ky)) (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (PI.f64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 ky) (PI.f64)) (+.f64 (neg.f64 ky) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (sin.f64 (+.f64 (+.f64 (neg.f64 ky) (PI.f64)) (+.f64 (neg.f64 ky) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 ky) (PI.f64)) (+.f64 (+.f64 (PI.f64) ky) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (sin.f64 (+.f64 (+.f64 (neg.f64 ky) (PI.f64)) (+.f64 (+.f64 (PI.f64) ky) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 ky) (PI.f64)) (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (PI.f64)))) (sin.f64 (+.f64 (+.f64 (neg.f64 ky) (PI.f64)) (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (PI.f64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (+.f64 (PI.f64) ky) (PI.f64)) (+.f64 (neg.f64 ky) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (sin.f64 (+.f64 (+.f64 (+.f64 (PI.f64) ky) (PI.f64)) (+.f64 (neg.f64 ky) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (+.f64 (PI.f64) ky) (PI.f64)) (+.f64 (+.f64 (PI.f64) ky) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (sin.f64 (+.f64 (+.f64 (+.f64 (PI.f64) ky) (PI.f64)) (+.f64 (+.f64 (PI.f64) ky) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (+.f64 (PI.f64) ky) (PI.f64)) (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (PI.f64)))) (sin.f64 (+.f64 (+.f64 (+.f64 (PI.f64) ky) (PI.f64)) (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (PI.f64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 ky (+.f64 (neg.f64 ky) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (sin.f64 (+.f64 ky (+.f64 (neg.f64 ky) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 ky (+.f64 (+.f64 (PI.f64) ky) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (sin.f64 (+.f64 ky (+.f64 (+.f64 (PI.f64) ky) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 ky (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (PI.f64)))) (sin.f64 (+.f64 ky (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (PI.f64))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64)) #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 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal -2 binary64))
(/.f64 (+.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky))) (sin.f64 (+.f64 (neg.f64 ky) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (neg.f64 ky) (+.f64 (PI.f64) ky))) (cos.f64 (+.f64 (neg.f64 ky) (+.f64 (PI.f64) ky)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (PI.f64) ky) (neg.f64 ky))) (cos.f64 (+.f64 (+.f64 (PI.f64) ky) (neg.f64 ky)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (PI.f64) ky) (+.f64 (PI.f64) ky))) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (PI.f64) ky)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (PI.f64) ky) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky))) (sin.f64 (+.f64 (+.f64 (PI.f64) ky) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) 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 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) #s(literal -1 binary64))
(/.f64 #s(literal 1 binary64) (pow.f64 (fabs.f64 (sin.f64 ky)) #s(literal -2 binary64)))
(/.f64 #s(literal 1 binary64) (pow.f64 (neg.f64 (sin.f64 ky)) #s(literal -2 binary64)))
(/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) #s(literal 1 binary64))
(134-z0z1z2z3z4 (neg.f64 (sin.f64 ky)) (cos.f64 ky) #s(literal 0 binary64) #s(literal 1 binary64) (sin.f64 ky))
(134-z0z1z2z3z4 (neg.f64 (sin.f64 ky)) (cos.f64 ky) #s(literal 0 binary64) (sin.f64 ky) #s(literal 1 binary64))
(134-z0z1z2z3z4 (neg.f64 (sin.f64 ky)) #s(literal 0 binary64) (cos.f64 ky) #s(literal 1 binary64) (sin.f64 ky))
(134-z0z1z2z3z4 (neg.f64 (sin.f64 ky)) #s(literal 0 binary64) (cos.f64 ky) (sin.f64 ky) #s(literal 1 binary64))
(134-z0z1z2z3z4 (neg.f64 (sin.f64 ky)) (sin.f64 ky) #s(literal -1 binary64) (cos.f64 ky) (sin.f64 (neg.f64 (PI.f64))))
(134-z0z1z2z3z4 (sin.f64 ky) (cos.f64 (+.f64 (PI.f64) ky)) #s(literal 0 binary64) (neg.f64 (sin.f64 ky)) #s(literal 1 binary64))
(134-z0z1z2z3z4 (sin.f64 ky) (cos.f64 ky) #s(literal 0 binary64) (neg.f64 (sin.f64 ky)) #s(literal 1 binary64))
(134-z0z1z2z3z4 (sin.f64 ky) (neg.f64 (sin.f64 ky)) #s(literal -1 binary64) (cos.f64 ky) #s(literal 0 binary64))
(neg.f64 (-.f64 (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))
(-.f64 #s(literal 1 binary64) (*.f64 (sin.f64 (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky))) (sin.f64 (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)))))
(-.f64 #s(literal 1 binary64) (*.f64 (sin.f64 (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky))) (sin.f64 (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)))))
(-.f64 #s(literal 1 binary64) (*.f64 (sin.f64 (+.f64 (neg.f64 ky) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (sin.f64 (+.f64 (neg.f64 ky) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))
(-.f64 #s(literal 1 binary64) (*.f64 (sin.f64 (+.f64 (+.f64 (PI.f64) ky) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (sin.f64 (+.f64 (+.f64 (PI.f64) ky) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))
(-.f64 #s(literal 1 binary64) (*.f64 (sin.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (PI.f64))) (sin.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (PI.f64)))))
(-.f64 #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/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (neg.f64 (neg.f64 ky))))))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (neg.f64 (+.f64 (PI.f64) ky))))))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (neg.f64 ky) (PI.f64))))))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (+.f64 (PI.f64) ky) (PI.f64))))))
(-.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (+.f64 ky ky)) #s(literal 2 binary64)))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (PI.f64) ky)))))
(-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))
(sqrt.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))))
(fabs.f64 (-.f64 (/.f64 (cos.f64 (+.f64 ky ky)) #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(fabs.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #s(literal 1 binary64)))
(fabs.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (PI.f64) ky)))) #s(literal 1/2 binary64)))
(fabs.f64 (-.f64 (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))
(fabs.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))
(exp.f64 (*.f64 (log.f64 (fabs.f64 (sin.f64 ky))) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (neg.f64 (sin.f64 ky))) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (sin.f64 ky)) #s(literal 2 binary64)))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (neg.f64 ky) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (+.f64 (PI.f64) ky) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (PI.f64))))))
(+.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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)))))
(*.f64 (pow.f64 (neg.f64 (sqrt.f64 (-.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)))))) #s(literal 1 binary64)) (pow.f64 (neg.f64 (sqrt.f64 (-.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)))))) #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 #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 (pow.f64 (sqrt.f64 (-.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))))) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 (-.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))))) #s(literal 1 binary64)))
(*.f64 (pow.f64 (sqrt.f64 (-.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))))) #s(literal 1 binary64)) (sqrt.f64 (-.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 (+.f64 #s(literal 1 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 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 (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) #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 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))
(*.f64 (+.f64 #s(literal 1 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 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 (sqrt.f64 (-.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)))))) (neg.f64 (sqrt.f64 (-.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 (sqrt.f64 (-.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))))) (sqrt.f64 (-.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 (-.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)))) (pow.f64 (-.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)))) #s(literal 0 binary64)))
(pow.f64 (pow.f64 (-.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)))) #s(literal 2 binary64)) #s(literal 1/2 binary64))
(pow.f64 (neg.f64 (sqrt.f64 (-.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)))))) #s(literal 2 binary64))
(pow.f64 (sqrt.f64 (-.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))))) #s(literal 2 binary64))
(pow.f64 (-.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)))) #s(literal 1 binary64))
(/.f64 (-.f64 (*.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) (neg.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))))) #s(literal -4 binary64))
(/.f64 (-.f64 (*.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal -2 binary64)) (*.f64 #s(literal -2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) #s(literal 4 binary64))
(/.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky))) (sin.f64 (+.f64 (neg.f64 ky) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (neg.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))))) #s(literal 4 binary64))
(/.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky))) (sin.f64 (+.f64 (neg.f64 ky) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)))) #s(literal -2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) #s(literal -4 binary64))
(/.f64 (-.f64 (*.f64 (-.f64 (cos.f64 (-.f64 (neg.f64 ky) (+.f64 (PI.f64) ky))) (cos.f64 (+.f64 (neg.f64 ky) (+.f64 (PI.f64) ky)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (neg.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))))) #s(literal 4 binary64))
(/.f64 (-.f64 (*.f64 (-.f64 (cos.f64 (-.f64 (neg.f64 ky) (+.f64 (PI.f64) ky))) (cos.f64 (+.f64 (neg.f64 ky) (+.f64 (PI.f64) ky)))) #s(literal -2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) #s(literal -4 binary64))
(/.f64 (-.f64 (*.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (PI.f64) ky) (neg.f64 ky))) (cos.f64 (+.f64 (+.f64 (PI.f64) ky) (neg.f64 ky)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (neg.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))))) #s(literal 4 binary64))
(/.f64 (-.f64 (*.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (PI.f64) ky) (neg.f64 ky))) (cos.f64 (+.f64 (+.f64 (PI.f64) ky) (neg.f64 ky)))) #s(literal -2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) #s(literal -4 binary64))
(/.f64 (-.f64 (*.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (PI.f64) ky) (+.f64 (PI.f64) ky))) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (PI.f64) ky)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (neg.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))))) #s(literal 4 binary64))
(/.f64 (-.f64 (*.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (PI.f64) ky) (+.f64 (PI.f64) ky))) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (PI.f64) ky)))) #s(literal -2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) #s(literal -4 binary64))
(/.f64 (-.f64 (*.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (PI.f64) ky) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky))) (sin.f64 (+.f64 (+.f64 (PI.f64) ky) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (neg.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))))) #s(literal 4 binary64))
(/.f64 (-.f64 (*.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (PI.f64) ky) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky))) (sin.f64 (+.f64 (+.f64 (PI.f64) ky) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)))) #s(literal -2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) #s(literal -4 binary64))
(/.f64 (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (neg.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))))) #s(literal 4 binary64))
(/.f64 (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal -2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) #s(literal -4 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 #s(literal 1 binary64) (neg.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) #s(literal -2 binary64)) (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) #s(literal -2 binary64))
(/.f64 (-.f64 (*.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64)))) #s(literal -4 binary64))
(/.f64 (-.f64 (*.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) (neg.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))) #s(literal -4 binary64))
(/.f64 (-.f64 (*.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) (-.f64 (cos.f64 (-.f64 (+.f64 (PI.f64) ky) ky)) (cos.f64 (+.f64 (+.f64 (PI.f64) ky) ky))))) #s(literal -4 binary64))
(/.f64 (-.f64 (*.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) (-.f64 (cos.f64 (-.f64 ky (+.f64 (PI.f64) ky))) (cos.f64 (+.f64 ky (+.f64 (PI.f64) ky)))))) #s(literal -4 binary64))
(/.f64 (-.f64 (*.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) (+.f64 (sin.f64 (-.f64 ky (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky))) (sin.f64 (+.f64 ky (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)))))) #s(literal -4 binary64))
(/.f64 (-.f64 (*.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) #s(literal -2 binary64)) (*.f64 #s(literal -2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal 4 binary64))
(/.f64 (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64)))) #s(literal 4 binary64))
(/.f64 (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (neg.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))) #s(literal 4 binary64))
(/.f64 (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 (+.f64 (PI.f64) ky) ky)) (cos.f64 (+.f64 (+.f64 (PI.f64) ky) ky))))) #s(literal 4 binary64))
(/.f64 (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 ky (+.f64 (PI.f64) ky))) (cos.f64 (+.f64 ky (+.f64 (PI.f64) ky)))))) #s(literal 4 binary64))
(/.f64 (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (-.f64 ky (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky))) (sin.f64 (+.f64 ky (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)))))) #s(literal 4 binary64))
(/.f64 (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal -4 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 #s(literal 1 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64)))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 #s(literal 1 binary64) (neg.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 #s(literal 1 binary64) (-.f64 (cos.f64 (-.f64 (+.f64 (PI.f64) ky) ky)) (cos.f64 (+.f64 (+.f64 (PI.f64) ky) ky))))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 #s(literal 1 binary64) (-.f64 (cos.f64 (-.f64 ky (+.f64 (PI.f64) ky))) (cos.f64 (+.f64 ky (+.f64 (PI.f64) ky)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 #s(literal 1 binary64) (+.f64 (sin.f64 (-.f64 ky (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky))) (sin.f64 (+.f64 ky (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) #s(literal -2 binary64)) (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (+.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 2 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 2 binary64)))) #s(literal -4 binary64))
(/.f64 (neg.f64 (+.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 2 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 2 binary64)))) #s(literal -4 binary64))
(/.f64 (neg.f64 (+.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (+.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (+.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))))) #s(literal -4 binary64))
(/.f64 (neg.f64 (+.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))) #s(literal -4 binary64))
(/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) #s(literal 2 binary64))
(/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal 2 binary64))
(/.f64 (fabs.f64 (+.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 2 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 2 binary64)))) #s(literal 4 binary64))
(/.f64 (fabs.f64 (+.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 2 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 2 binary64)))) #s(literal 4 binary64))
(/.f64 (fabs.f64 (+.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) #s(literal 2 binary64))
(/.f64 (fabs.f64 (+.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal 2 binary64))
(/.f64 (fabs.f64 (+.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))))) #s(literal 4 binary64))
(/.f64 (fabs.f64 (+.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))) #s(literal 4 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 2 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 2 binary64))) #s(literal 4 binary64))
(/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 2 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 2 binary64))) #s(literal 4 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 (*.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 (-.f64 #s(literal 1 binary64) (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 (-.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 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 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 (*.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 (-.f64 #s(literal 1 binary64) (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 (+.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) #s(literal 2 binary64))
(/.f64 (+.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) #s(literal 4 binary64))
(/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal 4 binary64))
(/.f64 (pow.f64 (sqrt.f64 (-.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))))) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.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 (-.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 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 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))))
(/.f64 (-.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 (*.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 (-.f64 #s(literal 1 binary64) (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 (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 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 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 (-.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 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) #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 (-.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 (-.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 (-.f64 #s(literal 1 binary64) (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 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.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))))) #s(literal -2 binary64)))
(/.f64 #s(literal 1 binary64) (pow.f64 (-.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)))) #s(literal -1 binary64)))
(/.f64 (-.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 (-.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 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))
(/.f64 (+.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1 binary64) (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 ky ky))) #s(literal 1/2 binary64)) #s(literal 3 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 (*.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 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))))
(neg.f64 (-.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))
(neg.f64 (+.f64 (-.f64 (*.f64 (cos.f64 (+.f64 ky ky)) #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 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))
(-.f64 (+.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))
(-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #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 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))
(-.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 (-.f64 #s(literal 1 binary64) (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 (*.f64 (-.f64 #s(literal 1 binary64) (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)))
(sqrt.f64 (pow.f64 (-.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)))) #s(literal 2 binary64)))
(fabs.f64 (-.f64 (*.f64 (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)) #s(literal 1/2 binary64))))
(fabs.f64 (-.f64 (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (+.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))))
(fabs.f64 (-.f64 (-.f64 (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) #s(literal 1/2 binary64)))
(fabs.f64 (-.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) #s(literal 1/2 binary64)))
(fabs.f64 (-.f64 (+.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))) #s(literal 1/2 binary64)))
(fabs.f64 (-.f64 (+.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))) #s(literal 1/2 binary64)))
(fabs.f64 (neg.f64 (*.f64 (neg.f64 (sqrt.f64 (-.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)))))) (sqrt.f64 (-.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))))))))
(fabs.f64 (neg.f64 (*.f64 (sqrt.f64 (-.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))))) (neg.f64 (sqrt.f64 (-.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)))))))))
(fabs.f64 (-.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))
(fabs.f64 (*.f64 (neg.f64 (sqrt.f64 (-.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)))))) (sqrt.f64 (-.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)))))))
(fabs.f64 (*.f64 (sqrt.f64 (-.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))))) (neg.f64 (sqrt.f64 (-.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))))))))
(fabs.f64 (+.f64 (-.f64 (*.f64 (cos.f64 (+.f64 ky ky)) #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))))
(fabs.f64 (-.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)))))
(exp.f64 (*.f64 (log.f64 (pow.f64 (-.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)))) #s(literal 2 binary64))) #s(literal 1/2 binary64)))
(exp.f64 (*.f64 (log.f64 (sqrt.f64 (-.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)))))) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (-.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))))) #s(literal 1 binary64)))
(+.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (*.f64 (neg.f64 (neg.f64 (sin.f64 kx))) (sin.f64 kx)))
(+.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 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 ky ky))) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 (neg.f64 (sqrt.f64 (-.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))))))) (sqrt.f64 (neg.f64 (sqrt.f64 (-.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 (pow.f64 (neg.f64 (sqrt.f64 (-.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)))))) #s(literal 1/2 binary64)) (pow.f64 (neg.f64 (sqrt.f64 (-.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)))))) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (sqrt.f64 (-.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))))) #s(literal 1/2 binary64)) (pow.f64 (sqrt.f64 (-.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))))) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 (sqrt.f64 (-.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)))))) (sqrt.f64 (sqrt.f64 (-.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 (pow.f64 (-.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) #s(literal 2 binary64))) (pow.f64 (-.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) #s(literal 2 binary64))))
(pow.f64 (pow.f64 (-.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)))) #s(literal 2 binary64)) #s(literal 1/4 binary64))
(pow.f64 (-.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)))) #s(literal 1/2 binary64))
(/.f64 (sqrt.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (sqrt.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (sqrt.f64 (+.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 2 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 2 binary64)))) (sqrt.f64 #s(literal 4 binary64)))
(/.f64 (sqrt.f64 (+.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 2 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 2 binary64)))) (sqrt.f64 #s(literal 4 binary64)))
(/.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (sqrt.f64 (+.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))))) (sqrt.f64 #s(literal 4 binary64)))
(/.f64 (sqrt.f64 (+.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))) (sqrt.f64 #s(literal 4 binary64)))
(neg.f64 (neg.f64 (sqrt.f64 (-.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)))))))
(sqrt.f64 (-.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)))))
(fabs.f64 (neg.f64 (sqrt.f64 (-.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)))))))
(fabs.f64 (sqrt.f64 (-.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))))))
(exp.f64 (*.f64 (log.f64 (-.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))))) #s(literal 1/2 binary64)))
(*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.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)))))) (neg.f64 (sin.f64 ky)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.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)))))) (sin.f64 ky))
(*.f64 #s(literal 1 binary64) (/.f64 (sin.f64 ky) (sqrt.f64 (-.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 (neg.f64 (sin.f64 ky)) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.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 (sin.f64 ky) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.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 (*.f64 #s(literal 2 binary64) (*.f64 (neg.f64 (sin.f64 ky)) #s(literal 1 binary64))) (*.f64 #s(literal 2 binary64) (neg.f64 (sqrt.f64 (-.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 (*.f64 #s(literal 2 binary64) (*.f64 (sin.f64 ky) #s(literal -1 binary64))) (*.f64 #s(literal 2 binary64) (neg.f64 (sqrt.f64 (-.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 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1 binary64) (sin.f64 ky))) (*.f64 #s(literal 2 binary64) (neg.f64 (sqrt.f64 (-.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 (*.f64 #s(literal 2 binary64) (neg.f64 (sin.f64 ky))) (*.f64 #s(literal 2 binary64) (neg.f64 (sqrt.f64 (-.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 (*.f64 #s(literal 2 binary64) (sin.f64 ky)) (*.f64 #s(literal 2 binary64) (sqrt.f64 (-.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 (neg.f64 (*.f64 (neg.f64 (sin.f64 ky)) #s(literal 1 binary64))) (sqrt.f64 (-.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 (neg.f64 (*.f64 (sin.f64 ky) #s(literal -1 binary64))) (sqrt.f64 (-.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 (neg.f64 (*.f64 #s(literal -1 binary64) (sin.f64 ky))) (sqrt.f64 (-.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 (*.f64 (neg.f64 (sin.f64 ky)) #s(literal 1 binary64)) (neg.f64 (sqrt.f64 (-.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 (*.f64 (sin.f64 ky) #s(literal -1 binary64)) (neg.f64 (sqrt.f64 (-.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 (*.f64 #s(literal -1 binary64) (sin.f64 ky)) (neg.f64 (sqrt.f64 (-.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 binary64) (/.f64 (neg.f64 (sqrt.f64 (-.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)))))) (neg.f64 (sin.f64 ky))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.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))))) (sin.f64 ky)))
(/.f64 (neg.f64 (sin.f64 ky)) (neg.f64 (sqrt.f64 (-.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 (sin.f64 ky) (sqrt.f64 (-.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))))))
(134-z0z1z2z3z4 (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.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)))))) (cos.f64 ky) #s(literal 0 binary64) #s(literal 1 binary64) (sin.f64 ky))
(134-z0z1z2z3z4 (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.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)))))) (cos.f64 ky) #s(literal 0 binary64) (sin.f64 ky) #s(literal 1 binary64))
(134-z0z1z2z3z4 (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.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)))))) #s(literal 0 binary64) (cos.f64 ky) #s(literal 1 binary64) (sin.f64 ky))
(134-z0z1z2z3z4 (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.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)))))) #s(literal 0 binary64) (cos.f64 ky) (sin.f64 ky) #s(literal 1 binary64))
(134-z0z1z2z3z4 (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.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)))))) (sin.f64 ky) #s(literal -1 binary64) (cos.f64 ky) (sin.f64 (neg.f64 (PI.f64))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.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)))))) (cos.f64 (+.f64 (PI.f64) ky)) #s(literal 0 binary64) (neg.f64 (sin.f64 ky)) #s(literal 1 binary64))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.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)))))) (cos.f64 ky) #s(literal 0 binary64) (neg.f64 (sin.f64 ky)) #s(literal 1 binary64))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.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)))))) (neg.f64 (sin.f64 ky)) #s(literal -1 binary64) (cos.f64 ky) #s(literal 0 binary64))
(neg.f64 (/.f64 (neg.f64 (sin.f64 ky)) (sqrt.f64 (-.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)))))))
th
(sin.f64 th)
(*.f64 (*.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.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 (/.f64 (sin.f64 th) (sqrt.f64 (-.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)))))) (sin.f64 ky))
(*.f64 (*.f64 (neg.f64 (sin.f64 ky)) (sin.f64 th)) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.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 (*.f64 (sin.f64 th) (sin.f64 ky)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.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 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.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 (sin.f64 th) (sin.f64 ky)))
(*.f64 (neg.f64 (sin.f64 ky)) (*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.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)))))) (sin.f64 th)))
(*.f64 (neg.f64 (sin.f64 ky)) (/.f64 (neg.f64 (sin.f64 th)) (sqrt.f64 (-.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 (sin.f64 th) (/.f64 (sin.f64 ky) (sqrt.f64 (-.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 (/.f64 (sin.f64 ky) (sqrt.f64 (-.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)))))) (sin.f64 th))
(*.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (sqrt.f64 (-.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 (*.f64 (-.f64 (cos.f64 (-.f64 th (neg.f64 ky))) (cos.f64 (+.f64 th (neg.f64 ky)))) #s(literal -1 binary64)) (*.f64 #s(literal 2 binary64) (sqrt.f64 (-.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 (*.f64 (-.f64 (cos.f64 (-.f64 th (neg.f64 ky))) (cos.f64 (+.f64 th (neg.f64 ky)))) #s(literal 1 binary64)) (*.f64 #s(literal 2 binary64) (neg.f64 (sqrt.f64 (-.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 (*.f64 (-.f64 (cos.f64 (-.f64 th (+.f64 (PI.f64) ky))) (cos.f64 (+.f64 th (+.f64 (PI.f64) ky)))) #s(literal -1 binary64)) (*.f64 #s(literal 2 binary64) (sqrt.f64 (-.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 (*.f64 (-.f64 (cos.f64 (-.f64 th (+.f64 (PI.f64) ky))) (cos.f64 (+.f64 th (+.f64 (PI.f64) ky)))) #s(literal 1 binary64)) (*.f64 #s(literal 2 binary64) (neg.f64 (sqrt.f64 (-.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 (*.f64 (-.f64 (cos.f64 (+.f64 th ky)) (cos.f64 (-.f64 th ky))) #s(literal -1 binary64)) (*.f64 #s(literal 2 binary64) (sqrt.f64 (-.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 (*.f64 (-.f64 (cos.f64 (+.f64 th ky)) (cos.f64 (-.f64 th ky))) #s(literal 1 binary64)) (*.f64 #s(literal 2 binary64) (neg.f64 (sqrt.f64 (-.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 (*.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (PI.f64) ky) th)) (cos.f64 (+.f64 (+.f64 (PI.f64) ky) th))) #s(literal -1 binary64)) (*.f64 #s(literal 2 binary64) (sqrt.f64 (-.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 (*.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (PI.f64) ky) th)) (cos.f64 (+.f64 (+.f64 (PI.f64) ky) th))) #s(literal 1 binary64)) (*.f64 #s(literal 2 binary64) (neg.f64 (sqrt.f64 (-.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 (*.f64 (+.f64 (sin.f64 (-.f64 th (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky))) (sin.f64 (+.f64 th (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)))) #s(literal -1 binary64)) (*.f64 #s(literal 2 binary64) (sqrt.f64 (-.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 (*.f64 (+.f64 (sin.f64 (-.f64 th (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky))) (sin.f64 (+.f64 th (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)))) #s(literal 1 binary64)) (*.f64 #s(literal 2 binary64) (neg.f64 (sqrt.f64 (-.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 (*.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 th ky)) (cos.f64 (+.f64 th ky)))) #s(literal -1 binary64)) (*.f64 #s(literal -2 binary64) (neg.f64 (sqrt.f64 (-.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 (*.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 th ky)) (cos.f64 (+.f64 th ky)))) #s(literal -1 binary64)) (*.f64 #s(literal 2 binary64) (sqrt.f64 (-.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 (*.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 th ky)) (cos.f64 (+.f64 th ky)))) #s(literal 1 binary64)) (*.f64 #s(literal -2 binary64) (sqrt.f64 (-.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 (*.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 th ky)) (cos.f64 (+.f64 th ky)))) #s(literal 1 binary64)) (*.f64 #s(literal 2 binary64) (neg.f64 (sqrt.f64 (-.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 (*.f64 #s(literal -1 binary64) (neg.f64 (-.f64 (cos.f64 (-.f64 th ky)) (cos.f64 (+.f64 th ky))))) (*.f64 (neg.f64 (sqrt.f64 (-.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)))))) #s(literal -2 binary64)))
(/.f64 (*.f64 #s(literal -1 binary64) (-.f64 (cos.f64 (-.f64 th ky)) (cos.f64 (+.f64 th ky)))) (*.f64 (neg.f64 (sqrt.f64 (-.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)))))) #s(literal 2 binary64)))
(/.f64 (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 th) (sin.f64 ky))) (*.f64 (neg.f64 (sqrt.f64 (-.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)))))) #s(literal 1 binary64)))
(/.f64 (*.f64 #s(literal 1 binary64) (neg.f64 (-.f64 (cos.f64 (-.f64 th ky)) (cos.f64 (+.f64 th ky))))) (*.f64 (sqrt.f64 (-.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))))) #s(literal -2 binary64)))
(/.f64 (*.f64 #s(literal 1 binary64) (-.f64 (cos.f64 (-.f64 th ky)) (cos.f64 (+.f64 th ky)))) (*.f64 (sqrt.f64 (-.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))))) #s(literal 2 binary64)))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (sin.f64 th) (sin.f64 ky))) (*.f64 (sqrt.f64 (-.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))))) #s(literal 1 binary64)))
(/.f64 (neg.f64 (*.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) #s(literal -1 binary64))) (sqrt.f64 (-.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 (neg.f64 (*.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) #s(literal 1 binary64))) (neg.f64 (sqrt.f64 (-.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 (neg.f64 (*.f64 (-.f64 (cos.f64 (-.f64 th ky)) (cos.f64 (+.f64 th ky))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.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)))))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 (-.f64 (cos.f64 (-.f64 th ky)) (cos.f64 (+.f64 th ky))) #s(literal -1 binary64))) (neg.f64 (*.f64 #s(literal 2 binary64) (neg.f64 (sqrt.f64 (-.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 (neg.f64 (*.f64 (-.f64 (cos.f64 (-.f64 th ky)) (cos.f64 (+.f64 th ky))) #s(literal 1 binary64))) (neg.f64 (*.f64 #s(literal 2 binary64) (sqrt.f64 (-.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 (neg.f64 (neg.f64 (*.f64 (neg.f64 (sin.f64 ky)) (sin.f64 th)))) (neg.f64 (sqrt.f64 (-.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 (*.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) #s(literal -1 binary64)) (*.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 (-.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 (*.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) #s(literal -1 binary64)) (neg.f64 (sqrt.f64 (-.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 (*.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) #s(literal 1 binary64)) (*.f64 #s(literal 1 binary64) (sqrt.f64 (-.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 (*.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) #s(literal 1 binary64)) (sqrt.f64 (-.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 (*.f64 (-.f64 (cos.f64 (-.f64 th ky)) (cos.f64 (+.f64 th ky))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.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))))))) #s(literal 2 binary64))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 th ky)) (cos.f64 (+.f64 th ky))) #s(literal -1 binary64)) (*.f64 #s(literal -2 binary64) (sqrt.f64 (-.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 (*.f64 (-.f64 (cos.f64 (-.f64 th ky)) (cos.f64 (+.f64 th ky))) #s(literal -1 binary64)) (*.f64 #s(literal 2 binary64) (neg.f64 (sqrt.f64 (-.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 (*.f64 (-.f64 (cos.f64 (-.f64 th ky)) (cos.f64 (+.f64 th ky))) #s(literal 1 binary64)) (*.f64 #s(literal -2 binary64) (neg.f64 (sqrt.f64 (-.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 (*.f64 (-.f64 (cos.f64 (-.f64 th ky)) (cos.f64 (+.f64 th ky))) #s(literal 1 binary64)) (*.f64 #s(literal 2 binary64) (sqrt.f64 (-.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 (neg.f64 (-.f64 (cos.f64 (-.f64 th ky)) (cos.f64 (+.f64 th ky)))) (neg.f64 (*.f64 #s(literal 2 binary64) (sqrt.f64 (-.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 (neg.f64 (*.f64 (neg.f64 (sin.f64 ky)) (sin.f64 th))) (sqrt.f64 (-.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 (*.f64 (neg.f64 (sin.f64 ky)) (sin.f64 th)) (neg.f64 (sqrt.f64 (-.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 (-.f64 (cos.f64 (-.f64 th ky)) (cos.f64 (+.f64 th ky))) (*.f64 #s(literal 2 binary64) (sqrt.f64 (-.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 (*.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (-.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 binary64) (/.f64 (neg.f64 (sqrt.f64 (-.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 (neg.f64 (sin.f64 ky)) (sin.f64 th))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.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 (sin.f64 th) (sin.f64 ky))))
(134-z0z1z2z3z4 (/.f64 (sin.f64 th) (sqrt.f64 (-.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)))))) (cos.f64 (+.f64 (PI.f64) ky)) #s(literal 0 binary64) (neg.f64 (sin.f64 ky)) #s(literal 1 binary64))
(134-z0z1z2z3z4 (/.f64 (sin.f64 th) (sqrt.f64 (-.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)))))) (cos.f64 ky) #s(literal 0 binary64) (neg.f64 (sin.f64 ky)) #s(literal 1 binary64))
(134-z0z1z2z3z4 (/.f64 (sin.f64 th) (sqrt.f64 (-.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)))))) (neg.f64 (sin.f64 ky)) #s(literal -1 binary64) (cos.f64 ky) #s(literal 0 binary64))
(neg.f64 (*.f64 (/.f64 (neg.f64 (sin.f64 ky)) (sqrt.f64 (-.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)))))) (sin.f64 th)))
(neg.f64 (*.f64 (sin.f64 th) (/.f64 (neg.f64 (sin.f64 ky)) (sqrt.f64 (-.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))))))))
(neg.f64 (/.f64 (*.f64 (neg.f64 (sin.f64 ky)) (sin.f64 th)) (sqrt.f64 (-.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)))))))

eval534.0ms (2.8%)

Memory
29.6MiB live, 1 053.4MiB allocated; 148ms collecting garbage
Samples
296.0ms5 283×0valid
55.0ms605×0invalid
Compiler

Compiled 18 003 to 3 488 computations (80.6% saved)

Precisions
Click to see histograms. Total time spent on operations: 104.0ms
ival-mult!: 81.0ms (77.7% of total)
ival-sub!: 16.0ms (15.4% of total)
adjust: 7.0ms (6.7% of total)

prune112.0ms (0.6%)

Memory
1.6MiB live, 243.4MiB allocated; 20ms collecting garbage
Pruning

24 alts after pruning (23 fresh and 1 done)

PrunedKeptTotal
New52323546
Fresh000
Picked101
Done-110
Total52324547
Accuracy
97.4%
Counts
547 → 24
Alt Table
Click to see full alt table
StatusAccuracyProgram
77.3%
(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (-.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))))))
77.0%
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.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 (sin.f64 th) (sin.f64 ky))))
16.1%
(*.f64 (/.f64 (sin.f64 (+.f64 (neg.f64 ky) (PI.f64))) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 (+.f64 (neg.f64 ky) (PI.f64))) #s(literal 2 binary64))))) (sin.f64 th))
6.8%
(*.f64 (/.f64 (sin.f64 (neg.f64 (+.f64 (PI.f64) ky))) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 (+.f64 (PI.f64) ky))) #s(literal 2 binary64))))) (sin.f64 th))
77.5%
(*.f64 (/.f64 (sin.f64 th) (sqrt.f64 (-.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)))))) (sin.f64 ky))
77.2%
(*.f64 (/.f64 (sin.f64 ky) (/.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (sqrt.f64 #s(literal 2 binary64)))) (sin.f64 th))
77.2%
(*.f64 (/.f64 (sin.f64 ky) (*.f64 (sqrt.f64 (sqrt.f64 (-.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)))))) (sqrt.f64 (sqrt.f64 (-.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)))))))) (sin.f64 th))
77.5%
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.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)))) #s(literal -1 binary64))))) (sin.f64 th))
77.5%
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))))) (sin.f64 th))
81.9%
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (134-z0z1z2z3z4 (neg.f64 (sin.f64 ky)) (sin.f64 ky) #s(literal -1 binary64) (cos.f64 ky) (sin.f64 (neg.f64 (PI.f64))))))) (sin.f64 th))
93.8%
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
86.9%
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))) (sin.f64 th))
45.3%
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (pow.f64 ky #s(literal 2 binary64)))))) (sin.f64 th))
84.6%
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (/.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)))))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
49.7%
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (*.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 (-.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))))) (sin.f64 th))
41.2%
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
41.5%
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 th))
77.2%
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.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 (sin.f64 th) (sin.f64 ky)))
77.4%
(*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.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)))))) (sin.f64 ky)) (sin.f64 th))
77.3%
(*.f64 (neg.f64 (sin.f64 ky)) (*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.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)))))) (sin.f64 th)))
36.6%
(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 th))
41.9%
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
48.2%
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 th (sin.f64 ky)) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
34.8%
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
Samples
57.0ms512×0valid
Compiler

Compiled 1 258 to 909 computations (27.7% saved)

Precisions
Click to see histograms. Total time spent on operations: 10.0ms
ival-mult!: 7.0ms (73.5% of total)
ival-sub!: 2.0ms (21.0% of total)
adjust: 1.0ms (10.5% of total)

series198.0ms (1.0%)

Memory
28.6MiB live, 459.3MiB allocated; 54ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0140913935
Stop Event
iter-limit
Counts
46 → 249
Calls
Call 1
Inputs
ky
(sin.f64 ky)
kx
(sin.f64 kx)
#s(literal 2 binary64)
(pow.f64 (sin.f64 kx) #s(literal 2 binary64))
#s(literal 1/2 binary64)
(+.f64 ky ky)
(cos.f64 (+.f64 ky ky))
(*.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 kx) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))
(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))
th
(sin.f64 th)
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))) (sin.f64 th))
(*.f64 ky (sin.f64 th))
(sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))
(/.f64 (*.f64 ky (sin.f64 th)) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
(+.f64 kx kx)
(cos.f64 (+.f64 kx kx))
(*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))
#s(literal 1 binary64)
(-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))
(*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))
(-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #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 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))
(sqrt.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))))
(/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))))) (sin.f64 th))
(neg.f64 (sin.f64 ky))
#s(literal -1 binary64)
(-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #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 ky ky)) #s(literal 1/2 binary64)) (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))))
(sqrt.f64 (-.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 binary64) (sqrt.f64 (-.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 (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.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)))))) (sin.f64 th))
(*.f64 (neg.f64 (sin.f64 ky)) (*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.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)))))) (sin.f64 th)))
(pow.f64 (-.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)))) #s(literal -1 binary64))
(/.f64 #s(literal 1 binary64) (pow.f64 (-.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)))) #s(literal -1 binary64)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.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)))) #s(literal -1 binary64))))
(/.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.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)))) #s(literal -1 binary64)))))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.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)))) #s(literal -1 binary64))))) (sin.f64 th))
Outputs
#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) (- 1/2 (* (cos (+ ky ky)) 1/2))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))
#s(approx (+ (pow (sin kx) 2) (- 1/2 (* (cos (+ ky ky)) 1/2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (pow.f64 kx #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))
#s(approx (+ (pow (sin kx) 2) (- 1/2 (* (cos (+ ky ky)) 1/2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.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)))))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))
#s(approx (+ (pow (sin kx) 2) (- 1/2 (* (cos (+ ky ky)) 1/2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.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)))))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))
#s(approx (sqrt (+ (pow (sin kx) 2) (- 1/2 (* (cos (+ ky ky)) 1/2)))) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))
#s(approx (sqrt (+ (pow (sin kx) 2) (- 1/2 (* (cos (+ ky ky)) 1/2)))) (+.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 kx #s(literal 2 binary64)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))))
#s(approx (sqrt (+ (pow (sin kx) 2) (- 1/2 (* (cos (+ ky ky)) 1/2)))) (+.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.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 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))))))
#s(approx (sqrt (+ (pow (sin kx) 2) (- 1/2 (* (cos (+ ky ky)) 1/2)))) (+.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 #s(literal 2/45 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (- 1/2 (* (cos (+ ky ky)) 1/2))))) (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (- 1/2 (* (cos (+ ky ky)) 1/2))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 kx #s(literal 2 binary64)) (sin.f64 ky)) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))) (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (- 1/2 (* (cos (+ ky ky)) 1/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 -1/2 binary64) (/.f64 (*.f64 (sin.f64 ky) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 ky) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 5 binary64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 ky) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))))) (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (- 1/2 (* (cos (+ ky ky)) 1/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 -1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 ky) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 ky) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 5 binary64))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (sin.f64 ky) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 5 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 ky) (-.f64 #s(literal 2/45 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 ky) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 ky) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 5 binary64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 ky) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))))) (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (- 1/2 (* (cos (+ ky ky)) 1/2))))) (sin th)) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (- 1/2 (* (cos (+ ky ky)) 1/2))))) (sin th)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 kx #s(literal 2 binary64)) (*.f64 (sin.f64 ky) (sin.f64 th))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (- 1/2 (* (cos (+ ky ky)) 1/2))))) (sin th)) (+.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 -1/2 binary64) (/.f64 (*.f64 (sin.f64 ky) (*.f64 (sin.f64 th) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 5 binary64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))))) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (- 1/2 (* (cos (+ ky ky)) 1/2))))) (sin th)) (+.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 -1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 ky) (*.f64 (sin.f64 th) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 5 binary64))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (sin.f64 ky) (*.f64 (sin.f64 th) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 5 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 ky) (*.f64 (sin.f64 th) (-.f64 #s(literal 2/45 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 ky) (*.f64 (sin.f64 th) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 5 binary64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))))) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))
#s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (*.f64 ky (sin.f64 th)) kx))
#s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 kx #s(literal 2 binary64)) (*.f64 ky (sin.f64 th)))) (*.f64 ky (sin.f64 th))) kx))
#s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (+.f64 (*.f64 ky (sin.f64 th)) (*.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 -1/36 binary64) (*.f64 ky (sin.f64 th))) (*.f64 #s(literal 1/120 binary64) (*.f64 ky (sin.f64 th)))))) (*.f64 #s(literal -1/6 binary64) (*.f64 ky (sin.f64 th)))))) kx))
#s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (+.f64 (*.f64 ky (sin.f64 th)) (*.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 -1/5040 binary64) (*.f64 ky (sin.f64 th))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 ky (sin.f64 th))) (*.f64 #s(literal 1/6 binary64) (+.f64 (*.f64 #s(literal -1/36 binary64) (*.f64 ky (sin.f64 th))) (*.f64 #s(literal 1/120 binary64) (*.f64 ky (sin.f64 th))))))))) (+.f64 (*.f64 #s(literal -1/36 binary64) (*.f64 ky (sin.f64 th))) (*.f64 #s(literal 1/120 binary64) (*.f64 ky (sin.f64 th)))))) (*.f64 #s(literal -1/6 binary64) (*.f64 ky (sin.f64 th)))))) kx))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 kx #s(literal 2 binary64)) (*.f64 (sin.f64 ky) (sin.f64 th))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (+.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 -1/2 binary64) (/.f64 (*.f64 (sin.f64 ky) (*.f64 (sin.f64 th) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 5 binary64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (+.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 -1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 ky) (*.f64 (sin.f64 th) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 5 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (sin.f64 ky) (*.f64 (sin.f64 th) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 5 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 ky) (*.f64 (sin.f64 th) (-.f64 #s(literal 2/45 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 ky) (*.f64 (sin.f64 th) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 5 binary64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
#s(approx (+ kx kx) (*.f64 #s(literal 2 binary64) kx))
#s(approx (cos (+ kx kx)) #s(literal 1 binary64))
#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) #s(literal 1/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 (cos (+ ky ky))) 1/2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))
#s(approx (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2)) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1 binary64) (pow.f64 kx #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))
#s(approx (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2)) (-.f64 (+.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)))) (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))
#s(approx (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2)) (-.f64 (+.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)))) (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))
#s(approx (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 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 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 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 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 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 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 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 (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2)))) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))
#s(approx (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2)))) (+.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 kx #s(literal 2 binary64)) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))))
#s(approx (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2)))) (+.f64 (sqrt.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 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)))))) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))))))
#s(approx (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2)))) (+.f64 (sqrt.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 (*.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 #s(literal 2/45 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)))))) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))))))
#s(approx (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (/.f64 (sin.f64 ky) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
#s(approx (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 kx #s(literal 2 binary64)) (sin.f64 ky)) (pow.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))) (/.f64 (sin.f64 ky) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))
#s(approx (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/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 -1/2 binary64) (/.f64 (*.f64 (sin.f64 ky) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 ky) (pow.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 5 binary64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 ky) (pow.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))))) (/.f64 (sin.f64 ky) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))
#s(approx (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/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 -1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 ky) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 ky) (pow.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 5 binary64))))) (pow.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (sin.f64 ky) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 5 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 ky) (-.f64 #s(literal 2/45 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 ky) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 ky) (pow.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 5 binary64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 ky) (pow.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))))) (/.f64 (sin.f64 ky) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 kx #s(literal 2 binary64)) (*.f64 (sin.f64 ky) (sin.f64 th))) (pow.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (+.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 -1/2 binary64) (/.f64 (*.f64 (sin.f64 ky) (*.f64 (sin.f64 th) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (pow.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 5 binary64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (pow.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))))) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (+.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 -1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 ky) (*.f64 (sin.f64 th) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (pow.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 5 binary64))))) (pow.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (sin.f64 ky) (*.f64 (sin.f64 th) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 5 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 ky) (*.f64 (sin.f64 th) (-.f64 #s(literal 2/45 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 ky) (*.f64 (sin.f64 th) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (pow.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 5 binary64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (pow.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))))) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))
#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 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))
#s(approx (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2)) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 kx #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))
#s(approx (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2)) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))) (*.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 (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2)) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))) (*.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 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
#s(approx (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 kx #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))
#s(approx (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/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 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 5 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))
#s(approx (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/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 -1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 5 binary64))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 #s(literal 2/45 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 5 binary64)))))))) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 5 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))
#s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))
#s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 kx #s(literal 2 binary64)) (sin.f64 th)) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64))))))
#s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (*.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))) (*.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 th) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 5 binary64))))))))))
#s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (*.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))) (*.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 th) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 5 binary64)))) (*.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 (sin.f64 th) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 5 binary64))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (sin.f64 th) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 5 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 th) (-.f64 #s(literal 2/45 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64))))))))))))))
#s(approx (pow (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))) -1) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))
#s(approx (pow (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))) -1) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 kx #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
#s(approx (pow (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))) -1) (+.f64 (*.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 3 binary64))))) (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
#s(approx (pow (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))) -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/45 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 2/3 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 3 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 4 binary64))))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 3 binary64)))))) (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
#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) (- 1/2 (* (cos (+ ky ky)) 1/2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))
#s(approx (sqrt (+ (pow (sin kx) 2) (- 1/2 (* (cos (+ ky ky)) 1/2)))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (- 1/2 (* (cos (+ ky ky)) 1/2))))) (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (- 1/2 (* (cos (+ ky ky)) 1/2))))) (sin th)) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
#s(approx (sqrt (pow (sin kx) 2)) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))
#s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (*.f64 ky (sin.f64 th)) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (+.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 (cos (+ ky ky))) 1/2)) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))) (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))
#s(approx (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 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 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2)))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 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 (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 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 (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 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 (- (* (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 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2)) (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 1/2 binary64)))
#s(approx (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))) (-.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))
#s(approx (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
#s(approx (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))
#s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))))
#s(approx (* (neg (sin ky)) (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th))) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))
#s(approx (pow (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))) -1) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
#s(approx (/ (sin ky) (sqrt (/ 1 (pow (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))) -1)))) (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))
#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 (cos (+ ky ky))) 1/2)) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (*.f64 #s(literal -2 binary64) kx)))) (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))
#s(approx (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 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 (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2)))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 (- (* (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 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2)) (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (*.f64 #s(literal -2 binary64) kx)))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 1/2 binary64)))
#s(approx (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))) (-.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (*.f64 #s(literal -2 binary64) kx)))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))
#s(approx (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (*.f64 #s(literal -2 binary64) kx)))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
#s(approx (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (*.f64 #s(literal -2 binary64) kx)))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))
#s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (*.f64 #s(literal -2 binary64) kx)))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))))
#s(approx (* (neg (sin ky)) (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th))) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (*.f64 #s(literal -2 binary64) kx)))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))
#s(approx (pow (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))) -1) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (*.f64 #s(literal -2 binary64) kx)))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
#s(approx (/ (sin ky) (sqrt (/ 1 (pow (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))) -1)))) (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (*.f64 #s(literal -2 binary64) kx)))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))
#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 (+ 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 (* (cos (+ ky ky)) 1/2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1 binary64) (pow.f64 ky #s(literal 2 binary64)))))
#s(approx (* (cos (+ ky ky)) 1/2) (+.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 (* (cos (+ ky ky)) 1/2) (+.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 (* (cos (+ ky ky)) 1/2)) (pow.f64 ky #s(literal 2 binary64)))
#s(approx (- 1/2 (* (cos (+ ky ky)) 1/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 (- 1/2 (* (cos (+ ky ky)) 1/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 (- 1/2 (* (cos (+ ky ky)) 1/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) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+.f64 (pow.f64 ky #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))
#s(approx (+ (pow (sin kx) 2) (- 1/2 (* (cos (+ ky ky)) 1/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) (- 1/2 (* (cos (+ ky ky)) 1/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 (+ (pow (sin kx) 2) (- 1/2 (* (cos (+ ky ky)) 1/2)))) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 ky #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))))
#s(approx (sqrt (+ (pow (sin kx) 2) (- 1/2 (* (cos (+ ky ky)) 1/2)))) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #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 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))))))
#s(approx (sqrt (+ (pow (sin kx) 2) (- 1/2 (* (cos (+ ky ky)) 1/2)))) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 #s(literal 2/45 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (- 1/2 (* (cos (+ ky ky)) 1/2))))) (/.f64 ky (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (- 1/2 (* (cos (+ ky ky)) 1/2))))) (*.f64 ky (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (- 1/2 (* (cos (+ ky ky)) 1/2))))) (*.f64 ky (+.f64 (*.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (- 1/2 (* (cos (+ ky ky)) 1/2))))) (*.f64 ky (+.f64 (*.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/5040 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 #s(literal 2/45 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/120 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/120 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (- 1/2 (* (cos (+ ky ky)) 1/2))))) (sin th)) (*.f64 ky (+.f64 (*.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (/.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (- 1/2 (* (cos (+ ky ky)) 1/2))))) (sin th)) (*.f64 ky (+.f64 (*.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (*.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 th) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (/.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (- 1/2 (* (cos (+ ky ky)) 1/2))))) (sin th)) (*.f64 ky (+.f64 (*.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (*.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 1/120 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (*.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/5040 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64))))) (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 th) (-.f64 #s(literal 2/45 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/120 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 th) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64))))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 th) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (/.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))))
#s(approx (* ky (sin th)) (*.f64 ky (sin.f64 th)))
#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 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2)) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 ky #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))
#s(approx (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2)) (+.f64 (*.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 1/3 binary64) (pow.f64 ky #s(literal 2 binary64))) #s(literal 1 binary64)))))
#s(approx (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2)) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))) (*.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 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 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 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 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 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 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 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 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 (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2)))) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))
#s(approx (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2)))) (+.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 ky #s(literal 2 binary64)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))
#s(approx (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2)))) (+.f64 (sqrt.f64 (-.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 -1/2 binary64) (/.f64 (*.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))))
#s(approx (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2)))) (+.f64 (sqrt.f64 (-.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 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 #s(literal 2/45 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))))
#s(approx (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (/.f64 ky (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))
#s(approx (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (*.f64 ky (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))
#s(approx (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (*.f64 ky (+.f64 (*.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64))))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))
#s(approx (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (*.f64 ky (+.f64 (*.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/5040 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64)))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 #s(literal 2/45 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/120 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/120 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64))))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 ky (+.f64 (*.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64)))))) (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 ky (+.f64 (*.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (-.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 1/120 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 th) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64)))))) (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 ky (+.f64 (*.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (-.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 (*.f64 #s(literal 1/120 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (-.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 -1/5040 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64))))) (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64)))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 th) (-.f64 #s(literal 2/45 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/120 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 th) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64))))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 th) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64)))))) (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))
#s(approx (neg (sin ky)) (*.f64 #s(literal -1 binary64) ky))
#s(approx (neg (sin ky)) (*.f64 ky (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 ky #s(literal 2 binary64))) #s(literal 1 binary64))))
#s(approx (neg (sin ky)) (*.f64 ky (-.f64 (*.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1/120 binary64) (pow.f64 ky #s(literal 2 binary64))))) #s(literal 1 binary64))))
#s(approx (neg (sin ky)) (*.f64 ky (-.f64 (*.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/5040 binary64) (pow.f64 ky #s(literal 2 binary64))) #s(literal 1/120 binary64))))) #s(literal 1 binary64))))
#s(approx (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))
#s(approx (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 ky #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))
#s(approx (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/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 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 5 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64)))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))
#s(approx (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/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 -1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 5 binary64))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 #s(literal 2/45 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 5 binary64)))))))) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 5 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64)))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))
#s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))
#s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 ky #s(literal 2 binary64)) (sin.f64 th)) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64))))))
#s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (-.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 1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64)))) (*.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 th) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 5 binary64))))))))))
#s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (-.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 1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64)))) (*.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 th) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 5 binary64)))) (*.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 (sin.f64 th) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 5 binary64))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (sin.f64 th) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 5 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 th) (-.f64 #s(literal 2/45 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64))))))))))))))
#s(approx (pow (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))) -1) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))
#s(approx (pow (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))) -1) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 ky #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))
#s(approx (pow (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))) -1) (+.f64 (*.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal 3 binary64))))) (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))
#s(approx (pow (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))) -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/45 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 2/3 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal 3 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal 4 binary64))))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal 3 binary64)))))) (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))
#s(approx (sin ky) (sin.f64 ky))
#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 (neg (sin ky)) (*.f64 #s(literal -1 binary64) (sin.f64 ky)))
#s(approx (cos (+ ky ky)) (cos.f64 (neg.f64 (*.f64 #s(literal -2 binary64) ky))))
#s(approx (* (cos (+ ky ky)) 1/2) (*.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (*.f64 #s(literal -2 binary64) ky)))))
#s(approx (- 1/2 (* (cos (+ ky ky)) 1/2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (*.f64 #s(literal -2 binary64) ky))))))
#s(approx (+ (pow (sin kx) 2) (- 1/2 (* (cos (+ ky ky)) 1/2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (*.f64 #s(literal -2 binary64) ky))))))
#s(approx (sqrt (+ (pow (sin kx) 2) (- 1/2 (* (cos (+ ky ky)) 1/2)))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (*.f64 #s(literal -2 binary64) ky)))))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (- 1/2 (* (cos (+ ky ky)) 1/2))))) (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (*.f64 #s(literal -2 binary64) ky))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (- 1/2 (* (cos (+ ky ky)) 1/2))))) (sin th)) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (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 (cos (+ ky ky))) 1/2) (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (neg.f64 (*.f64 #s(literal -2 binary64) ky))))))
#s(approx (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2)) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))) (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (neg.f64 (*.f64 #s(literal -2 binary64) ky)))))))
#s(approx (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 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 (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2)))) (sqrt.f64 (-.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 (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (/.f64 (sin.f64 ky) (sqrt.f64 (-.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 (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (-.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 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2)) (-.f64 (+.f64 (*.f64 #s(literal 1/2 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(literal 1/2 binary64)))
#s(approx (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))) (-.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/2 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 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/2 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 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/2 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 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/2 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 (* (neg (sin ky)) (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th))) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/2 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 (pow (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))) -1) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/2 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 (/ (sin ky) (sqrt (/ 1 (pow (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))) -1)))) (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/2 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 th th)
#s(approx (sin th) (*.f64 th (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 th #s(literal 2 binary64))))))
#s(approx (sin th) (*.f64 th (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 th #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 th #s(literal 2 binary64))) #s(literal 1/6 binary64))))))
#s(approx (sin th) (*.f64 th (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 th #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 #s(literal 1/120 binary64) (*.f64 #s(literal -1/5040 binary64) (pow.f64 th #s(literal 2 binary64))))) #s(literal 1/6 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (- 1/2 (* (cos (+ ky ky)) 1/2))))) (sin th)) (/.f64 (*.f64 th (sin.f64 ky)) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (- 1/2 (* (cos (+ ky ky)) 1/2))))) (sin th)) (*.f64 th (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (sin.f64 ky)) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (- 1/2 (* (cos (+ ky ky)) 1/2))))) (sin th)) (*.f64 th (+.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (*.f64 #s(literal 1/120 binary64) (/.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (sin.f64 ky)) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))) (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (- 1/2 (* (cos (+ ky ky)) 1/2))))) (sin th)) (*.f64 th (+.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/5040 binary64) (/.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (sin.f64 ky)) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (*.f64 #s(literal 1/120 binary64) (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))))) (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))))
#s(approx (* ky (sin th)) (*.f64 ky th))
#s(approx (* ky (sin th)) (*.f64 th (+.f64 ky (*.f64 #s(literal -1/6 binary64) (*.f64 ky (pow.f64 th #s(literal 2 binary64)))))))
#s(approx (* ky (sin th)) (*.f64 th (+.f64 ky (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/6 binary64) ky) (*.f64 #s(literal 1/120 binary64) (*.f64 ky (pow.f64 th #s(literal 2 binary64)))))))))
#s(approx (* ky (sin th)) (*.f64 th (+.f64 ky (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/6 binary64) ky) (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/5040 binary64) (*.f64 ky (pow.f64 th #s(literal 2 binary64)))) (*.f64 #s(literal 1/120 binary64) ky))))))))
#s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (*.f64 ky th) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
#s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (*.f64 th (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 ky (pow.f64 th #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (/.f64 ky (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))))
#s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (*.f64 th (+.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 ky (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (*.f64 #s(literal 1/120 binary64) (/.f64 (*.f64 ky (pow.f64 th #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))))) (/.f64 ky (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))))
#s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (*.f64 th (+.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 ky (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/5040 binary64) (/.f64 (*.f64 ky (pow.f64 th #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (*.f64 #s(literal 1/120 binary64) (/.f64 ky (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))))))) (/.f64 ky (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 th (sin.f64 ky)) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 th (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (sin.f64 ky)) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 th (+.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/120 binary64) (/.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (sin.f64 ky)) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))))) (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 th (+.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/5040 binary64) (/.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (sin.f64 ky)) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/120 binary64) (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))))))) (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 (*.f64 th (sin.f64 ky)) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 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 (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 th (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (sin.f64 ky)) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 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 (sin.f64 ky) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 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 (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 th (+.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 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/120 binary64) (/.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (sin.f64 ky)) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 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 (sin.f64 ky) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 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 (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 th (+.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 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 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/5040 binary64) (/.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (sin.f64 ky)) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 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/120 binary64) (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 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 (sin.f64 ky) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 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/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (*.f64 #s(literal -1 binary64) (/.f64 th (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))))
#s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (*.f64 th (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 th #s(literal 2 binary64)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))))
#s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (*.f64 th (-.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/120 binary64) (/.f64 (pow.f64 th #s(literal 2 binary64)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))) (*.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))))
#s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (*.f64 th (-.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/5040 binary64) (/.f64 (pow.f64 th #s(literal 2 binary64)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))) (*.f64 #s(literal 1/120 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))))) (*.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))))
#s(approx (* (neg (sin ky)) (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th))) (/.f64 (*.f64 th (sin.f64 ky)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))
#s(approx (* (neg (sin ky)) (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th))) (*.f64 th (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (sin.f64 ky)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))) (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))))
#s(approx (* (neg (sin ky)) (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th))) (*.f64 th (+.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))) (*.f64 #s(literal 1/120 binary64) (/.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (sin.f64 ky)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))))) (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))))
#s(approx (* (neg (sin ky)) (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th))) (*.f64 th (+.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))) (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/5040 binary64) (/.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (sin.f64 ky)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))) (*.f64 #s(literal 1/120 binary64) (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))))))) (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))))
#s(approx (sin th) (sin.f64 th))
Calls

9 calls:

TimeVariablePoint
22.0ms
kx
0
21.0ms
kx
-inf
16.0ms
ky
-inf
15.0ms
th
inf
14.0ms
ky
0

rewrite323.0ms (1.7%)

Memory
-14.4MiB live, 711.1MiB allocated; 93ms collecting garbage
Iterations

Useful iterations: 1 (0.0ms)

IterNodesCost
055516
094449
1428343
21643343
04360343
Stop Event
iter-limit
node-limit
iter-limit
Counts
46 → 1 468
Calls
Call 1
Inputs
ky
(sin.f64 ky)
kx
(sin.f64 kx)
#s(literal 2 binary64)
(pow.f64 (sin.f64 kx) #s(literal 2 binary64))
#s(literal 1/2 binary64)
(+.f64 ky ky)
(cos.f64 (+.f64 ky ky))
(*.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 kx) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))
(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))
th
(sin.f64 th)
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))) (sin.f64 th))
(*.f64 ky (sin.f64 th))
(sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))
(/.f64 (*.f64 ky (sin.f64 th)) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
(+.f64 kx kx)
(cos.f64 (+.f64 kx kx))
(*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))
#s(literal 1 binary64)
(-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))
(*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))
(-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #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 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))
(sqrt.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))))
(/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))))) (sin.f64 th))
(neg.f64 (sin.f64 ky))
#s(literal -1 binary64)
(-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #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 ky ky)) #s(literal 1/2 binary64)) (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))))
(sqrt.f64 (-.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 binary64) (sqrt.f64 (-.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 (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.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)))))) (sin.f64 th))
(*.f64 (neg.f64 (sin.f64 ky)) (*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.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)))))) (sin.f64 th)))
(pow.f64 (-.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)))) #s(literal -1 binary64))
(/.f64 #s(literal 1 binary64) (pow.f64 (-.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)))) #s(literal -1 binary64)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.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)))) #s(literal -1 binary64))))
(/.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.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)))) #s(literal -1 binary64)))))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.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)))) #s(literal -1 binary64))))) (sin.f64 th))
Outputs
ky
(sin.f64 ky)
kx
(sin.f64 kx)
#s(literal 2 binary64)
(*.f64 (neg.f64 (neg.f64 (sin.f64 kx))) (neg.f64 (neg.f64 (sin.f64 kx))))
(*.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 (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 (neg.f64 (sin.f64 kx)) (neg.f64 (sin.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 (neg.f64 (fabs.f64 (sin.f64 kx))) (neg.f64 (fabs.f64 (sin.f64 kx))))
(*.f64 (fabs.f64 (sin.f64 kx)) (fabs.f64 (sin.f64 kx)))
(*.f64 (sin.f64 kx) (sin.f64 kx))
(pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 2 binary64))
(pow.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)))) #s(literal 1/2 binary64))
(pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 2 binary64))
(pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 1 binary64))
(pow.f64 (sin.f64 kx) #s(literal 2 binary64))
(/.f64 (+.f64 (pow.f64 (neg.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 (neg.f64 (*.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 (*.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (neg.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 1/2 binary64)))))
(/.f64 (+.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.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 (neg.f64 (cos.f64 (+.f64 kx kx))) #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 (neg.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 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 3 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))) (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))))))
(/.f64 (+.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 3 binary64)) (pow.f64 (neg.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 (neg.f64 (*.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 #s(literal 1/2 binary64) (neg.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))))
(/.f64 (neg.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 (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 #s(literal 1 binary64) (pow.f64 (sin.f64 kx) #s(literal -2 binary64)))
(neg.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 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)))
(sqrt.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)))))
(fabs.f64 (*.f64 (neg.f64 (fabs.f64 (sin.f64 kx))) (fabs.f64 (sin.f64 kx))))
(fabs.f64 (*.f64 (neg.f64 (fabs.f64 (sin.f64 kx))) (sin.f64 kx)))
(fabs.f64 (*.f64 (fabs.f64 (sin.f64 kx)) (neg.f64 (fabs.f64 (sin.f64 kx)))))
(fabs.f64 (*.f64 (fabs.f64 (sin.f64 kx)) (sin.f64 kx)))
(fabs.f64 (*.f64 (sin.f64 kx) (neg.f64 (fabs.f64 (sin.f64 kx)))))
(fabs.f64 (*.f64 (sin.f64 kx) (fabs.f64 (sin.f64 kx))))
(fabs.f64 (-.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 (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))))
#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 #s(literal 2 binary64) ky)
(*.f64 ky #s(literal 2 binary64))
(/.f64 (+.f64 (pow.f64 ky #s(literal 3 binary64)) (pow.f64 (neg.f64 (neg.f64 ky)) #s(literal 3 binary64))) (+.f64 (*.f64 ky ky) (-.f64 (*.f64 (neg.f64 (neg.f64 ky)) (neg.f64 (neg.f64 ky))) (*.f64 ky (neg.f64 (neg.f64 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 (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 (pow.f64 (*.f64 (sin.f64 (+.f64 ky ky)) #s(literal 0 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (sin.f64 (+.f64 ky ky)) #s(literal 0 binary64)) (*.f64 (sin.f64 (+.f64 ky ky)) #s(literal 0 binary64))) (-.f64 (*.f64 (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 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 (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 #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 (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/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 (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 (-.f64 (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (-.f64 ky ky))) (-.f64 (cos.f64 (-.f64 ky ky)) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (-.f64 ky ky))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 ky ky)) (cos.f64 (+.f64 ky ky))))) #s(literal 4 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 #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))))) (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 #s(literal 1/2 binary64) (*.f64 (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 #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 #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 (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 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (neg.f64 ky)))
(sin.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) ky))
(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 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 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 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (*.f64 (sin.f64 ky) (neg.f64 (neg.f64 (sin.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/2 binary64))))
(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 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) (+.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))) (*.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/2 binary64))) (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))
(*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (fabs.f64 (fabs.f64 (cos.f64 ky))) (fabs.f64 (fabs.f64 (cos.f64 ky))) (fabs.f64 (fabs.f64 (sin.f64 ky))) (fabs.f64 (fabs.f64 (sin.f64 ky))))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (fabs.f64 (fabs.f64 (cos.f64 ky))) (fabs.f64 (fabs.f64 (cos.f64 ky))) (neg.f64 (fabs.f64 (sin.f64 ky))) (neg.f64 (fabs.f64 (sin.f64 ky))))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (fabs.f64 (fabs.f64 (cos.f64 ky))) (fabs.f64 (fabs.f64 (cos.f64 ky))) (sin.f64 (fabs.f64 ky)) (sin.f64 (fabs.f64 ky)))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (fabs.f64 (fabs.f64 (cos.f64 ky))) (fabs.f64 (fabs.f64 (cos.f64 ky))) (neg.f64 (neg.f64 (sin.f64 ky))) (neg.f64 (neg.f64 (sin.f64 ky))))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (fabs.f64 (fabs.f64 (cos.f64 ky))) (fabs.f64 (fabs.f64 (cos.f64 ky))) (fabs.f64 (sin.f64 ky)) (fabs.f64 (sin.f64 ky)))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (fabs.f64 (fabs.f64 (cos.f64 ky))) (fabs.f64 (fabs.f64 (cos.f64 ky))) (neg.f64 (sin.f64 ky)) (neg.f64 (sin.f64 ky)))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (fabs.f64 (fabs.f64 (cos.f64 ky))) (fabs.f64 (fabs.f64 (cos.f64 ky))) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (fabs.f64 (fabs.f64 (cos.f64 ky))) (fabs.f64 (fabs.f64 (cos.f64 ky))) #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (fabs.f64 (fabs.f64 (cos.f64 ky))) (fabs.f64 (fabs.f64 (cos.f64 ky))) (sin.f64 ky) (neg.f64 (neg.f64 (sin.f64 ky))))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (fabs.f64 (fabs.f64 (cos.f64 ky))) (fabs.f64 (fabs.f64 (cos.f64 ky))) (sin.f64 ky) (sin.f64 ky))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (neg.f64 (fabs.f64 (cos.f64 ky))) (neg.f64 (fabs.f64 (cos.f64 ky))) (fabs.f64 (fabs.f64 (sin.f64 ky))) (fabs.f64 (fabs.f64 (sin.f64 ky))))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (neg.f64 (fabs.f64 (cos.f64 ky))) (neg.f64 (fabs.f64 (cos.f64 ky))) (neg.f64 (fabs.f64 (sin.f64 ky))) (neg.f64 (fabs.f64 (sin.f64 ky))))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (neg.f64 (fabs.f64 (cos.f64 ky))) (neg.f64 (fabs.f64 (cos.f64 ky))) (sin.f64 (fabs.f64 ky)) (sin.f64 (fabs.f64 ky)))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (neg.f64 (fabs.f64 (cos.f64 ky))) (neg.f64 (fabs.f64 (cos.f64 ky))) (neg.f64 (neg.f64 (sin.f64 ky))) (neg.f64 (neg.f64 (sin.f64 ky))))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (neg.f64 (fabs.f64 (cos.f64 ky))) (neg.f64 (fabs.f64 (cos.f64 ky))) (fabs.f64 (sin.f64 ky)) (fabs.f64 (sin.f64 ky)))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (neg.f64 (fabs.f64 (cos.f64 ky))) (neg.f64 (fabs.f64 (cos.f64 ky))) (neg.f64 (sin.f64 ky)) (neg.f64 (sin.f64 ky)))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (neg.f64 (fabs.f64 (cos.f64 ky))) (neg.f64 (fabs.f64 (cos.f64 ky))) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (neg.f64 (fabs.f64 (cos.f64 ky))) (neg.f64 (fabs.f64 (cos.f64 ky))) #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (neg.f64 (fabs.f64 (cos.f64 ky))) (neg.f64 (fabs.f64 (cos.f64 ky))) (sin.f64 ky) (neg.f64 (neg.f64 (sin.f64 ky))))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (neg.f64 (fabs.f64 (cos.f64 ky))) (neg.f64 (fabs.f64 (cos.f64 ky))) (sin.f64 ky) (sin.f64 ky))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (neg.f64 (neg.f64 (cos.f64 ky))) (neg.f64 (neg.f64 (cos.f64 ky))) (fabs.f64 (fabs.f64 (sin.f64 ky))) (fabs.f64 (fabs.f64 (sin.f64 ky))))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (neg.f64 (neg.f64 (cos.f64 ky))) (neg.f64 (neg.f64 (cos.f64 ky))) (neg.f64 (fabs.f64 (sin.f64 ky))) (neg.f64 (fabs.f64 (sin.f64 ky))))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (neg.f64 (neg.f64 (cos.f64 ky))) (neg.f64 (neg.f64 (cos.f64 ky))) (sin.f64 (fabs.f64 ky)) (sin.f64 (fabs.f64 ky)))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (neg.f64 (neg.f64 (cos.f64 ky))) (neg.f64 (neg.f64 (cos.f64 ky))) (neg.f64 (neg.f64 (sin.f64 ky))) (neg.f64 (neg.f64 (sin.f64 ky))))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (neg.f64 (neg.f64 (cos.f64 ky))) (neg.f64 (neg.f64 (cos.f64 ky))) (fabs.f64 (sin.f64 ky)) (fabs.f64 (sin.f64 ky)))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (neg.f64 (neg.f64 (cos.f64 ky))) (neg.f64 (neg.f64 (cos.f64 ky))) (neg.f64 (sin.f64 ky)) (neg.f64 (sin.f64 ky)))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (neg.f64 (neg.f64 (cos.f64 ky))) (neg.f64 (neg.f64 (cos.f64 ky))) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (neg.f64 (neg.f64 (cos.f64 ky))) (neg.f64 (neg.f64 (cos.f64 ky))) #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (neg.f64 (neg.f64 (cos.f64 ky))) (neg.f64 (neg.f64 (cos.f64 ky))) (sin.f64 ky) (neg.f64 (neg.f64 (sin.f64 ky))))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (neg.f64 (neg.f64 (cos.f64 ky))) (neg.f64 (neg.f64 (cos.f64 ky))) (sin.f64 ky) (sin.f64 ky))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (sin.f64 (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky))) (sin.f64 (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky))) (fabs.f64 (fabs.f64 (sin.f64 ky))) (fabs.f64 (fabs.f64 (sin.f64 ky))))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (sin.f64 (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky))) (sin.f64 (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky))) (neg.f64 (fabs.f64 (sin.f64 ky))) (neg.f64 (fabs.f64 (sin.f64 ky))))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (sin.f64 (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky))) (sin.f64 (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky))) (sin.f64 (fabs.f64 ky)) (sin.f64 (fabs.f64 ky)))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (sin.f64 (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky))) (sin.f64 (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky))) (neg.f64 (neg.f64 (sin.f64 ky))) (neg.f64 (neg.f64 (sin.f64 ky))))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (sin.f64 (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky))) (sin.f64 (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky))) (fabs.f64 (sin.f64 ky)) (fabs.f64 (sin.f64 ky)))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (sin.f64 (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky))) (sin.f64 (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky))) (neg.f64 (sin.f64 ky)) (neg.f64 (sin.f64 ky)))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (sin.f64 (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky))) (sin.f64 (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky))) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (sin.f64 (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky))) (sin.f64 (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky))) #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (sin.f64 (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky))) (sin.f64 (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky))) (sin.f64 ky) (neg.f64 (neg.f64 (sin.f64 ky))))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (sin.f64 (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky))) (sin.f64 (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky))) (sin.f64 ky) (sin.f64 ky))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (fabs.f64 (cos.f64 ky)) (fabs.f64 (cos.f64 ky)) (fabs.f64 (fabs.f64 (sin.f64 ky))) (fabs.f64 (fabs.f64 (sin.f64 ky))))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (fabs.f64 (cos.f64 ky)) (fabs.f64 (cos.f64 ky)) (neg.f64 (fabs.f64 (sin.f64 ky))) (neg.f64 (fabs.f64 (sin.f64 ky))))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (fabs.f64 (cos.f64 ky)) (fabs.f64 (cos.f64 ky)) (sin.f64 (fabs.f64 ky)) (sin.f64 (fabs.f64 ky)))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (fabs.f64 (cos.f64 ky)) (fabs.f64 (cos.f64 ky)) (neg.f64 (neg.f64 (sin.f64 ky))) (neg.f64 (neg.f64 (sin.f64 ky))))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (fabs.f64 (cos.f64 ky)) (fabs.f64 (cos.f64 ky)) (fabs.f64 (sin.f64 ky)) (fabs.f64 (sin.f64 ky)))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (fabs.f64 (cos.f64 ky)) (fabs.f64 (cos.f64 ky)) (neg.f64 (sin.f64 ky)) (neg.f64 (sin.f64 ky)))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (fabs.f64 (cos.f64 ky)) (fabs.f64 (cos.f64 ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (fabs.f64 (cos.f64 ky)) (fabs.f64 (cos.f64 ky)) #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (fabs.f64 (cos.f64 ky)) (fabs.f64 (cos.f64 ky)) (sin.f64 ky) (neg.f64 (neg.f64 (sin.f64 ky))))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (fabs.f64 (cos.f64 ky)) (fabs.f64 (cos.f64 ky)) (sin.f64 ky) (sin.f64 ky))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (neg.f64 (cos.f64 ky)) (neg.f64 (cos.f64 ky)) (fabs.f64 (fabs.f64 (sin.f64 ky))) (fabs.f64 (fabs.f64 (sin.f64 ky))))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (neg.f64 (cos.f64 ky)) (neg.f64 (cos.f64 ky)) (neg.f64 (fabs.f64 (sin.f64 ky))) (neg.f64 (fabs.f64 (sin.f64 ky))))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (neg.f64 (cos.f64 ky)) (neg.f64 (cos.f64 ky)) (sin.f64 (fabs.f64 ky)) (sin.f64 (fabs.f64 ky)))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (neg.f64 (cos.f64 ky)) (neg.f64 (cos.f64 ky)) (neg.f64 (neg.f64 (sin.f64 ky))) (neg.f64 (neg.f64 (sin.f64 ky))))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (neg.f64 (cos.f64 ky)) (neg.f64 (cos.f64 ky)) (fabs.f64 (sin.f64 ky)) (fabs.f64 (sin.f64 ky)))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (neg.f64 (cos.f64 ky)) (neg.f64 (cos.f64 ky)) (neg.f64 (sin.f64 ky)) (neg.f64 (sin.f64 ky)))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (neg.f64 (cos.f64 ky)) (neg.f64 (cos.f64 ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (neg.f64 (cos.f64 ky)) (neg.f64 (cos.f64 ky)) #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (neg.f64 (cos.f64 ky)) (neg.f64 (cos.f64 ky)) (sin.f64 ky) (neg.f64 (neg.f64 (sin.f64 ky))))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (neg.f64 (cos.f64 ky)) (neg.f64 (cos.f64 ky)) (sin.f64 ky) (sin.f64 ky))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (sin.f64 (+.f64 ky ky)) #s(literal 0 binary64) (cos.f64 (+.f64 ky ky)) (sin.f64 (neg.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (cos.f64 ky) (cos.f64 ky) (fabs.f64 (fabs.f64 (sin.f64 ky))) (fabs.f64 (fabs.f64 (sin.f64 ky))))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (cos.f64 ky) (cos.f64 ky) (neg.f64 (fabs.f64 (sin.f64 ky))) (neg.f64 (fabs.f64 (sin.f64 ky))))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (cos.f64 ky) (cos.f64 ky) (sin.f64 (fabs.f64 ky)) (sin.f64 (fabs.f64 ky)))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (cos.f64 ky) (cos.f64 ky) (neg.f64 (neg.f64 (sin.f64 ky))) (neg.f64 (neg.f64 (sin.f64 ky))))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (cos.f64 ky) (cos.f64 ky) (fabs.f64 (sin.f64 ky)) (fabs.f64 (sin.f64 ky)))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (cos.f64 ky) (cos.f64 ky) (neg.f64 (sin.f64 ky)) (neg.f64 (sin.f64 ky)))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (cos.f64 ky) (cos.f64 ky) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (cos.f64 ky) (cos.f64 ky) #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (cos.f64 ky) (cos.f64 ky) (sin.f64 ky) (neg.f64 (neg.f64 (sin.f64 ky))))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (cos.f64 ky) (cos.f64 ky) (sin.f64 ky) (sin.f64 ky))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (sin.f64 ky) (cos.f64 (-.f64 (neg.f64 ky) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (cos.f64 ky) (sin.f64 (-.f64 (neg.f64 ky) (*.f64 (PI.f64) #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 (sin.f64 (fabs.f64 ky)) (sin.f64 (fabs.f64 ky)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))
(*.f64 (neg.f64 (neg.f64 (sin.f64 ky))) (neg.f64 (neg.f64 (sin.f64 ky))))
(*.f64 (fabs.f64 (sin.f64 ky)) (fabs.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 (neg.f64 (sin.f64 ky)) (neg.f64 (sin.f64 ky)))
(*.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 ky ky))))
(*.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 (+.f64 (pow.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 3 binary64)) (pow.f64 #s(literal 1/2 binary64) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))) (-.f64 (*.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 #s(literal -1/2 binary64) (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 (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 3 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (+.f64 (*.f64 (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))) (*.f64 #s(literal 1/2 binary64) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))))))
(/.f64 (-.f64 (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64)) (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (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 #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) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))))
(/.f64 (-.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (-.f64 ky ky)))) #s(literal 2 binary64))
(/.f64 (-.f64 #s(literal 2 binary64) (*.f64 #s(literal 1 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (-.f64 ky ky))))) #s(literal 2 binary64))
(/.f64 (-.f64 #s(literal 4 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (-.f64 ky ky))))) #s(literal 4 binary64))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 ky ky)) (cos.f64 (+.f64 ky ky)))) #s(literal -2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)) (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)))) (cos.f64 (-.f64 (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)) (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)) (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)))) (cos.f64 (-.f64 (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)) (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky))) (cos.f64 (-.f64 (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)) (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)))) (cos.f64 (-.f64 (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)) (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)) (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)))) (cos.f64 (-.f64 (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)) (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky))) (cos.f64 (-.f64 (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)))) (cos.f64 (-.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)))) (cos.f64 (-.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky))))) #s(literal 2 binary64))
(/.f64 (+.f64 (neg.f64 (cos.f64 (+.f64 ky ky))) (cos.f64 (-.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 ky))) (cos.f64 (+.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 ky)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (PI.f64) ky))) (cos.f64 (+.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (PI.f64) ky)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (neg.f64 ky) (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (neg.f64 ky) (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (neg.f64 ky) (neg.f64 ky))) (cos.f64 (+.f64 ky ky))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (neg.f64 ky) (+.f64 (PI.f64) ky))) (cos.f64 (+.f64 (neg.f64 ky) (+.f64 (PI.f64) ky)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (PI.f64) ky) (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (+.f64 (PI.f64) ky) (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (PI.f64) ky) (neg.f64 ky))) (cos.f64 (+.f64 (+.f64 (PI.f64) ky) (neg.f64 ky)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (PI.f64) ky) (+.f64 (PI.f64) ky))) (cos.f64 (+.f64 (+.f64 (PI.f64) ky) (+.f64 (PI.f64) ky)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)))) (sin.f64 (+.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)))) (sin.f64 (+.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky))) (sin.f64 (+.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (neg.f64 ky) (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)))) (sin.f64 (+.f64 (neg.f64 ky) (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (neg.f64 ky) (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)))) (sin.f64 (+.f64 (neg.f64 ky) (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky))))) #s(literal 2 binary64))
(/.f64 (+.f64 (neg.f64 (cos.f64 (+.f64 ky ky))) (sin.f64 (+.f64 (neg.f64 ky) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (PI.f64) ky) (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)))) (sin.f64 (+.f64 (+.f64 (PI.f64) ky) (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (PI.f64) ky) (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)))) (sin.f64 (+.f64 (+.f64 (PI.f64) ky) (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (PI.f64) ky) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky))) (sin.f64 (+.f64 (+.f64 (PI.f64) ky) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (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 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 3 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))) (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))))))
(/.f64 (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)))
(134-z0z1z2z3z4 (neg.f64 (sin.f64 ky)) (cos.f64 ky) #s(literal 0 binary64) (sin.f64 ky) #s(literal 1 binary64))
(134-z0z1z2z3z4 (neg.f64 (sin.f64 ky)) #s(literal 0 binary64) (cos.f64 ky) #s(literal 1 binary64) (sin.f64 ky))
(134-z0z1z2z3z4 (neg.f64 (sin.f64 ky)) (sin.f64 ky) #s(literal -1 binary64) (cos.f64 ky) (sin.f64 (neg.f64 (PI.f64))))
(neg.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))
(-.f64 (/.f64 (cos.f64 (-.f64 ky ky)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 ky ky)) #s(literal 2 binary64)))
(-.f64 #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/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (PI.f64) ky)))))
(-.f64 #s(literal 1/2 binary64) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))))
(-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))
(fabs.f64 (-.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 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))
(*.f64 (pow.f64 #s(literal 1 binary64) #s(literal -1 binary64)) (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))
(*.f64 (pow.f64 #s(literal -1 binary64) #s(literal 1 binary64)) (pow.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))) #s(literal 1 binary64)))
(*.f64 (pow.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal 1/2 binary64))) #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/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 #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 (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 #s(literal 1 binary64) (/.f64 (*.f64 (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/2 binary64))) #s(literal -1/2 binary64)))) (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal -1/2 binary64)))
(*.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 (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 (/.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64))))
(*.f64 (pow.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))))
(*.f64 (+.f64 #s(literal 1 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 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 binary64) (/.f64 (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))
(*.f64 (neg.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))) (neg.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))))
(*.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))
(*.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))) (pow.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))) #s(literal 0 binary64)))
(*.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))) (pow.f64 #s(literal 1 binary64) #s(literal 1 binary64)))
(*.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))) #s(literal 1 binary64))
(*.f64 #s(literal -1 binary64) (/.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))) #s(literal 1 binary64)))
(*.f64 #s(literal -1 binary64) (*.f64 #s(literal -1 binary64) (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))
(*.f64 #s(literal 1 binary64) (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))
(pow.f64 (*.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))) (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(pow.f64 (/.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))) #s(literal -1 binary64))
(pow.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))) #s(literal 2 binary64))
(pow.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))) #s(literal 1 binary64))
(/.f64 (+.f64 (pow.f64 (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal -1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 3 binary64))) (+.f64 (*.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 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal -1/2 binary64))) (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))) (*.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 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))))))
(/.f64 (+.f64 (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal 3 binary64)) (pow.f64 #s(literal 1/2 binary64) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))) (-.f64 (*.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (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 (*.f64 #s(literal -1/2 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/2 binary64) #s(literal 1/2 binary64)) (-.f64 (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (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) (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/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (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 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #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 (-.f64 #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)) #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 (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))
(/.f64 (-.f64 (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal 3 binary64)) (pow.f64 #s(literal -1/2 binary64) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) #s(literal -1/2 binary64)) (*.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal -1/2 binary64)))))
(/.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 (neg.f64 (sin.f64 kx)) (sin.f64 kx)) #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 (neg.f64 (sin.f64 kx)) (sin.f64 kx)) (*.f64 (neg.f64 (sin.f64 kx)) (sin.f64 kx))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (*.f64 (neg.f64 (sin.f64 kx)) (sin.f64 kx))))))
(/.f64 (+.f64 (-.f64 (cos.f64 (-.f64 ky ky)) (cos.f64 (+.f64 ky ky))) (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx)))) #s(literal 2 binary64))
(/.f64 (+.f64 (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx))) (-.f64 (cos.f64 (-.f64 ky ky)) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (-.f64 (cos.f64 (-.f64 ky ky)) (cos.f64 (+.f64 ky ky))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx))))) #s(literal 4 binary64))
(/.f64 (+.f64 (*.f64 (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 ky ky)) (cos.f64 (+.f64 ky ky))))) #s(literal 4 binary64))
(/.f64 (*.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))) #s(literal 2 binary64)) #s(literal 2 binary64))
(/.f64 (*.f64 #s(literal 2 binary64) (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))) #s(literal 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 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) #s(literal -1 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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal -1 binary64))
(/.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))) #s(literal -1 binary64))
(/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))))
(/.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 #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 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))
(/.f64 (-.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 (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 (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 (-.f64 (*.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 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #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 (-.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 ky ky)) #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 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 (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 (+.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal 3 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 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 #s(literal 1/2 binary64) (*.f64 (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 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/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 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))))
(/.f64 (-.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 (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 (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 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 (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 (-.f64 (pow.f64 (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #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 (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal -1/2 binary64)) (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #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 (-.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 ky ky)) #s(literal 1/2 binary64))))))
(/.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 ky ky)))) #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 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 (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 -2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))) #s(literal 2 binary64)))
(/.f64 #s(literal -2 binary64) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))
(/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)) #s(literal -1 binary64))
(/.f64 (-.f64 (*.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 (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 #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 ky ky)) #s(literal 1/2 binary64)))))
(/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))
(/.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 (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 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 (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 #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 ky ky)) #s(literal 1/2 binary64)))))))
(/.f64 (-.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 3 binary64)) (pow.f64 (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (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 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))))
(/.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))) #s(literal 1 binary64))
(/.f64 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))) #s(literal -1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))
(/.f64 #s(literal 2 binary64) (*.f64 (/.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))
(134-z0z1z2z3z4 #s(literal 1 binary64) (fabs.f64 (fabs.f64 (sin.f64 ky))) (fabs.f64 (fabs.f64 (sin.f64 ky))) (neg.f64 (sin.f64 kx)) (sin.f64 kx))
(134-z0z1z2z3z4 #s(literal 1 binary64) (neg.f64 (neg.f64 (sin.f64 kx))) (neg.f64 (neg.f64 (sin.f64 kx))) #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))
(134-z0z1z2z3z4 #s(literal 1 binary64) (neg.f64 (neg.f64 (sin.f64 kx))) (neg.f64 (neg.f64 (sin.f64 kx))) (-.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(134-z0z1z2z3z4 #s(literal 1 binary64) (neg.f64 (neg.f64 (sin.f64 kx))) (neg.f64 (neg.f64 (sin.f64 kx))) (neg.f64 (sin.f64 ky)) (sin.f64 ky))
(134-z0z1z2z3z4 #s(literal 1 binary64) (neg.f64 (neg.f64 (sin.f64 kx))) (neg.f64 (neg.f64 (sin.f64 kx))) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal -1/2 binary64))
(134-z0z1z2z3z4 #s(literal 1 binary64) (neg.f64 (neg.f64 (sin.f64 kx))) (neg.f64 (neg.f64 (sin.f64 kx))) #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64)))
(134-z0z1z2z3z4 #s(literal 1 binary64) (neg.f64 (neg.f64 (sin.f64 kx))) (neg.f64 (neg.f64 (sin.f64 kx))) (sin.f64 ky) (neg.f64 (sin.f64 ky)))
(134-z0z1z2z3z4 #s(literal 1 binary64) (neg.f64 (fabs.f64 (sin.f64 ky))) (neg.f64 (fabs.f64 (sin.f64 ky))) (neg.f64 (sin.f64 kx)) (sin.f64 kx))
(134-z0z1z2z3z4 #s(literal 1 binary64) (sin.f64 (fabs.f64 kx)) (sin.f64 (fabs.f64 kx)) #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))
(134-z0z1z2z3z4 #s(literal 1 binary64) (sin.f64 (fabs.f64 kx)) (sin.f64 (fabs.f64 kx)) (-.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(134-z0z1z2z3z4 #s(literal 1 binary64) (sin.f64 (fabs.f64 kx)) (sin.f64 (fabs.f64 kx)) (neg.f64 (sin.f64 ky)) (sin.f64 ky))
(134-z0z1z2z3z4 #s(literal 1 binary64) (sin.f64 (fabs.f64 kx)) (sin.f64 (fabs.f64 kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal -1/2 binary64))
(134-z0z1z2z3z4 #s(literal 1 binary64) (sin.f64 (fabs.f64 kx)) (sin.f64 (fabs.f64 kx)) #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64)))
(134-z0z1z2z3z4 #s(literal 1 binary64) (sin.f64 (fabs.f64 kx)) (sin.f64 (fabs.f64 kx)) (sin.f64 ky) (neg.f64 (sin.f64 ky)))
(134-z0z1z2z3z4 #s(literal 1 binary64) (sin.f64 (fabs.f64 ky)) (sin.f64 (fabs.f64 ky)) (neg.f64 (sin.f64 kx)) (sin.f64 kx))
(134-z0z1z2z3z4 #s(literal 1 binary64) (neg.f64 (neg.f64 (sin.f64 ky))) (neg.f64 (neg.f64 (sin.f64 ky))) (neg.f64 (sin.f64 kx)) (sin.f64 kx))
(134-z0z1z2z3z4 #s(literal 1 binary64) (fabs.f64 (sin.f64 ky)) (fabs.f64 (sin.f64 ky)) (neg.f64 (sin.f64 kx)) (sin.f64 kx))
(134-z0z1z2z3z4 #s(literal 1 binary64) (neg.f64 (sin.f64 kx)) (neg.f64 (sin.f64 kx)) #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))
(134-z0z1z2z3z4 #s(literal 1 binary64) (neg.f64 (sin.f64 kx)) (neg.f64 (sin.f64 kx)) (-.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(134-z0z1z2z3z4 #s(literal 1 binary64) (neg.f64 (sin.f64 kx)) (neg.f64 (sin.f64 kx)) (neg.f64 (sin.f64 ky)) (sin.f64 ky))
(134-z0z1z2z3z4 #s(literal 1 binary64) (neg.f64 (sin.f64 kx)) (neg.f64 (sin.f64 kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal -1/2 binary64))
(134-z0z1z2z3z4 #s(literal 1 binary64) (neg.f64 (sin.f64 kx)) (neg.f64 (sin.f64 kx)) #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64)))
(134-z0z1z2z3z4 #s(literal 1 binary64) (neg.f64 (sin.f64 kx)) (neg.f64 (sin.f64 kx)) (sin.f64 ky) (neg.f64 (sin.f64 ky)))
(134-z0z1z2z3z4 #s(literal 1 binary64) (neg.f64 (fabs.f64 (sin.f64 kx))) (neg.f64 (fabs.f64 (sin.f64 kx))) #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))
(134-z0z1z2z3z4 #s(literal 1 binary64) (neg.f64 (fabs.f64 (sin.f64 kx))) (neg.f64 (fabs.f64 (sin.f64 kx))) (-.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(134-z0z1z2z3z4 #s(literal 1 binary64) (neg.f64 (fabs.f64 (sin.f64 kx))) (neg.f64 (fabs.f64 (sin.f64 kx))) (neg.f64 (sin.f64 ky)) (sin.f64 ky))
(134-z0z1z2z3z4 #s(literal 1 binary64) (neg.f64 (fabs.f64 (sin.f64 kx))) (neg.f64 (fabs.f64 (sin.f64 kx))) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal -1/2 binary64))
(134-z0z1z2z3z4 #s(literal 1 binary64) (neg.f64 (fabs.f64 (sin.f64 kx))) (neg.f64 (fabs.f64 (sin.f64 kx))) #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64)))
(134-z0z1z2z3z4 #s(literal 1 binary64) (neg.f64 (fabs.f64 (sin.f64 kx))) (neg.f64 (fabs.f64 (sin.f64 kx))) (sin.f64 ky) (neg.f64 (sin.f64 ky)))
(134-z0z1z2z3z4 #s(literal 1 binary64) (neg.f64 (sin.f64 ky)) (neg.f64 (sin.f64 ky)) (neg.f64 (sin.f64 kx)) (sin.f64 kx))
(134-z0z1z2z3z4 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (neg.f64 (sin.f64 kx)) (sin.f64 kx))
(134-z0z1z2z3z4 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx)) (fabs.f64 (sin.f64 kx)) #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))
(134-z0z1z2z3z4 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx)) (fabs.f64 (sin.f64 kx)) (-.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(134-z0z1z2z3z4 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx)) (fabs.f64 (sin.f64 kx)) (neg.f64 (sin.f64 ky)) (sin.f64 ky))
(134-z0z1z2z3z4 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx)) (fabs.f64 (sin.f64 kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal -1/2 binary64))
(134-z0z1z2z3z4 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx)) (fabs.f64 (sin.f64 kx)) #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64)))
(134-z0z1z2z3z4 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx)) (fabs.f64 (sin.f64 kx)) (sin.f64 ky) (neg.f64 (sin.f64 ky)))
(134-z0z1z2z3z4 #s(literal 1 binary64) #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (neg.f64 (sin.f64 kx)) (sin.f64 kx))
(134-z0z1z2z3z4 #s(literal 1 binary64) (sin.f64 kx) (sin.f64 kx) #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))
(134-z0z1z2z3z4 #s(literal 1 binary64) (sin.f64 kx) (sin.f64 kx) (-.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(134-z0z1z2z3z4 #s(literal 1 binary64) (sin.f64 kx) (sin.f64 kx) (neg.f64 (sin.f64 ky)) (sin.f64 ky))
(134-z0z1z2z3z4 #s(literal 1 binary64) (sin.f64 kx) (sin.f64 kx) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal -1/2 binary64))
(134-z0z1z2z3z4 #s(literal 1 binary64) (sin.f64 kx) (sin.f64 kx) #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64)))
(134-z0z1z2z3z4 #s(literal 1 binary64) (sin.f64 kx) (sin.f64 kx) (sin.f64 ky) (neg.f64 (sin.f64 ky)))
(134-z0z1z2z3z4 #s(literal 1 binary64) (sin.f64 ky) (sin.f64 ky) (neg.f64 (sin.f64 kx)) (sin.f64 kx))
(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 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))
(neg.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))
(neg.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))
(neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))
(-.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (/.f64 (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) #s(literal 1 binary64)))
(-.f64 (/.f64 (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (/.f64 (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) #s(literal 1 binary64)))
(-.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.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/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (/.f64 (*.f64 (neg.f64 (sin.f64 kx)) (sin.f64 kx)) #s(literal 1 binary64)))
(-.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (/.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) #s(literal 1 binary64)))
(-.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (/.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1 binary64)))
(-.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (*.f64 (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/2 binary64))) #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 kx kx)) (-.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 (neg.f64 (sin.f64 kx)) (sin.f64 kx)))
(-.f64 (-.f64 #s(literal 1/2 binary64) (*.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 (-.f64 (cos.f64 (+.f64 kx kx)) (-.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 (cos.f64 (+.f64 kx kx)) (-.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/2 binary64))) (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))
(sqrt.f64 (*.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))) (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))
(fabs.f64 (*.f64 (neg.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))))
(fabs.f64 (*.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))))
(fabs.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))
(exp.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))) #s(literal -1 binary64)))
(exp.f64 (*.f64 (log.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))) #s(literal 1 binary64)))
(+.f64 (/.f64 (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (/.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1 binary64)))
(+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.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/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #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 binary64)) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #s(literal 1 binary64)))
(+.f64 (/.f64 #s(literal 1/2 binary64) (/.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))) (/.f64 #s(literal 1/2 binary64) (/.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (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 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))
(+.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal 1/2 binary64))
(+.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))) (/.f64 #s(literal 0 binary64) (/.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 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 kx kx)) #s(literal 1/2 binary64))))
(+.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 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 #s(literal 1/2 binary64) (/.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal 1 binary64)))
(+.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 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/2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))))
(+.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 ky ky)) #s(literal 1/2 binary64))))
(*.f64 (sqrt.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))) (sqrt.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))))
(*.f64 (pow.f64 #s(literal -1 binary64) #s(literal 1/2 binary64)) (pow.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))) (pow.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))))
(*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))))
(*.f64 (pow.f64 #s(literal 1 binary64) #s(literal 1/2 binary64)) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))
(*.f64 (sqrt.f64 #s(literal 1 binary64)) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))
(*.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))) (pow.f64 #s(literal 1 binary64) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 1 binary64)))
(pow.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))) #s(literal 1/2 binary64))
(/.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))
(/.f64 (sqrt.f64 #s(literal 1 binary64)) (sqrt.f64 (/.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))
(/.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))))
(sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))
(fabs.f64 (neg.f64 (neg.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))))
(fabs.f64 (neg.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))))
(fabs.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))
(exp.f64 (*.f64 (log.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(*.f64 (*.f64 (neg.f64 (sin.f64 ky)) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))) (sin.f64 ky))
(*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))) (neg.f64 (sin.f64 ky)))
(*.f64 (neg.f64 (sin.f64 ky)) (/.f64 #s(literal -1 binary64) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))))
(*.f64 (sin.f64 ky) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))))
(/.f64 (neg.f64 (*.f64 (neg.f64 (sin.f64 ky)) #s(literal -1 binary64))) (neg.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))))
(/.f64 (neg.f64 (*.f64 (neg.f64 (sin.f64 ky)) #s(literal 1 binary64))) (neg.f64 (neg.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))))
(/.f64 (neg.f64 (*.f64 (sin.f64 ky) #s(literal 1 binary64))) (neg.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))))
(/.f64 (neg.f64 (neg.f64 (neg.f64 (sin.f64 ky)))) (neg.f64 (neg.f64 (neg.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))))))
(/.f64 (*.f64 (neg.f64 (sin.f64 ky)) #s(literal -1 binary64)) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))
(/.f64 (*.f64 (neg.f64 (sin.f64 ky)) #s(literal 1 binary64)) (neg.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))))
(/.f64 (neg.f64 (neg.f64 (sin.f64 ky))) (neg.f64 (neg.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))))
(/.f64 (*.f64 (sin.f64 ky) #s(literal 1 binary64)) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))
(/.f64 (neg.f64 (sin.f64 ky)) (neg.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))) (neg.f64 (sin.f64 ky))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))) (sin.f64 ky)))
(/.f64 (sin.f64 ky) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))
(134-z0z1z2z3z4 (/.f64 #s(literal -1 binary64) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))) (cos.f64 ky) #s(literal 0 binary64) (sin.f64 ky) #s(literal 1 binary64))
(134-z0z1z2z3z4 (/.f64 #s(literal -1 binary64) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))) #s(literal 0 binary64) (cos.f64 ky) #s(literal 1 binary64) (sin.f64 ky))
(134-z0z1z2z3z4 (/.f64 #s(literal -1 binary64) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))) (sin.f64 ky) #s(literal -1 binary64) (cos.f64 ky) (sin.f64 (neg.f64 (PI.f64))))
(neg.f64 (*.f64 (sin.f64 ky) (/.f64 #s(literal -1 binary64) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))))
(neg.f64 (/.f64 (sin.f64 ky) (neg.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))))
(neg.f64 (/.f64 (neg.f64 (sin.f64 ky)) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))))
(-.f64 (/.f64 (*.f64 (cos.f64 ky) #s(literal 0 binary64)) (neg.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))) (/.f64 (*.f64 (sin.f64 ky) #s(literal 1 binary64)) (neg.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))))
(+.f64 (/.f64 (*.f64 (sin.f64 ky) #s(literal -1 binary64)) (neg.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))) (/.f64 (*.f64 (cos.f64 ky) #s(literal 0 binary64)) (neg.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))))
th
(sin.f64 th)
(*.f64 (*.f64 (neg.f64 (sin.f64 ky)) (sin.f64 th)) (/.f64 #s(literal -1 binary64) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))) (sin.f64 th))
(*.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))))
(*.f64 (/.f64 (neg.f64 (sin.f64 th)) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))) (neg.f64 (sin.f64 ky)))
(*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))) (*.f64 (sin.f64 th) (neg.f64 (sin.f64 ky))))
(*.f64 (neg.f64 (sin.f64 ky)) (/.f64 (neg.f64 (sin.f64 th)) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))))
(*.f64 (sin.f64 th) (/.f64 (sin.f64 ky) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))))
(*.f64 (sin.f64 ky) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))) (sin.f64 th)))
(*.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))))
(*.f64 (sin.f64 ky) (neg.f64 (/.f64 (neg.f64 (sin.f64 th)) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 ky th))) #s(literal -1 binary64)) (*.f64 #s(literal 2 binary64) (neg.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 ky th))) #s(literal 1 binary64)) (*.f64 #s(literal 2 binary64) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))))
(/.f64 (neg.f64 (*.f64 (sin.f64 th) (neg.f64 (sin.f64 ky)))) (neg.f64 (neg.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))))
(/.f64 (neg.f64 (*.f64 (neg.f64 (sin.f64 ky)) (neg.f64 (sin.f64 th)))) (neg.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))))
(/.f64 (neg.f64 (*.f64 (neg.f64 (sin.f64 ky)) (sin.f64 th))) (neg.f64 (neg.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))))
(/.f64 (neg.f64 (*.f64 (neg.f64 (sin.f64 th)) (neg.f64 (sin.f64 ky)))) (neg.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))))
(/.f64 (neg.f64 (neg.f64 (*.f64 (sin.f64 th) (sin.f64 ky)))) (neg.f64 (neg.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))))
(/.f64 (*.f64 (sin.f64 th) (neg.f64 (sin.f64 ky))) (neg.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))))
(/.f64 (*.f64 (neg.f64 (sin.f64 ky)) (neg.f64 (sin.f64 th))) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))
(/.f64 (*.f64 (neg.f64 (sin.f64 ky)) (sin.f64 th)) (neg.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))))
(/.f64 (*.f64 (neg.f64 (sin.f64 th)) (neg.f64 (sin.f64 ky))) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))
(/.f64 (neg.f64 (*.f64 (sin.f64 th) (sin.f64 ky))) (neg.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))))
(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))) (*.f64 (sin.f64 th) (sin.f64 ky))))
(134-z0z1z2z3z4 (/.f64 (neg.f64 (sin.f64 th)) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))) (cos.f64 ky) #s(literal 0 binary64) (sin.f64 ky) #s(literal 1 binary64))
(134-z0z1z2z3z4 (/.f64 (neg.f64 (sin.f64 th)) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))) #s(literal 0 binary64) (cos.f64 ky) #s(literal 1 binary64) (sin.f64 ky))
(134-z0z1z2z3z4 (/.f64 (neg.f64 (sin.f64 th)) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))) (sin.f64 ky) #s(literal -1 binary64) (cos.f64 ky) (sin.f64 (neg.f64 (PI.f64))))
(neg.f64 (/.f64 (*.f64 (sin.f64 ky) (neg.f64 (sin.f64 th))) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))))
(*.f64 (sin.f64 th) ky)
(*.f64 ky (sin.f64 th))
(*.f64 (sqrt.f64 (neg.f64 (sin.f64 kx))) (sqrt.f64 (neg.f64 (sin.f64 kx))))
(*.f64 (sqrt.f64 (fabs.f64 (sin.f64 kx))) (sqrt.f64 (fabs.f64 (sin.f64 kx))))
(*.f64 (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1/2 binary64)) (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 1/2 binary64)) (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))))
(*.f64 (sqrt.f64 (sin.f64 kx)) (sqrt.f64 (sin.f64 kx)))
(*.f64 (pow.f64 (sin.f64 kx) #s(literal 1/2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 1/2 binary64)))
(pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))
(/.f64 (sqrt.f64 (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx)))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))))
(sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))
(fabs.f64 (neg.f64 (neg.f64 (fabs.f64 (sin.f64 kx)))))
(fabs.f64 (neg.f64 (sin.f64 kx)))
(fabs.f64 (neg.f64 (fabs.f64 (sin.f64 kx))))
(fabs.f64 (fabs.f64 (sin.f64 kx)))
(fabs.f64 (sin.f64 kx))
(exp.f64 (*.f64 (log.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64)))
(*.f64 (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx))) ky)
(*.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))) (*.f64 (sin.f64 th) ky))
(*.f64 (*.f64 (neg.f64 ky) (sin.f64 th)) (/.f64 #s(literal -1 binary64) (fabs.f64 (sin.f64 kx))))
(*.f64 (*.f64 (sin.f64 th) ky) (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))))
(*.f64 (sin.f64 th) (*.f64 ky (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx)))))
(*.f64 (sin.f64 th) (/.f64 ky (fabs.f64 (sin.f64 kx))))
(*.f64 ky (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx))))
(/.f64 (neg.f64 (*.f64 (*.f64 (sin.f64 th) ky) #s(literal 1 binary64))) (neg.f64 (fabs.f64 (sin.f64 kx))))
(/.f64 (neg.f64 (neg.f64 (*.f64 (neg.f64 ky) (sin.f64 th)))) (neg.f64 (neg.f64 (neg.f64 (fabs.f64 (sin.f64 kx))))))
(/.f64 (*.f64 (*.f64 (sin.f64 th) ky) #s(literal 1 binary64)) (fabs.f64 (sin.f64 kx)))
(/.f64 (neg.f64 (*.f64 (neg.f64 ky) (sin.f64 th))) (neg.f64 (neg.f64 (fabs.f64 (sin.f64 kx)))))
(/.f64 (*.f64 (neg.f64 ky) (sin.f64 th)) (neg.f64 (fabs.f64 (sin.f64 kx))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (fabs.f64 (sin.f64 kx))) (*.f64 (neg.f64 ky) (sin.f64 th))))
(/.f64 #s(literal 1 binary64) (/.f64 (fabs.f64 (sin.f64 kx)) (*.f64 (sin.f64 th) ky)))
(/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 (sin.f64 kx)))
(neg.f64 (/.f64 (*.f64 (sin.f64 th) ky) (neg.f64 (fabs.f64 (sin.f64 kx)))))
(neg.f64 (/.f64 (*.f64 (neg.f64 ky) (sin.f64 th)) (fabs.f64 (sin.f64 kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 (sin.f64 kx))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (neg.f64 kx) kx)) kx)
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 kx kx)) kx)
(*.f64 #s(literal 2 binary64) kx)
(*.f64 kx #s(literal 2 binary64))
(/.f64 (+.f64 (pow.f64 kx #s(literal 3 binary64)) (pow.f64 (neg.f64 (neg.f64 kx)) #s(literal 3 binary64))) (+.f64 (*.f64 kx kx) (-.f64 (*.f64 (neg.f64 (neg.f64 kx)) (neg.f64 (neg.f64 kx))) (*.f64 kx (neg.f64 (neg.f64 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 (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 (pow.f64 (*.f64 (sin.f64 (+.f64 kx kx)) #s(literal 0 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (sin.f64 (+.f64 kx kx)) #s(literal 0 binary64)) (*.f64 (sin.f64 (+.f64 kx kx)) #s(literal 0 binary64))) (-.f64 (*.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 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 (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 (neg.f64 (sin.f64 kx)) (sin.f64 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 (neg.f64 (sin.f64 kx)) (sin.f64 kx)) (*.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 (neg.f64 (sin.f64 kx)) (sin.f64 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 (sin.f64 kx) (neg.f64 (sin.f64 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 (sin.f64 kx) (neg.f64 (sin.f64 kx))) (*.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 (sin.f64 kx) (neg.f64 (sin.f64 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 (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 (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 (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 (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 (-.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (-.f64 kx kx))) (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx)))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (-.f64 kx kx))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx))))) #s(literal 4 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 (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))))) (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 (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 #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 (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)))))))
(neg.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)))))
(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 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)) #s(literal 0 binary64)) (*.f64 (cos.f64 (+.f64 kx kx)) (sin.f64 (neg.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 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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))
(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 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) (*.f64 #s(literal 0 binary64) (sin.f64 (+.f64 kx kx))))
(+.f64 (*.f64 (sin.f64 (+.f64 kx kx)) #s(literal 0 binary64)) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)))
(+.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 (*.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 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (fabs.f64 (fabs.f64 (cos.f64 kx))) (fabs.f64 (fabs.f64 (cos.f64 kx))) (neg.f64 (neg.f64 (sin.f64 kx))) (neg.f64 (neg.f64 (sin.f64 kx))))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (fabs.f64 (fabs.f64 (cos.f64 kx))) (fabs.f64 (fabs.f64 (cos.f64 kx))) (sin.f64 (fabs.f64 kx)) (sin.f64 (fabs.f64 kx)))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (fabs.f64 (fabs.f64 (cos.f64 kx))) (fabs.f64 (fabs.f64 (cos.f64 kx))) (neg.f64 (sin.f64 kx)) (neg.f64 (sin.f64 kx)))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (fabs.f64 (fabs.f64 (cos.f64 kx))) (fabs.f64 (fabs.f64 (cos.f64 kx))) (neg.f64 (fabs.f64 (sin.f64 kx))) (neg.f64 (fabs.f64 (sin.f64 kx))))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (fabs.f64 (fabs.f64 (cos.f64 kx))) (fabs.f64 (fabs.f64 (cos.f64 kx))) (fabs.f64 (sin.f64 kx)) (fabs.f64 (sin.f64 kx)))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (fabs.f64 (fabs.f64 (cos.f64 kx))) (fabs.f64 (fabs.f64 (cos.f64 kx))) (sin.f64 kx) (sin.f64 (neg.f64 (neg.f64 kx))))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (fabs.f64 (fabs.f64 (cos.f64 kx))) (fabs.f64 (fabs.f64 (cos.f64 kx))) (sin.f64 kx) (sin.f64 kx))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (neg.f64 (fabs.f64 (cos.f64 kx))) (neg.f64 (fabs.f64 (cos.f64 kx))) (neg.f64 (neg.f64 (sin.f64 kx))) (neg.f64 (neg.f64 (sin.f64 kx))))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (neg.f64 (fabs.f64 (cos.f64 kx))) (neg.f64 (fabs.f64 (cos.f64 kx))) (sin.f64 (fabs.f64 kx)) (sin.f64 (fabs.f64 kx)))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (neg.f64 (fabs.f64 (cos.f64 kx))) (neg.f64 (fabs.f64 (cos.f64 kx))) (neg.f64 (sin.f64 kx)) (neg.f64 (sin.f64 kx)))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (neg.f64 (fabs.f64 (cos.f64 kx))) (neg.f64 (fabs.f64 (cos.f64 kx))) (neg.f64 (fabs.f64 (sin.f64 kx))) (neg.f64 (fabs.f64 (sin.f64 kx))))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (neg.f64 (fabs.f64 (cos.f64 kx))) (neg.f64 (fabs.f64 (cos.f64 kx))) (fabs.f64 (sin.f64 kx)) (fabs.f64 (sin.f64 kx)))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (neg.f64 (fabs.f64 (cos.f64 kx))) (neg.f64 (fabs.f64 (cos.f64 kx))) (sin.f64 kx) (sin.f64 (neg.f64 (neg.f64 kx))))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (neg.f64 (fabs.f64 (cos.f64 kx))) (neg.f64 (fabs.f64 (cos.f64 kx))) (sin.f64 kx) (sin.f64 kx))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (neg.f64 (neg.f64 (cos.f64 kx))) (neg.f64 (neg.f64 (cos.f64 kx))) (neg.f64 (neg.f64 (sin.f64 kx))) (neg.f64 (neg.f64 (sin.f64 kx))))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (neg.f64 (neg.f64 (cos.f64 kx))) (neg.f64 (neg.f64 (cos.f64 kx))) (sin.f64 (fabs.f64 kx)) (sin.f64 (fabs.f64 kx)))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (neg.f64 (neg.f64 (cos.f64 kx))) (neg.f64 (neg.f64 (cos.f64 kx))) (neg.f64 (sin.f64 kx)) (neg.f64 (sin.f64 kx)))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (neg.f64 (neg.f64 (cos.f64 kx))) (neg.f64 (neg.f64 (cos.f64 kx))) (neg.f64 (fabs.f64 (sin.f64 kx))) (neg.f64 (fabs.f64 (sin.f64 kx))))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (neg.f64 (neg.f64 (cos.f64 kx))) (neg.f64 (neg.f64 (cos.f64 kx))) (fabs.f64 (sin.f64 kx)) (fabs.f64 (sin.f64 kx)))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (neg.f64 (neg.f64 (cos.f64 kx))) (neg.f64 (neg.f64 (cos.f64 kx))) (sin.f64 kx) (sin.f64 (neg.f64 (neg.f64 kx))))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (neg.f64 (neg.f64 (cos.f64 kx))) (neg.f64 (neg.f64 (cos.f64 kx))) (sin.f64 kx) (sin.f64 kx))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (fabs.f64 (cos.f64 kx)) (fabs.f64 (cos.f64 kx)) (neg.f64 (neg.f64 (sin.f64 kx))) (neg.f64 (neg.f64 (sin.f64 kx))))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (fabs.f64 (cos.f64 kx)) (fabs.f64 (cos.f64 kx)) (sin.f64 (fabs.f64 kx)) (sin.f64 (fabs.f64 kx)))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (fabs.f64 (cos.f64 kx)) (fabs.f64 (cos.f64 kx)) (neg.f64 (sin.f64 kx)) (neg.f64 (sin.f64 kx)))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (fabs.f64 (cos.f64 kx)) (fabs.f64 (cos.f64 kx)) (neg.f64 (fabs.f64 (sin.f64 kx))) (neg.f64 (fabs.f64 (sin.f64 kx))))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (fabs.f64 (cos.f64 kx)) (fabs.f64 (cos.f64 kx)) (fabs.f64 (sin.f64 kx)) (fabs.f64 (sin.f64 kx)))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (fabs.f64 (cos.f64 kx)) (fabs.f64 (cos.f64 kx)) (sin.f64 kx) (sin.f64 (neg.f64 (neg.f64 kx))))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (fabs.f64 (cos.f64 kx)) (fabs.f64 (cos.f64 kx)) (sin.f64 kx) (sin.f64 kx))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (neg.f64 (cos.f64 kx)) (neg.f64 (cos.f64 kx)) (neg.f64 (neg.f64 (sin.f64 kx))) (neg.f64 (neg.f64 (sin.f64 kx))))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (neg.f64 (cos.f64 kx)) (neg.f64 (cos.f64 kx)) (sin.f64 (fabs.f64 kx)) (sin.f64 (fabs.f64 kx)))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (neg.f64 (cos.f64 kx)) (neg.f64 (cos.f64 kx)) (neg.f64 (sin.f64 kx)) (neg.f64 (sin.f64 kx)))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (neg.f64 (cos.f64 kx)) (neg.f64 (cos.f64 kx)) (neg.f64 (fabs.f64 (sin.f64 kx))) (neg.f64 (fabs.f64 (sin.f64 kx))))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (neg.f64 (cos.f64 kx)) (neg.f64 (cos.f64 kx)) (fabs.f64 (sin.f64 kx)) (fabs.f64 (sin.f64 kx)))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (neg.f64 (cos.f64 kx)) (neg.f64 (cos.f64 kx)) (sin.f64 kx) (sin.f64 (neg.f64 (neg.f64 kx))))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (neg.f64 (cos.f64 kx)) (neg.f64 (cos.f64 kx)) (sin.f64 kx) (sin.f64 kx))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (sin.f64 (+.f64 kx kx)) #s(literal 0 binary64) (cos.f64 (+.f64 kx kx)) (sin.f64 (neg.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (cos.f64 kx) (cos.f64 kx) (neg.f64 (neg.f64 (sin.f64 kx))) (neg.f64 (neg.f64 (sin.f64 kx))))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (cos.f64 kx) (cos.f64 kx) (sin.f64 (fabs.f64 kx)) (sin.f64 (fabs.f64 kx)))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (cos.f64 kx) (cos.f64 kx) (neg.f64 (sin.f64 kx)) (neg.f64 (sin.f64 kx)))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (cos.f64 kx) (cos.f64 kx) (neg.f64 (fabs.f64 (sin.f64 kx))) (neg.f64 (fabs.f64 (sin.f64 kx))))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (cos.f64 kx) (cos.f64 kx) (fabs.f64 (sin.f64 kx)) (fabs.f64 (sin.f64 kx)))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (cos.f64 kx) (cos.f64 kx) (sin.f64 kx) (sin.f64 (neg.f64 (neg.f64 kx))))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (cos.f64 kx) (cos.f64 kx) (sin.f64 kx) (sin.f64 kx))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (sin.f64 kx) (cos.f64 (-.f64 (neg.f64 kx) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (cos.f64 kx) (sin.f64 (-.f64 (neg.f64 kx) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))
#s(literal 1 binary64)
(*.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 (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 #s(literal 1/2 binary64) (*.f64 (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 #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 #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 (neg.f64 (cos.f64 (+.f64 ky ky))) #s(literal 3 binary64)) (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64))) (+.f64 (*.f64 (neg.f64 (cos.f64 (+.f64 ky ky))) (neg.f64 (cos.f64 (+.f64 ky ky)))) (-.f64 (*.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (*.f64 (neg.f64 (cos.f64 (+.f64 ky ky))) #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 (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 #s(literal 1 binary64) (neg.f64 (cos.f64 (+.f64 ky 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/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 (sin.f64 (fabs.f64 ky)) (sin.f64 (fabs.f64 ky)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))
(*.f64 (neg.f64 (neg.f64 (sin.f64 ky))) (neg.f64 (neg.f64 (sin.f64 ky))))
(*.f64 (fabs.f64 (sin.f64 ky)) (fabs.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 (neg.f64 (sin.f64 ky)) (neg.f64 (sin.f64 ky)))
(*.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 ky ky))))
(*.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 (+.f64 (pow.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 3 binary64)) (pow.f64 #s(literal 1/2 binary64) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))) (-.f64 (*.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 #s(literal -1/2 binary64) (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 (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 3 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (+.f64 (*.f64 (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))) (*.f64 #s(literal 1/2 binary64) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))))))
(/.f64 (-.f64 (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64)) (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (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 #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) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))))
(/.f64 (-.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (-.f64 ky ky)))) #s(literal 2 binary64))
(/.f64 (-.f64 #s(literal 2 binary64) (*.f64 #s(literal 1 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (-.f64 ky ky))))) #s(literal 2 binary64))
(/.f64 (-.f64 #s(literal 4 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (-.f64 ky ky))))) #s(literal 4 binary64))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 ky ky)) (cos.f64 (+.f64 ky ky)))) #s(literal -2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)) (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)))) (cos.f64 (-.f64 (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)) (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)) (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)))) (cos.f64 (-.f64 (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)) (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky))) (cos.f64 (-.f64 (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)) (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)))) (cos.f64 (-.f64 (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)) (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)) (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)))) (cos.f64 (-.f64 (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)) (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky))) (cos.f64 (-.f64 (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)))) (cos.f64 (-.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)))) (cos.f64 (-.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky))))) #s(literal 2 binary64))
(/.f64 (+.f64 (neg.f64 (cos.f64 (+.f64 ky ky))) (cos.f64 (-.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 ky))) (cos.f64 (+.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 ky)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (PI.f64) ky))) (cos.f64 (+.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (PI.f64) ky)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (neg.f64 ky) (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (neg.f64 ky) (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (neg.f64 ky) (neg.f64 ky))) (cos.f64 (+.f64 ky ky))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (neg.f64 ky) (+.f64 (PI.f64) ky))) (cos.f64 (+.f64 (neg.f64 ky) (+.f64 (PI.f64) ky)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (PI.f64) ky) (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (+.f64 (PI.f64) ky) (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (PI.f64) ky) (neg.f64 ky))) (cos.f64 (+.f64 (+.f64 (PI.f64) ky) (neg.f64 ky)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (PI.f64) ky) (+.f64 (PI.f64) ky))) (cos.f64 (+.f64 (+.f64 (PI.f64) ky) (+.f64 (PI.f64) ky)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)))) (sin.f64 (+.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)))) (sin.f64 (+.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky))) (sin.f64 (+.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (neg.f64 ky) (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)))) (sin.f64 (+.f64 (neg.f64 ky) (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (neg.f64 ky) (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)))) (sin.f64 (+.f64 (neg.f64 ky) (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky))))) #s(literal 2 binary64))
(/.f64 (+.f64 (neg.f64 (cos.f64 (+.f64 ky ky))) (sin.f64 (+.f64 (neg.f64 ky) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (PI.f64) ky) (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)))) (sin.f64 (+.f64 (+.f64 (PI.f64) ky) (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (PI.f64) ky) (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)))) (sin.f64 (+.f64 (+.f64 (PI.f64) ky) (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (PI.f64) ky) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky))) (sin.f64 (+.f64 (+.f64 (PI.f64) ky) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (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 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 3 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))) (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))))))
(/.f64 (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)))
(134-z0z1z2z3z4 (neg.f64 (sin.f64 ky)) (cos.f64 ky) #s(literal 0 binary64) (sin.f64 ky) #s(literal 1 binary64))
(134-z0z1z2z3z4 (neg.f64 (sin.f64 ky)) #s(literal 0 binary64) (cos.f64 ky) #s(literal 1 binary64) (sin.f64 ky))
(134-z0z1z2z3z4 (neg.f64 (sin.f64 ky)) (sin.f64 ky) #s(literal -1 binary64) (cos.f64 ky) (sin.f64 (neg.f64 (PI.f64))))
(neg.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))
(-.f64 (/.f64 (cos.f64 (-.f64 ky ky)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 ky ky)) #s(literal 2 binary64)))
(-.f64 #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/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (PI.f64) ky)))))
(-.f64 #s(literal 1/2 binary64) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))))
(-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))
(fabs.f64 (-.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 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (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 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) (*.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 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))))) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))
(*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (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 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (*.f64 (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 ky ky)) #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)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))
(/.f64 (+.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (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 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) (*.f64 #s(literal 1/2 binary64) (+.f64 (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 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #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 (cos.f64 (+.f64 kx kx)) #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 (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) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) (*.f64 (cos.f64 (+.f64 kx kx)) #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 (+.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #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 (+.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 (cos.f64 (+.f64 kx kx)) #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 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 3 binary64))) (+.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 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))) (*.f64 #s(literal -1/2 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 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))))))
(/.f64 (-.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 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (-.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 ky ky)) #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 (*.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 (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 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) (*.f64 #s(literal 1/2 binary64) (+.f64 (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 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1/2 binary64)))
(/.f64 (-.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 (-.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 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))
(/.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #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 (-.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 (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (*.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 ky ky)) #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 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #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 (*.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 (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 (-.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (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 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) (*.f64 #s(literal 1/2 binary64) (+.f64 (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 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1/2 binary64)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (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/2 binary64))) #s(literal 3 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 (*.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 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))))
(/.f64 (-.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 (-.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 (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 (-.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) (*.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 kx kx)) #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 (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) #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 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 ky ky)) #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 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #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 (-.f64 (pow.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #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 (-.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 (cos.f64 (+.f64 kx kx)) #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 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))))
(-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1/2 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) (cos.f64 (+.f64 ky ky))))
(-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #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)) #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 (cos.f64 (+.f64 ky ky)) (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 ky ky)))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))
(+.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))
(+.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #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 kx kx)) #s(literal 1/2 binary64)) (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))
(+.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 (pow.f64 #s(literal 1 binary64) #s(literal -1 binary64)) (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))
(*.f64 (pow.f64 #s(literal -1 binary64) #s(literal 1 binary64)) (pow.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))) #s(literal 1 binary64)))
(*.f64 (pow.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal 1/2 binary64))) #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/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 #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 (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 #s(literal 1 binary64) (/.f64 (*.f64 (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/2 binary64))) #s(literal -1/2 binary64)))) (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal -1/2 binary64)))
(*.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 (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 (/.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64))))
(*.f64 (pow.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))))
(*.f64 (+.f64 #s(literal 1 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 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 binary64) (/.f64 (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))
(*.f64 (neg.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))) (neg.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))))
(*.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))
(*.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))) (pow.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))) #s(literal 0 binary64)))
(*.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))) (pow.f64 #s(literal 1 binary64) #s(literal 1 binary64)))
(*.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))) #s(literal 1 binary64))
(*.f64 #s(literal -1 binary64) (/.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))) #s(literal 1 binary64)))
(*.f64 #s(literal -1 binary64) (*.f64 #s(literal -1 binary64) (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))
(*.f64 #s(literal 1 binary64) (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))
(pow.f64 (*.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))) (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(pow.f64 (/.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))) #s(literal -1 binary64))
(pow.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))) #s(literal 2 binary64))
(pow.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))) #s(literal 1 binary64))
(/.f64 (+.f64 (pow.f64 (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal -1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 3 binary64))) (+.f64 (*.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 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal -1/2 binary64))) (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))) (*.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 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))))))
(/.f64 (+.f64 (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal 3 binary64)) (pow.f64 #s(literal 1/2 binary64) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))) (-.f64 (*.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (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 (*.f64 #s(literal -1/2 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/2 binary64) #s(literal 1/2 binary64)) (-.f64 (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (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) (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/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (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 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #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 (-.f64 #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)) #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 (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))
(/.f64 (-.f64 (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal 3 binary64)) (pow.f64 #s(literal -1/2 binary64) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) #s(literal -1/2 binary64)) (*.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal -1/2 binary64)))))
(/.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 (neg.f64 (sin.f64 kx)) (sin.f64 kx)) #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 (neg.f64 (sin.f64 kx)) (sin.f64 kx)) (*.f64 (neg.f64 (sin.f64 kx)) (sin.f64 kx))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (*.f64 (neg.f64 (sin.f64 kx)) (sin.f64 kx))))))
(/.f64 (+.f64 (-.f64 (cos.f64 (-.f64 ky ky)) (cos.f64 (+.f64 ky ky))) (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx)))) #s(literal 2 binary64))
(/.f64 (+.f64 (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx))) (-.f64 (cos.f64 (-.f64 ky ky)) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (-.f64 (cos.f64 (-.f64 ky ky)) (cos.f64 (+.f64 ky ky))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx))))) #s(literal 4 binary64))
(/.f64 (+.f64 (*.f64 (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 ky ky)) (cos.f64 (+.f64 ky ky))))) #s(literal 4 binary64))
(/.f64 (*.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))) #s(literal 2 binary64)) #s(literal 2 binary64))
(/.f64 (*.f64 #s(literal 2 binary64) (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))) #s(literal 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 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) #s(literal -1 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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal -1 binary64))
(/.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))) #s(literal -1 binary64))
(/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))))
(/.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 #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 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))
(/.f64 (-.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 (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 (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 (-.f64 (*.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 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #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 (-.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 ky ky)) #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 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 (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 (+.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal 3 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 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 #s(literal 1/2 binary64) (*.f64 (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 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/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 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))))
(/.f64 (-.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 (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 (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 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 (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 (-.f64 (pow.f64 (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #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 (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal -1/2 binary64)) (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #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 (-.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 ky ky)) #s(literal 1/2 binary64))))))
(/.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 ky ky)))) #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 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 (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 -2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))) #s(literal 2 binary64)))
(/.f64 #s(literal -2 binary64) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))
(/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)) #s(literal -1 binary64))
(/.f64 (-.f64 (*.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 (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 #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 ky ky)) #s(literal 1/2 binary64)))))
(/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))
(/.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 (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 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 (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 #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 ky ky)) #s(literal 1/2 binary64)))))))
(/.f64 (-.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 3 binary64)) (pow.f64 (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (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 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))))
(/.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))) #s(literal 1 binary64))
(/.f64 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))) #s(literal -1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))
(/.f64 #s(literal 2 binary64) (*.f64 (/.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))
(134-z0z1z2z3z4 #s(literal 1 binary64) (fabs.f64 (fabs.f64 (sin.f64 ky))) (fabs.f64 (fabs.f64 (sin.f64 ky))) (neg.f64 (sin.f64 kx)) (sin.f64 kx))
(134-z0z1z2z3z4 #s(literal 1 binary64) (neg.f64 (neg.f64 (sin.f64 kx))) (neg.f64 (neg.f64 (sin.f64 kx))) #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))
(134-z0z1z2z3z4 #s(literal 1 binary64) (neg.f64 (neg.f64 (sin.f64 kx))) (neg.f64 (neg.f64 (sin.f64 kx))) (-.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(134-z0z1z2z3z4 #s(literal 1 binary64) (neg.f64 (neg.f64 (sin.f64 kx))) (neg.f64 (neg.f64 (sin.f64 kx))) (neg.f64 (sin.f64 ky)) (sin.f64 ky))
(134-z0z1z2z3z4 #s(literal 1 binary64) (neg.f64 (neg.f64 (sin.f64 kx))) (neg.f64 (neg.f64 (sin.f64 kx))) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal -1/2 binary64))
(134-z0z1z2z3z4 #s(literal 1 binary64) (neg.f64 (neg.f64 (sin.f64 kx))) (neg.f64 (neg.f64 (sin.f64 kx))) #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64)))
(134-z0z1z2z3z4 #s(literal 1 binary64) (neg.f64 (neg.f64 (sin.f64 kx))) (neg.f64 (neg.f64 (sin.f64 kx))) (sin.f64 ky) (neg.f64 (sin.f64 ky)))
(134-z0z1z2z3z4 #s(literal 1 binary64) (neg.f64 (fabs.f64 (sin.f64 ky))) (neg.f64 (fabs.f64 (sin.f64 ky))) (neg.f64 (sin.f64 kx)) (sin.f64 kx))
(134-z0z1z2z3z4 #s(literal 1 binary64) (sin.f64 (fabs.f64 kx)) (sin.f64 (fabs.f64 kx)) #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))
(134-z0z1z2z3z4 #s(literal 1 binary64) (sin.f64 (fabs.f64 kx)) (sin.f64 (fabs.f64 kx)) (-.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(134-z0z1z2z3z4 #s(literal 1 binary64) (sin.f64 (fabs.f64 kx)) (sin.f64 (fabs.f64 kx)) (neg.f64 (sin.f64 ky)) (sin.f64 ky))
(134-z0z1z2z3z4 #s(literal 1 binary64) (sin.f64 (fabs.f64 kx)) (sin.f64 (fabs.f64 kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal -1/2 binary64))
(134-z0z1z2z3z4 #s(literal 1 binary64) (sin.f64 (fabs.f64 kx)) (sin.f64 (fabs.f64 kx)) #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64)))
(134-z0z1z2z3z4 #s(literal 1 binary64) (sin.f64 (fabs.f64 kx)) (sin.f64 (fabs.f64 kx)) (sin.f64 ky) (neg.f64 (sin.f64 ky)))
(134-z0z1z2z3z4 #s(literal 1 binary64) (sin.f64 (fabs.f64 ky)) (sin.f64 (fabs.f64 ky)) (neg.f64 (sin.f64 kx)) (sin.f64 kx))
(134-z0z1z2z3z4 #s(literal 1 binary64) (neg.f64 (neg.f64 (sin.f64 ky))) (neg.f64 (neg.f64 (sin.f64 ky))) (neg.f64 (sin.f64 kx)) (sin.f64 kx))
(134-z0z1z2z3z4 #s(literal 1 binary64) (fabs.f64 (sin.f64 ky)) (fabs.f64 (sin.f64 ky)) (neg.f64 (sin.f64 kx)) (sin.f64 kx))
(134-z0z1z2z3z4 #s(literal 1 binary64) (neg.f64 (sin.f64 kx)) (neg.f64 (sin.f64 kx)) #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))
(134-z0z1z2z3z4 #s(literal 1 binary64) (neg.f64 (sin.f64 kx)) (neg.f64 (sin.f64 kx)) (-.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(134-z0z1z2z3z4 #s(literal 1 binary64) (neg.f64 (sin.f64 kx)) (neg.f64 (sin.f64 kx)) (neg.f64 (sin.f64 ky)) (sin.f64 ky))
(134-z0z1z2z3z4 #s(literal 1 binary64) (neg.f64 (sin.f64 kx)) (neg.f64 (sin.f64 kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal -1/2 binary64))
(134-z0z1z2z3z4 #s(literal 1 binary64) (neg.f64 (sin.f64 kx)) (neg.f64 (sin.f64 kx)) #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64)))
(134-z0z1z2z3z4 #s(literal 1 binary64) (neg.f64 (sin.f64 kx)) (neg.f64 (sin.f64 kx)) (sin.f64 ky) (neg.f64 (sin.f64 ky)))
(134-z0z1z2z3z4 #s(literal 1 binary64) (neg.f64 (fabs.f64 (sin.f64 kx))) (neg.f64 (fabs.f64 (sin.f64 kx))) #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))
(134-z0z1z2z3z4 #s(literal 1 binary64) (neg.f64 (fabs.f64 (sin.f64 kx))) (neg.f64 (fabs.f64 (sin.f64 kx))) (-.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(134-z0z1z2z3z4 #s(literal 1 binary64) (neg.f64 (fabs.f64 (sin.f64 kx))) (neg.f64 (fabs.f64 (sin.f64 kx))) (neg.f64 (sin.f64 ky)) (sin.f64 ky))
(134-z0z1z2z3z4 #s(literal 1 binary64) (neg.f64 (fabs.f64 (sin.f64 kx))) (neg.f64 (fabs.f64 (sin.f64 kx))) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal -1/2 binary64))
(134-z0z1z2z3z4 #s(literal 1 binary64) (neg.f64 (fabs.f64 (sin.f64 kx))) (neg.f64 (fabs.f64 (sin.f64 kx))) #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64)))
(134-z0z1z2z3z4 #s(literal 1 binary64) (neg.f64 (fabs.f64 (sin.f64 kx))) (neg.f64 (fabs.f64 (sin.f64 kx))) (sin.f64 ky) (neg.f64 (sin.f64 ky)))
(134-z0z1z2z3z4 #s(literal 1 binary64) (neg.f64 (sin.f64 ky)) (neg.f64 (sin.f64 ky)) (neg.f64 (sin.f64 kx)) (sin.f64 kx))
(134-z0z1z2z3z4 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (neg.f64 (sin.f64 kx)) (sin.f64 kx))
(134-z0z1z2z3z4 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx)) (fabs.f64 (sin.f64 kx)) #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))
(134-z0z1z2z3z4 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx)) (fabs.f64 (sin.f64 kx)) (-.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(134-z0z1z2z3z4 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx)) (fabs.f64 (sin.f64 kx)) (neg.f64 (sin.f64 ky)) (sin.f64 ky))
(134-z0z1z2z3z4 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx)) (fabs.f64 (sin.f64 kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal -1/2 binary64))
(134-z0z1z2z3z4 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx)) (fabs.f64 (sin.f64 kx)) #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64)))
(134-z0z1z2z3z4 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx)) (fabs.f64 (sin.f64 kx)) (sin.f64 ky) (neg.f64 (sin.f64 ky)))
(134-z0z1z2z3z4 #s(literal 1 binary64) #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (neg.f64 (sin.f64 kx)) (sin.f64 kx))
(134-z0z1z2z3z4 #s(literal 1 binary64) (sin.f64 kx) (sin.f64 kx) #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))
(134-z0z1z2z3z4 #s(literal 1 binary64) (sin.f64 kx) (sin.f64 kx) (-.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(134-z0z1z2z3z4 #s(literal 1 binary64) (sin.f64 kx) (sin.f64 kx) (neg.f64 (sin.f64 ky)) (sin.f64 ky))
(134-z0z1z2z3z4 #s(literal 1 binary64) (sin.f64 kx) (sin.f64 kx) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal -1/2 binary64))
(134-z0z1z2z3z4 #s(literal 1 binary64) (sin.f64 kx) (sin.f64 kx) #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64)))
(134-z0z1z2z3z4 #s(literal 1 binary64) (sin.f64 kx) (sin.f64 kx) (sin.f64 ky) (neg.f64 (sin.f64 ky)))
(134-z0z1z2z3z4 #s(literal 1 binary64) (sin.f64 ky) (sin.f64 ky) (neg.f64 (sin.f64 kx)) (sin.f64 kx))
(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 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))
(neg.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))
(neg.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))
(neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))
(-.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (/.f64 (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) #s(literal 1 binary64)))
(-.f64 (/.f64 (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (/.f64 (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) #s(literal 1 binary64)))
(-.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.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/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (/.f64 (*.f64 (neg.f64 (sin.f64 kx)) (sin.f64 kx)) #s(literal 1 binary64)))
(-.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (/.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) #s(literal 1 binary64)))
(-.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (/.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1 binary64)))
(-.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (*.f64 (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/2 binary64))) #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 kx kx)) (-.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 (neg.f64 (sin.f64 kx)) (sin.f64 kx)))
(-.f64 (-.f64 #s(literal 1/2 binary64) (*.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 (-.f64 (cos.f64 (+.f64 kx kx)) (-.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 (cos.f64 (+.f64 kx kx)) (-.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/2 binary64))) (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))
(sqrt.f64 (*.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))) (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))
(fabs.f64 (*.f64 (neg.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))))
(fabs.f64 (*.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))))
(fabs.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))
(exp.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))) #s(literal -1 binary64)))
(exp.f64 (*.f64 (log.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))) #s(literal 1 binary64)))
(+.f64 (/.f64 (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (/.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1 binary64)))
(+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.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/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #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 binary64)) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #s(literal 1 binary64)))
(+.f64 (/.f64 #s(literal 1/2 binary64) (/.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))) (/.f64 #s(literal 1/2 binary64) (/.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (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 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))
(+.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal 1/2 binary64))
(+.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))) (/.f64 #s(literal 0 binary64) (/.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 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 kx kx)) #s(literal 1/2 binary64))))
(+.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 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 #s(literal 1/2 binary64) (/.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal 1 binary64)))
(+.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 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/2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))))
(+.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 ky ky)) #s(literal 1/2 binary64))))
(*.f64 (sqrt.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))) (sqrt.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))))
(*.f64 (pow.f64 #s(literal -1 binary64) #s(literal 1/2 binary64)) (pow.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))) (pow.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))))
(*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))))
(*.f64 (pow.f64 #s(literal 1 binary64) #s(literal 1/2 binary64)) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))
(*.f64 (sqrt.f64 #s(literal 1 binary64)) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))
(*.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))) (pow.f64 #s(literal 1 binary64) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 1 binary64)))
(pow.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))) #s(literal 1/2 binary64))
(/.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))
(/.f64 (sqrt.f64 #s(literal 1 binary64)) (sqrt.f64 (/.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))
(/.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))))
(sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))
(fabs.f64 (neg.f64 (neg.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))))
(fabs.f64 (neg.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))))
(fabs.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))
(exp.f64 (*.f64 (log.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(*.f64 (*.f64 (neg.f64 (sin.f64 ky)) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))) (sin.f64 ky))
(*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))) (neg.f64 (sin.f64 ky)))
(*.f64 (neg.f64 (sin.f64 ky)) (/.f64 #s(literal -1 binary64) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))))
(*.f64 (sin.f64 ky) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))))
(/.f64 (neg.f64 (*.f64 (neg.f64 (sin.f64 ky)) #s(literal -1 binary64))) (neg.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))))
(/.f64 (neg.f64 (*.f64 (neg.f64 (sin.f64 ky)) #s(literal 1 binary64))) (neg.f64 (neg.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))))
(/.f64 (neg.f64 (*.f64 (sin.f64 ky) #s(literal 1 binary64))) (neg.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))))
(/.f64 (neg.f64 (neg.f64 (neg.f64 (sin.f64 ky)))) (neg.f64 (neg.f64 (neg.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))))))
(/.f64 (*.f64 (neg.f64 (sin.f64 ky)) #s(literal -1 binary64)) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))
(/.f64 (*.f64 (neg.f64 (sin.f64 ky)) #s(literal 1 binary64)) (neg.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))))
(/.f64 (neg.f64 (neg.f64 (sin.f64 ky))) (neg.f64 (neg.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))))
(/.f64 (*.f64 (sin.f64 ky) #s(literal 1 binary64)) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))
(/.f64 (neg.f64 (sin.f64 ky)) (neg.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))) (neg.f64 (sin.f64 ky))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))) (sin.f64 ky)))
(/.f64 (sin.f64 ky) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))
(134-z0z1z2z3z4 (/.f64 #s(literal -1 binary64) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))) (cos.f64 ky) #s(literal 0 binary64) (sin.f64 ky) #s(literal 1 binary64))
(134-z0z1z2z3z4 (/.f64 #s(literal -1 binary64) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))) #s(literal 0 binary64) (cos.f64 ky) #s(literal 1 binary64) (sin.f64 ky))
(134-z0z1z2z3z4 (/.f64 #s(literal -1 binary64) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))) (sin.f64 ky) #s(literal -1 binary64) (cos.f64 ky) (sin.f64 (neg.f64 (PI.f64))))
(neg.f64 (*.f64 (sin.f64 ky) (/.f64 #s(literal -1 binary64) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))))
(neg.f64 (/.f64 (sin.f64 ky) (neg.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))))
(neg.f64 (/.f64 (neg.f64 (sin.f64 ky)) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))))
(-.f64 (/.f64 (*.f64 (cos.f64 ky) #s(literal 0 binary64)) (neg.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))) (/.f64 (*.f64 (sin.f64 ky) #s(literal 1 binary64)) (neg.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))))
(+.f64 (/.f64 (*.f64 (sin.f64 ky) #s(literal -1 binary64)) (neg.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))) (/.f64 (*.f64 (cos.f64 ky) #s(literal 0 binary64)) (neg.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))))
(*.f64 (*.f64 (neg.f64 (sin.f64 ky)) (sin.f64 th)) (/.f64 #s(literal -1 binary64) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))) (sin.f64 th))
(*.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))))
(*.f64 (/.f64 (neg.f64 (sin.f64 th)) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))) (neg.f64 (sin.f64 ky)))
(*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))) (*.f64 (sin.f64 th) (neg.f64 (sin.f64 ky))))
(*.f64 (neg.f64 (sin.f64 ky)) (/.f64 (neg.f64 (sin.f64 th)) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))))
(*.f64 (sin.f64 th) (/.f64 (sin.f64 ky) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))))
(*.f64 (sin.f64 ky) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))) (sin.f64 th)))
(*.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))))
(*.f64 (sin.f64 ky) (neg.f64 (/.f64 (neg.f64 (sin.f64 th)) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 ky th))) #s(literal -1 binary64)) (*.f64 #s(literal 2 binary64) (neg.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 ky th))) #s(literal 1 binary64)) (*.f64 #s(literal 2 binary64) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))))
(/.f64 (neg.f64 (*.f64 (sin.f64 th) (neg.f64 (sin.f64 ky)))) (neg.f64 (neg.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))))
(/.f64 (neg.f64 (*.f64 (neg.f64 (sin.f64 ky)) (neg.f64 (sin.f64 th)))) (neg.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))))
(/.f64 (neg.f64 (*.f64 (neg.f64 (sin.f64 ky)) (sin.f64 th))) (neg.f64 (neg.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))))
(/.f64 (neg.f64 (*.f64 (neg.f64 (sin.f64 th)) (neg.f64 (sin.f64 ky)))) (neg.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))))
(/.f64 (neg.f64 (neg.f64 (*.f64 (sin.f64 th) (sin.f64 ky)))) (neg.f64 (neg.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))))
(/.f64 (*.f64 (sin.f64 th) (neg.f64 (sin.f64 ky))) (neg.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))))
(/.f64 (*.f64 (neg.f64 (sin.f64 ky)) (neg.f64 (sin.f64 th))) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))
(/.f64 (*.f64 (neg.f64 (sin.f64 ky)) (sin.f64 th)) (neg.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))))
(/.f64 (*.f64 (neg.f64 (sin.f64 th)) (neg.f64 (sin.f64 ky))) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))
(/.f64 (neg.f64 (*.f64 (sin.f64 th) (sin.f64 ky))) (neg.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))))
(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))) (*.f64 (sin.f64 th) (sin.f64 ky))))
(134-z0z1z2z3z4 (/.f64 (neg.f64 (sin.f64 th)) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))) (cos.f64 ky) #s(literal 0 binary64) (sin.f64 ky) #s(literal 1 binary64))
(134-z0z1z2z3z4 (/.f64 (neg.f64 (sin.f64 th)) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))) #s(literal 0 binary64) (cos.f64 ky) #s(literal 1 binary64) (sin.f64 ky))
(134-z0z1z2z3z4 (/.f64 (neg.f64 (sin.f64 th)) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))) (sin.f64 ky) #s(literal -1 binary64) (cos.f64 ky) (sin.f64 (neg.f64 (PI.f64))))
(neg.f64 (/.f64 (*.f64 (sin.f64 ky) (neg.f64 (sin.f64 th))) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 ky) #s(literal -1 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 ky) #s(literal 0 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (sin.f64 ky) #s(literal -1 binary64)) (*.f64 (sin.f64 ky) #s(literal -1 binary64))) (-.f64 (*.f64 (*.f64 (cos.f64 ky) #s(literal 0 binary64)) (*.f64 (cos.f64 ky) #s(literal 0 binary64))) (*.f64 (*.f64 (sin.f64 ky) #s(literal -1 binary64)) (*.f64 (cos.f64 ky) #s(literal 0 binary64))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 ky) #s(literal 0 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 ky) #s(literal 1 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 ky) #s(literal 0 binary64)) (*.f64 (cos.f64 ky) #s(literal 0 binary64))) (+.f64 (*.f64 (*.f64 (sin.f64 ky) #s(literal 1 binary64)) (*.f64 (sin.f64 ky) #s(literal 1 binary64))) (*.f64 (*.f64 (cos.f64 ky) #s(literal 0 binary64)) (*.f64 (sin.f64 ky) #s(literal 1 binary64))))))
(neg.f64 (sin.f64 ky))
(sin.f64 (+.f64 (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (neg.f64 ky))
(sin.f64 (+.f64 (PI.f64) ky))
(-.f64 (*.f64 #s(literal 0 binary64) (cos.f64 ky)) (*.f64 #s(literal 1 binary64) (sin.f64 ky)))
(-.f64 (*.f64 (cos.f64 ky) #s(literal 0 binary64)) (*.f64 (sin.f64 ky) #s(literal 1 binary64)))
(-.f64 (*.f64 (sin.f64 ky) #s(literal -1 binary64)) (*.f64 (cos.f64 ky) (sin.f64 (neg.f64 (PI.f64)))))
(cos.f64 (neg.f64 (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky))))
(cos.f64 (neg.f64 (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky))))
(cos.f64 (fabs.f64 (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky))))
(cos.f64 (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)))
(cos.f64 (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)))
(cos.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky))
(+.f64 (*.f64 #s(literal 0 binary64) (cos.f64 ky)) (*.f64 #s(literal -1 binary64) (sin.f64 ky)))
(+.f64 (*.f64 (cos.f64 ky) #s(literal 0 binary64)) (*.f64 (sin.f64 ky) (sin.f64 (neg.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))))))
(+.f64 (*.f64 (cos.f64 ky) #s(literal 0 binary64)) (*.f64 (neg.f64 (sin.f64 ky)) #s(literal 1 binary64)))
(+.f64 (*.f64 (sin.f64 ky) #s(literal -1 binary64)) (*.f64 (cos.f64 ky) #s(literal 0 binary64)))
#s(literal -1 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 (-.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 (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 (*.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 (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 #s(literal -1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))
(+.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal -1/2 binary64))
(*.f64 (+.f64 #s(literal 1 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 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) (*.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 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))))) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))
(*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (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 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (*.f64 (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 ky ky)) #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)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))
(/.f64 (+.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (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 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) (*.f64 #s(literal 1/2 binary64) (+.f64 (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 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #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 (cos.f64 (+.f64 kx kx)) #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 (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) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) (*.f64 (cos.f64 (+.f64 kx kx)) #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 (+.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #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 (+.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 (cos.f64 (+.f64 kx kx)) #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 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 3 binary64))) (+.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 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))) (*.f64 #s(literal -1/2 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 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))))))
(/.f64 (-.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 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (-.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 ky ky)) #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 (*.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 (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 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) (*.f64 #s(literal 1/2 binary64) (+.f64 (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 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1/2 binary64)))
(/.f64 (-.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 (-.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 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))
(/.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #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 (-.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 (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (*.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 ky ky)) #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 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #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 (*.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 (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 (-.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (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 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) (*.f64 #s(literal 1/2 binary64) (+.f64 (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 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1/2 binary64)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (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/2 binary64))) #s(literal 3 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 (*.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 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))))
(/.f64 (-.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 (-.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 (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 (-.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) (*.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 kx kx)) #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 (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) #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 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 ky ky)) #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 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #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 (-.f64 (pow.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #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 (-.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 (cos.f64 (+.f64 kx kx)) #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 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))))
(-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1/2 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) (cos.f64 (+.f64 ky ky))))
(-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #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)) #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 (cos.f64 (+.f64 ky ky)) (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 ky ky)))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))
(+.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))
(+.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #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 kx kx)) #s(literal 1/2 binary64)) (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))
(+.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 (pow.f64 #s(literal 1 binary64) #s(literal -1 binary64)) (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))
(*.f64 (pow.f64 #s(literal -1 binary64) #s(literal 1 binary64)) (pow.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))) #s(literal 1 binary64)))
(*.f64 (pow.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal 1/2 binary64))) #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/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 #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 (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 #s(literal 1 binary64) (/.f64 (*.f64 (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/2 binary64))) #s(literal -1/2 binary64)))) (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal -1/2 binary64)))
(*.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 (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 (/.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64))))
(*.f64 (pow.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))))
(*.f64 (+.f64 #s(literal 1 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 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 binary64) (/.f64 (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))
(*.f64 (neg.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))) (neg.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))))
(*.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))
(*.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))) (pow.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))) #s(literal 0 binary64)))
(*.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))) (pow.f64 #s(literal 1 binary64) #s(literal 1 binary64)))
(*.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))) #s(literal 1 binary64))
(*.f64 #s(literal -1 binary64) (/.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))) #s(literal 1 binary64)))
(*.f64 #s(literal -1 binary64) (*.f64 #s(literal -1 binary64) (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))
(*.f64 #s(literal 1 binary64) (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))
(pow.f64 (*.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))) (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(pow.f64 (/.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))) #s(literal -1 binary64))
(pow.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))) #s(literal 2 binary64))
(pow.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))) #s(literal 1 binary64))
(/.f64 (+.f64 (pow.f64 (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal -1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 3 binary64))) (+.f64 (*.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 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal -1/2 binary64))) (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))) (*.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 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))))))
(/.f64 (+.f64 (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal 3 binary64)) (pow.f64 #s(literal 1/2 binary64) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))) (-.f64 (*.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (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 (*.f64 #s(literal -1/2 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/2 binary64) #s(literal 1/2 binary64)) (-.f64 (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (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) (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/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (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 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #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 (-.f64 #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)) #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 (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))
(/.f64 (-.f64 (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal 3 binary64)) (pow.f64 #s(literal -1/2 binary64) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) #s(literal -1/2 binary64)) (*.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal -1/2 binary64)))))
(/.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 (neg.f64 (sin.f64 kx)) (sin.f64 kx)) #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 (neg.f64 (sin.f64 kx)) (sin.f64 kx)) (*.f64 (neg.f64 (sin.f64 kx)) (sin.f64 kx))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (*.f64 (neg.f64 (sin.f64 kx)) (sin.f64 kx))))))
(/.f64 (+.f64 (-.f64 (cos.f64 (-.f64 ky ky)) (cos.f64 (+.f64 ky ky))) (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx)))) #s(literal 2 binary64))
(/.f64 (+.f64 (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx))) (-.f64 (cos.f64 (-.f64 ky ky)) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (-.f64 (cos.f64 (-.f64 ky ky)) (cos.f64 (+.f64 ky ky))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx))))) #s(literal 4 binary64))
(/.f64 (+.f64 (*.f64 (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 ky ky)) (cos.f64 (+.f64 ky ky))))) #s(literal 4 binary64))
(/.f64 (*.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))) #s(literal 2 binary64)) #s(literal 2 binary64))
(/.f64 (*.f64 #s(literal 2 binary64) (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))) #s(literal 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 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) #s(literal -1 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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal -1 binary64))
(/.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))) #s(literal -1 binary64))
(/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))))
(/.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 #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 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))
(/.f64 (-.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 (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 (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 (-.f64 (*.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 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #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 (-.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 ky ky)) #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 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 (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 (+.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal 3 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 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 #s(literal 1/2 binary64) (*.f64 (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 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/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 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))))
(/.f64 (-.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 (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 (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 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 (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 (-.f64 (pow.f64 (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #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 (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal -1/2 binary64)) (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #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 (-.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 ky ky)) #s(literal 1/2 binary64))))))
(/.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 ky ky)))) #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 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 (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 -2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))) #s(literal 2 binary64)))
(/.f64 #s(literal -2 binary64) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))
(/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)) #s(literal -1 binary64))
(/.f64 (-.f64 (*.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 (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 #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 ky ky)) #s(literal 1/2 binary64)))))
(/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))
(/.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 (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 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 (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 #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 ky ky)) #s(literal 1/2 binary64)))))))
(/.f64 (-.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 3 binary64)) (pow.f64 (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (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 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))))
(/.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))) #s(literal 1 binary64))
(/.f64 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))) #s(literal -1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))
(/.f64 #s(literal 2 binary64) (*.f64 (/.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))
(134-z0z1z2z3z4 #s(literal 1 binary64) (fabs.f64 (fabs.f64 (sin.f64 ky))) (fabs.f64 (fabs.f64 (sin.f64 ky))) (neg.f64 (sin.f64 kx)) (sin.f64 kx))
(134-z0z1z2z3z4 #s(literal 1 binary64) (neg.f64 (neg.f64 (sin.f64 kx))) (neg.f64 (neg.f64 (sin.f64 kx))) #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))
(134-z0z1z2z3z4 #s(literal 1 binary64) (neg.f64 (neg.f64 (sin.f64 kx))) (neg.f64 (neg.f64 (sin.f64 kx))) (-.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(134-z0z1z2z3z4 #s(literal 1 binary64) (neg.f64 (neg.f64 (sin.f64 kx))) (neg.f64 (neg.f64 (sin.f64 kx))) (neg.f64 (sin.f64 ky)) (sin.f64 ky))
(134-z0z1z2z3z4 #s(literal 1 binary64) (neg.f64 (neg.f64 (sin.f64 kx))) (neg.f64 (neg.f64 (sin.f64 kx))) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal -1/2 binary64))
(134-z0z1z2z3z4 #s(literal 1 binary64) (neg.f64 (neg.f64 (sin.f64 kx))) (neg.f64 (neg.f64 (sin.f64 kx))) #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64)))
(134-z0z1z2z3z4 #s(literal 1 binary64) (neg.f64 (neg.f64 (sin.f64 kx))) (neg.f64 (neg.f64 (sin.f64 kx))) (sin.f64 ky) (neg.f64 (sin.f64 ky)))
(134-z0z1z2z3z4 #s(literal 1 binary64) (neg.f64 (fabs.f64 (sin.f64 ky))) (neg.f64 (fabs.f64 (sin.f64 ky))) (neg.f64 (sin.f64 kx)) (sin.f64 kx))
(134-z0z1z2z3z4 #s(literal 1 binary64) (sin.f64 (fabs.f64 kx)) (sin.f64 (fabs.f64 kx)) #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))
(134-z0z1z2z3z4 #s(literal 1 binary64) (sin.f64 (fabs.f64 kx)) (sin.f64 (fabs.f64 kx)) (-.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(134-z0z1z2z3z4 #s(literal 1 binary64) (sin.f64 (fabs.f64 kx)) (sin.f64 (fabs.f64 kx)) (neg.f64 (sin.f64 ky)) (sin.f64 ky))
(134-z0z1z2z3z4 #s(literal 1 binary64) (sin.f64 (fabs.f64 kx)) (sin.f64 (fabs.f64 kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal -1/2 binary64))
(134-z0z1z2z3z4 #s(literal 1 binary64) (sin.f64 (fabs.f64 kx)) (sin.f64 (fabs.f64 kx)) #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64)))
(134-z0z1z2z3z4 #s(literal 1 binary64) (sin.f64 (fabs.f64 kx)) (sin.f64 (fabs.f64 kx)) (sin.f64 ky) (neg.f64 (sin.f64 ky)))
(134-z0z1z2z3z4 #s(literal 1 binary64) (sin.f64 (fabs.f64 ky)) (sin.f64 (fabs.f64 ky)) (neg.f64 (sin.f64 kx)) (sin.f64 kx))
(134-z0z1z2z3z4 #s(literal 1 binary64) (neg.f64 (neg.f64 (sin.f64 ky))) (neg.f64 (neg.f64 (sin.f64 ky))) (neg.f64 (sin.f64 kx)) (sin.f64 kx))
(134-z0z1z2z3z4 #s(literal 1 binary64) (fabs.f64 (sin.f64 ky)) (fabs.f64 (sin.f64 ky)) (neg.f64 (sin.f64 kx)) (sin.f64 kx))
(134-z0z1z2z3z4 #s(literal 1 binary64) (neg.f64 (sin.f64 kx)) (neg.f64 (sin.f64 kx)) #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))
(134-z0z1z2z3z4 #s(literal 1 binary64) (neg.f64 (sin.f64 kx)) (neg.f64 (sin.f64 kx)) (-.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(134-z0z1z2z3z4 #s(literal 1 binary64) (neg.f64 (sin.f64 kx)) (neg.f64 (sin.f64 kx)) (neg.f64 (sin.f64 ky)) (sin.f64 ky))
(134-z0z1z2z3z4 #s(literal 1 binary64) (neg.f64 (sin.f64 kx)) (neg.f64 (sin.f64 kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal -1/2 binary64))
(134-z0z1z2z3z4 #s(literal 1 binary64) (neg.f64 (sin.f64 kx)) (neg.f64 (sin.f64 kx)) #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64)))
(134-z0z1z2z3z4 #s(literal 1 binary64) (neg.f64 (sin.f64 kx)) (neg.f64 (sin.f64 kx)) (sin.f64 ky) (neg.f64 (sin.f64 ky)))
(134-z0z1z2z3z4 #s(literal 1 binary64) (neg.f64 (fabs.f64 (sin.f64 kx))) (neg.f64 (fabs.f64 (sin.f64 kx))) #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))
(134-z0z1z2z3z4 #s(literal 1 binary64) (neg.f64 (fabs.f64 (sin.f64 kx))) (neg.f64 (fabs.f64 (sin.f64 kx))) (-.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(134-z0z1z2z3z4 #s(literal 1 binary64) (neg.f64 (fabs.f64 (sin.f64 kx))) (neg.f64 (fabs.f64 (sin.f64 kx))) (neg.f64 (sin.f64 ky)) (sin.f64 ky))
(134-z0z1z2z3z4 #s(literal 1 binary64) (neg.f64 (fabs.f64 (sin.f64 kx))) (neg.f64 (fabs.f64 (sin.f64 kx))) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal -1/2 binary64))
(134-z0z1z2z3z4 #s(literal 1 binary64) (neg.f64 (fabs.f64 (sin.f64 kx))) (neg.f64 (fabs.f64 (sin.f64 kx))) #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64)))
(134-z0z1z2z3z4 #s(literal 1 binary64) (neg.f64 (fabs.f64 (sin.f64 kx))) (neg.f64 (fabs.f64 (sin.f64 kx))) (sin.f64 ky) (neg.f64 (sin.f64 ky)))
(134-z0z1z2z3z4 #s(literal 1 binary64) (neg.f64 (sin.f64 ky)) (neg.f64 (sin.f64 ky)) (neg.f64 (sin.f64 kx)) (sin.f64 kx))
(134-z0z1z2z3z4 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (neg.f64 (sin.f64 kx)) (sin.f64 kx))
(134-z0z1z2z3z4 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx)) (fabs.f64 (sin.f64 kx)) #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))
(134-z0z1z2z3z4 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx)) (fabs.f64 (sin.f64 kx)) (-.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(134-z0z1z2z3z4 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx)) (fabs.f64 (sin.f64 kx)) (neg.f64 (sin.f64 ky)) (sin.f64 ky))
(134-z0z1z2z3z4 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx)) (fabs.f64 (sin.f64 kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal -1/2 binary64))
(134-z0z1z2z3z4 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx)) (fabs.f64 (sin.f64 kx)) #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64)))
(134-z0z1z2z3z4 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx)) (fabs.f64 (sin.f64 kx)) (sin.f64 ky) (neg.f64 (sin.f64 ky)))
(134-z0z1z2z3z4 #s(literal 1 binary64) #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (neg.f64 (sin.f64 kx)) (sin.f64 kx))
(134-z0z1z2z3z4 #s(literal 1 binary64) (sin.f64 kx) (sin.f64 kx) #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))
(134-z0z1z2z3z4 #s(literal 1 binary64) (sin.f64 kx) (sin.f64 kx) (-.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(134-z0z1z2z3z4 #s(literal 1 binary64) (sin.f64 kx) (sin.f64 kx) (neg.f64 (sin.f64 ky)) (sin.f64 ky))
(134-z0z1z2z3z4 #s(literal 1 binary64) (sin.f64 kx) (sin.f64 kx) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal -1/2 binary64))
(134-z0z1z2z3z4 #s(literal 1 binary64) (sin.f64 kx) (sin.f64 kx) #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64)))
(134-z0z1z2z3z4 #s(literal 1 binary64) (sin.f64 kx) (sin.f64 kx) (sin.f64 ky) (neg.f64 (sin.f64 ky)))
(134-z0z1z2z3z4 #s(literal 1 binary64) (sin.f64 ky) (sin.f64 ky) (neg.f64 (sin.f64 kx)) (sin.f64 kx))
(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 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))
(neg.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))
(neg.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))
(neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))
(-.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (/.f64 (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) #s(literal 1 binary64)))
(-.f64 (/.f64 (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (/.f64 (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) #s(literal 1 binary64)))
(-.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.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/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (/.f64 (*.f64 (neg.f64 (sin.f64 kx)) (sin.f64 kx)) #s(literal 1 binary64)))
(-.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (/.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) #s(literal 1 binary64)))
(-.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (/.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1 binary64)))
(-.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (*.f64 (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/2 binary64))) #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 kx kx)) (-.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 (neg.f64 (sin.f64 kx)) (sin.f64 kx)))
(-.f64 (-.f64 #s(literal 1/2 binary64) (*.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 (-.f64 (cos.f64 (+.f64 kx kx)) (-.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 (cos.f64 (+.f64 kx kx)) (-.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/2 binary64))) (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))
(sqrt.f64 (*.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))) (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))
(fabs.f64 (*.f64 (neg.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))))
(fabs.f64 (*.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))))
(fabs.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))
(exp.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))) #s(literal -1 binary64)))
(exp.f64 (*.f64 (log.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))) #s(literal 1 binary64)))
(+.f64 (/.f64 (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (/.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1 binary64)))
(+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.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/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #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 binary64)) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #s(literal 1 binary64)))
(+.f64 (/.f64 #s(literal 1/2 binary64) (/.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))) (/.f64 #s(literal 1/2 binary64) (/.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (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 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))
(+.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal 1/2 binary64))
(+.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))) (/.f64 #s(literal 0 binary64) (/.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 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 kx kx)) #s(literal 1/2 binary64))))
(+.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 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 #s(literal 1/2 binary64) (/.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal 1 binary64)))
(+.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 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/2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))))
(+.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 ky ky)) #s(literal 1/2 binary64))))
(*.f64 (sqrt.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))) (sqrt.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))))
(*.f64 (pow.f64 #s(literal -1 binary64) #s(literal 1/2 binary64)) (pow.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))) (pow.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))))
(*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))))
(*.f64 (pow.f64 #s(literal 1 binary64) #s(literal 1/2 binary64)) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))
(*.f64 (sqrt.f64 #s(literal 1 binary64)) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))
(*.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))) (pow.f64 #s(literal 1 binary64) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 1 binary64)))
(pow.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))) #s(literal 1/2 binary64))
(/.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))
(/.f64 (sqrt.f64 #s(literal 1 binary64)) (sqrt.f64 (/.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))
(/.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))))
(sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))
(fabs.f64 (neg.f64 (neg.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))))
(fabs.f64 (neg.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))))
(fabs.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))
(exp.f64 (*.f64 (log.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))) #s(literal -1 binary64))
(*.f64 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))))
(*.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))))
(pow.f64 (neg.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))) #s(literal -1 binary64))
(/.f64 #s(literal -2 binary64) (*.f64 #s(literal 2 binary64) (neg.f64 (neg.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))))))
(/.f64 #s(literal -2 binary64) (*.f64 #s(literal 2 binary64) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))))
(/.f64 #s(literal -1 binary64) (*.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))))))
(/.f64 #s(literal -1 binary64) (*.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (neg.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))))
(/.f64 #s(literal -1 binary64) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))
(/.f64 #s(literal 1 binary64) (*.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (neg.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))))))
(/.f64 #s(literal 1 binary64) (pow.f64 (neg.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))) #s(literal -1 binary64)))
(/.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))))
(/.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (neg.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))))
(neg.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))))
(exp.f64 (*.f64 (log.f64 (neg.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))) #s(literal -1 binary64)))
(+.f64 (/.f64 #s(literal 1/2 binary64) (neg.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))) (/.f64 #s(literal 1/2 binary64) (neg.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))))
(+.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))) (/.f64 #s(literal 0 binary64) (neg.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))))
(*.f64 (neg.f64 (sin.f64 th)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))))
(*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))) (sin.f64 th))
(*.f64 #s(literal -1 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))) (sin.f64 th)))
(*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))))
(*.f64 (sin.f64 th) (/.f64 #s(literal -1 binary64) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))))
(/.f64 (neg.f64 (*.f64 (sin.f64 th) #s(literal 1 binary64))) (neg.f64 (neg.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))))
(/.f64 (neg.f64 (neg.f64 (neg.f64 (sin.f64 th)))) (neg.f64 (neg.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))))
(/.f64 (*.f64 (sin.f64 th) #s(literal 1 binary64)) (neg.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))))
(/.f64 (*.f64 #s(literal 1 binary64) (sin.f64 th)) (neg.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))))
(/.f64 (neg.f64 (neg.f64 (sin.f64 th))) (neg.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))))
(/.f64 (neg.f64 (sin.f64 th)) (neg.f64 (neg.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))))
(/.f64 (neg.f64 (sin.f64 th)) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))) (neg.f64 (sin.f64 th))))
(/.f64 (sin.f64 th) (neg.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))))
(*.f64 (*.f64 (neg.f64 (sin.f64 ky)) (sin.f64 th)) (/.f64 #s(literal -1 binary64) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))) (sin.f64 th))
(*.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))))
(*.f64 (/.f64 (neg.f64 (sin.f64 th)) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))) (neg.f64 (sin.f64 ky)))
(*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))) (*.f64 (sin.f64 th) (neg.f64 (sin.f64 ky))))
(*.f64 (neg.f64 (sin.f64 ky)) (/.f64 (neg.f64 (sin.f64 th)) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))))
(*.f64 (sin.f64 th) (/.f64 (sin.f64 ky) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))))
(*.f64 (sin.f64 ky) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))) (sin.f64 th)))
(*.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))))
(*.f64 (sin.f64 ky) (neg.f64 (/.f64 (neg.f64 (sin.f64 th)) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 ky th))) #s(literal -1 binary64)) (*.f64 #s(literal 2 binary64) (neg.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 ky th))) #s(literal 1 binary64)) (*.f64 #s(literal 2 binary64) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))))
(/.f64 (neg.f64 (*.f64 (sin.f64 th) (neg.f64 (sin.f64 ky)))) (neg.f64 (neg.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))))
(/.f64 (neg.f64 (*.f64 (neg.f64 (sin.f64 ky)) (neg.f64 (sin.f64 th)))) (neg.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))))
(/.f64 (neg.f64 (*.f64 (neg.f64 (sin.f64 ky)) (sin.f64 th))) (neg.f64 (neg.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))))
(/.f64 (neg.f64 (*.f64 (neg.f64 (sin.f64 th)) (neg.f64 (sin.f64 ky)))) (neg.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))))
(/.f64 (neg.f64 (neg.f64 (*.f64 (sin.f64 th) (sin.f64 ky)))) (neg.f64 (neg.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))))
(/.f64 (*.f64 (sin.f64 th) (neg.f64 (sin.f64 ky))) (neg.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))))
(/.f64 (*.f64 (neg.f64 (sin.f64 ky)) (neg.f64 (sin.f64 th))) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))
(/.f64 (*.f64 (neg.f64 (sin.f64 ky)) (sin.f64 th)) (neg.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))))
(/.f64 (*.f64 (neg.f64 (sin.f64 th)) (neg.f64 (sin.f64 ky))) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))
(/.f64 (neg.f64 (*.f64 (sin.f64 th) (sin.f64 ky))) (neg.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))))
(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))) (*.f64 (sin.f64 th) (sin.f64 ky))))
(134-z0z1z2z3z4 (/.f64 (neg.f64 (sin.f64 th)) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))) (cos.f64 ky) #s(literal 0 binary64) (sin.f64 ky) #s(literal 1 binary64))
(134-z0z1z2z3z4 (/.f64 (neg.f64 (sin.f64 th)) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))) #s(literal 0 binary64) (cos.f64 ky) #s(literal 1 binary64) (sin.f64 ky))
(134-z0z1z2z3z4 (/.f64 (neg.f64 (sin.f64 th)) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))) (sin.f64 ky) #s(literal -1 binary64) (cos.f64 ky) (sin.f64 (neg.f64 (PI.f64))))
(neg.f64 (/.f64 (*.f64 (sin.f64 ky) (neg.f64 (sin.f64 th))) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))))
(*.f64 (pow.f64 #s(literal -1 binary64) #s(literal -1 binary64)) (pow.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))) #s(literal -1 binary64)))
(*.f64 (pow.f64 #s(literal 1 binary64) #s(literal -1 binary64)) (/.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))
(*.f64 (pow.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64))) (pow.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64))))
(*.f64 (/.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))) (pow.f64 #s(literal 1 binary64) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))) #s(literal 1 binary64))
(*.f64 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))
(*.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))
(pow.f64 (/.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))) #s(literal 1 binary64))
(pow.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))) #s(literal -1 binary64))
(/.f64 #s(literal -2 binary64) (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))
(/.f64 #s(literal -1 binary64) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))
(/.f64 #s(literal -1 binary64) (-.f64 (-.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 ky ky)) #s(literal 1/2 binary64)))))
(/.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))
(/.f64 #s(literal -1 binary64) (*.f64 #s(literal -1 binary64) (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))
(/.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))
(/.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))
(neg.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))
(exp.f64 (*.f64 (log.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))) #s(literal -1 binary64)))
(+.f64 (/.f64 #s(literal 1/2 binary64) (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))) (/.f64 #s(literal 1/2 binary64) (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))
(+.f64 (/.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))) (/.f64 #s(literal 0 binary64) (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))
(*.f64 (pow.f64 #s(literal 1 binary64) #s(literal -1 binary64)) (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))
(*.f64 (pow.f64 #s(literal -1 binary64) #s(literal 1 binary64)) (pow.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))) #s(literal 1 binary64)))
(*.f64 (pow.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal 1/2 binary64))) #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/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 #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 (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 #s(literal 1 binary64) (/.f64 (*.f64 (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/2 binary64))) #s(literal -1/2 binary64)))) (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal -1/2 binary64)))
(*.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 (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 (/.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64))))
(*.f64 (pow.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))))
(*.f64 (+.f64 #s(literal 1 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 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 binary64) (/.f64 (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))
(*.f64 (neg.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))) (neg.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))))
(*.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))
(*.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))) (pow.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))) #s(literal 0 binary64)))
(*.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))) (pow.f64 #s(literal 1 binary64) #s(literal 1 binary64)))
(*.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))) #s(literal 1 binary64))
(*.f64 #s(literal -1 binary64) (/.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))) #s(literal 1 binary64)))
(*.f64 #s(literal -1 binary64) (*.f64 #s(literal -1 binary64) (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))
(*.f64 #s(literal 1 binary64) (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))
(pow.f64 (*.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))) (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(pow.f64 (/.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))) #s(literal -1 binary64))
(pow.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))) #s(literal 2 binary64))
(pow.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))) #s(literal 1 binary64))
(/.f64 (+.f64 (pow.f64 (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal -1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 3 binary64))) (+.f64 (*.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 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal -1/2 binary64))) (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))) (*.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 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))))))
(/.f64 (+.f64 (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal 3 binary64)) (pow.f64 #s(literal 1/2 binary64) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))) (-.f64 (*.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (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 (*.f64 #s(literal -1/2 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/2 binary64) #s(literal 1/2 binary64)) (-.f64 (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (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) (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/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (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 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #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 (-.f64 #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)) #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 (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))
(/.f64 (-.f64 (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal 3 binary64)) (pow.f64 #s(literal -1/2 binary64) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) #s(literal -1/2 binary64)) (*.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal -1/2 binary64)))))
(/.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 (neg.f64 (sin.f64 kx)) (sin.f64 kx)) #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 (neg.f64 (sin.f64 kx)) (sin.f64 kx)) (*.f64 (neg.f64 (sin.f64 kx)) (sin.f64 kx))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (*.f64 (neg.f64 (sin.f64 kx)) (sin.f64 kx))))))
(/.f64 (+.f64 (-.f64 (cos.f64 (-.f64 ky ky)) (cos.f64 (+.f64 ky ky))) (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx)))) #s(literal 2 binary64))
(/.f64 (+.f64 (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx))) (-.f64 (cos.f64 (-.f64 ky ky)) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (-.f64 (cos.f64 (-.f64 ky ky)) (cos.f64 (+.f64 ky ky))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx))))) #s(literal 4 binary64))
(/.f64 (+.f64 (*.f64 (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 ky ky)) (cos.f64 (+.f64 ky ky))))) #s(literal 4 binary64))
(/.f64 (*.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))) #s(literal 2 binary64)) #s(literal 2 binary64))
(/.f64 (*.f64 #s(literal 2 binary64) (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))) #s(literal 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 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) #s(literal -1 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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal -1 binary64))
(/.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))) #s(literal -1 binary64))
(/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))))
(/.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 #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 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))
(/.f64 (-.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 (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 (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 (-.f64 (*.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 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #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 (-.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 ky ky)) #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 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 (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 (+.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal 3 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 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 #s(literal 1/2 binary64) (*.f64 (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 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/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 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))))
(/.f64 (-.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 (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 (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 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 (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 (-.f64 (pow.f64 (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #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 (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal -1/2 binary64)) (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #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 (-.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 ky ky)) #s(literal 1/2 binary64))))))
(/.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 ky ky)))) #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 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 (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 -2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))) #s(literal 2 binary64)))
(/.f64 #s(literal -2 binary64) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))
(/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)) #s(literal -1 binary64))
(/.f64 (-.f64 (*.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 (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 #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 ky ky)) #s(literal 1/2 binary64)))))
(/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))
(/.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 (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 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 (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 #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 ky ky)) #s(literal 1/2 binary64)))))))
(/.f64 (-.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 3 binary64)) (pow.f64 (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (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 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))))
(/.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))) #s(literal 1 binary64))
(/.f64 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))) #s(literal -1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))
(/.f64 #s(literal 2 binary64) (*.f64 (/.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))
(134-z0z1z2z3z4 #s(literal 1 binary64) (fabs.f64 (fabs.f64 (sin.f64 ky))) (fabs.f64 (fabs.f64 (sin.f64 ky))) (neg.f64 (sin.f64 kx)) (sin.f64 kx))
(134-z0z1z2z3z4 #s(literal 1 binary64) (neg.f64 (neg.f64 (sin.f64 kx))) (neg.f64 (neg.f64 (sin.f64 kx))) #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))
(134-z0z1z2z3z4 #s(literal 1 binary64) (neg.f64 (neg.f64 (sin.f64 kx))) (neg.f64 (neg.f64 (sin.f64 kx))) (-.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(134-z0z1z2z3z4 #s(literal 1 binary64) (neg.f64 (neg.f64 (sin.f64 kx))) (neg.f64 (neg.f64 (sin.f64 kx))) (neg.f64 (sin.f64 ky)) (sin.f64 ky))
(134-z0z1z2z3z4 #s(literal 1 binary64) (neg.f64 (neg.f64 (sin.f64 kx))) (neg.f64 (neg.f64 (sin.f64 kx))) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal -1/2 binary64))
(134-z0z1z2z3z4 #s(literal 1 binary64) (neg.f64 (neg.f64 (sin.f64 kx))) (neg.f64 (neg.f64 (sin.f64 kx))) #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64)))
(134-z0z1z2z3z4 #s(literal 1 binary64) (neg.f64 (neg.f64 (sin.f64 kx))) (neg.f64 (neg.f64 (sin.f64 kx))) (sin.f64 ky) (neg.f64 (sin.f64 ky)))
(134-z0z1z2z3z4 #s(literal 1 binary64) (neg.f64 (fabs.f64 (sin.f64 ky))) (neg.f64 (fabs.f64 (sin.f64 ky))) (neg.f64 (sin.f64 kx)) (sin.f64 kx))
(134-z0z1z2z3z4 #s(literal 1 binary64) (sin.f64 (fabs.f64 kx)) (sin.f64 (fabs.f64 kx)) #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))
(134-z0z1z2z3z4 #s(literal 1 binary64) (sin.f64 (fabs.f64 kx)) (sin.f64 (fabs.f64 kx)) (-.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(134-z0z1z2z3z4 #s(literal 1 binary64) (sin.f64 (fabs.f64 kx)) (sin.f64 (fabs.f64 kx)) (neg.f64 (sin.f64 ky)) (sin.f64 ky))
(134-z0z1z2z3z4 #s(literal 1 binary64) (sin.f64 (fabs.f64 kx)) (sin.f64 (fabs.f64 kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal -1/2 binary64))
(134-z0z1z2z3z4 #s(literal 1 binary64) (sin.f64 (fabs.f64 kx)) (sin.f64 (fabs.f64 kx)) #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64)))
(134-z0z1z2z3z4 #s(literal 1 binary64) (sin.f64 (fabs.f64 kx)) (sin.f64 (fabs.f64 kx)) (sin.f64 ky) (neg.f64 (sin.f64 ky)))
(134-z0z1z2z3z4 #s(literal 1 binary64) (sin.f64 (fabs.f64 ky)) (sin.f64 (fabs.f64 ky)) (neg.f64 (sin.f64 kx)) (sin.f64 kx))
(134-z0z1z2z3z4 #s(literal 1 binary64) (neg.f64 (neg.f64 (sin.f64 ky))) (neg.f64 (neg.f64 (sin.f64 ky))) (neg.f64 (sin.f64 kx)) (sin.f64 kx))
(134-z0z1z2z3z4 #s(literal 1 binary64) (fabs.f64 (sin.f64 ky)) (fabs.f64 (sin.f64 ky)) (neg.f64 (sin.f64 kx)) (sin.f64 kx))
(134-z0z1z2z3z4 #s(literal 1 binary64) (neg.f64 (sin.f64 kx)) (neg.f64 (sin.f64 kx)) #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))
(134-z0z1z2z3z4 #s(literal 1 binary64) (neg.f64 (sin.f64 kx)) (neg.f64 (sin.f64 kx)) (-.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(134-z0z1z2z3z4 #s(literal 1 binary64) (neg.f64 (sin.f64 kx)) (neg.f64 (sin.f64 kx)) (neg.f64 (sin.f64 ky)) (sin.f64 ky))
(134-z0z1z2z3z4 #s(literal 1 binary64) (neg.f64 (sin.f64 kx)) (neg.f64 (sin.f64 kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal -1/2 binary64))
(134-z0z1z2z3z4 #s(literal 1 binary64) (neg.f64 (sin.f64 kx)) (neg.f64 (sin.f64 kx)) #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64)))
(134-z0z1z2z3z4 #s(literal 1 binary64) (neg.f64 (sin.f64 kx)) (neg.f64 (sin.f64 kx)) (sin.f64 ky) (neg.f64 (sin.f64 ky)))
(134-z0z1z2z3z4 #s(literal 1 binary64) (neg.f64 (fabs.f64 (sin.f64 kx))) (neg.f64 (fabs.f64 (sin.f64 kx))) #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))
(134-z0z1z2z3z4 #s(literal 1 binary64) (neg.f64 (fabs.f64 (sin.f64 kx))) (neg.f64 (fabs.f64 (sin.f64 kx))) (-.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(134-z0z1z2z3z4 #s(literal 1 binary64) (neg.f64 (fabs.f64 (sin.f64 kx))) (neg.f64 (fabs.f64 (sin.f64 kx))) (neg.f64 (sin.f64 ky)) (sin.f64 ky))
(134-z0z1z2z3z4 #s(literal 1 binary64) (neg.f64 (fabs.f64 (sin.f64 kx))) (neg.f64 (fabs.f64 (sin.f64 kx))) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal -1/2 binary64))
(134-z0z1z2z3z4 #s(literal 1 binary64) (neg.f64 (fabs.f64 (sin.f64 kx))) (neg.f64 (fabs.f64 (sin.f64 kx))) #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64)))
(134-z0z1z2z3z4 #s(literal 1 binary64) (neg.f64 (fabs.f64 (sin.f64 kx))) (neg.f64 (fabs.f64 (sin.f64 kx))) (sin.f64 ky) (neg.f64 (sin.f64 ky)))
(134-z0z1z2z3z4 #s(literal 1 binary64) (neg.f64 (sin.f64 ky)) (neg.f64 (sin.f64 ky)) (neg.f64 (sin.f64 kx)) (sin.f64 kx))
(134-z0z1z2z3z4 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (neg.f64 (sin.f64 kx)) (sin.f64 kx))
(134-z0z1z2z3z4 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx)) (fabs.f64 (sin.f64 kx)) #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))
(134-z0z1z2z3z4 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx)) (fabs.f64 (sin.f64 kx)) (-.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(134-z0z1z2z3z4 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx)) (fabs.f64 (sin.f64 kx)) (neg.f64 (sin.f64 ky)) (sin.f64 ky))
(134-z0z1z2z3z4 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx)) (fabs.f64 (sin.f64 kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal -1/2 binary64))
(134-z0z1z2z3z4 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx)) (fabs.f64 (sin.f64 kx)) #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64)))
(134-z0z1z2z3z4 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx)) (fabs.f64 (sin.f64 kx)) (sin.f64 ky) (neg.f64 (sin.f64 ky)))
(134-z0z1z2z3z4 #s(literal 1 binary64) #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (neg.f64 (sin.f64 kx)) (sin.f64 kx))
(134-z0z1z2z3z4 #s(literal 1 binary64) (sin.f64 kx) (sin.f64 kx) #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))
(134-z0z1z2z3z4 #s(literal 1 binary64) (sin.f64 kx) (sin.f64 kx) (-.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(134-z0z1z2z3z4 #s(literal 1 binary64) (sin.f64 kx) (sin.f64 kx) (neg.f64 (sin.f64 ky)) (sin.f64 ky))
(134-z0z1z2z3z4 #s(literal 1 binary64) (sin.f64 kx) (sin.f64 kx) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal -1/2 binary64))
(134-z0z1z2z3z4 #s(literal 1 binary64) (sin.f64 kx) (sin.f64 kx) #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64)))
(134-z0z1z2z3z4 #s(literal 1 binary64) (sin.f64 kx) (sin.f64 kx) (sin.f64 ky) (neg.f64 (sin.f64 ky)))
(134-z0z1z2z3z4 #s(literal 1 binary64) (sin.f64 ky) (sin.f64 ky) (neg.f64 (sin.f64 kx)) (sin.f64 kx))
(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 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))
(neg.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))
(neg.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))
(neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))
(-.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (/.f64 (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) #s(literal 1 binary64)))
(-.f64 (/.f64 (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (/.f64 (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) #s(literal 1 binary64)))
(-.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.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/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (/.f64 (*.f64 (neg.f64 (sin.f64 kx)) (sin.f64 kx)) #s(literal 1 binary64)))
(-.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (/.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) #s(literal 1 binary64)))
(-.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (/.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1 binary64)))
(-.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (*.f64 (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/2 binary64))) #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 kx kx)) (-.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 (neg.f64 (sin.f64 kx)) (sin.f64 kx)))
(-.f64 (-.f64 #s(literal 1/2 binary64) (*.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 (-.f64 (cos.f64 (+.f64 kx kx)) (-.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 (cos.f64 (+.f64 kx kx)) (-.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/2 binary64))) (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))
(sqrt.f64 (*.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))) (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))
(fabs.f64 (*.f64 (neg.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))))
(fabs.f64 (*.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))))
(fabs.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))
(exp.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))) #s(literal -1 binary64)))
(exp.f64 (*.f64 (log.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))) #s(literal 1 binary64)))
(+.f64 (/.f64 (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (/.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1 binary64)))
(+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.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/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #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 binary64)) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #s(literal 1 binary64)))
(+.f64 (/.f64 #s(literal 1/2 binary64) (/.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))) (/.f64 #s(literal 1/2 binary64) (/.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (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 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))
(+.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal 1/2 binary64))
(+.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))) (/.f64 #s(literal 0 binary64) (/.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 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 kx kx)) #s(literal 1/2 binary64))))
(+.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 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 #s(literal 1/2 binary64) (/.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal 1 binary64)))
(+.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 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/2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))))
(+.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 ky ky)) #s(literal 1/2 binary64))))
(*.f64 (sqrt.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))) (sqrt.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))))
(*.f64 (pow.f64 #s(literal -1 binary64) #s(literal 1/2 binary64)) (pow.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))) (pow.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))))
(*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))))
(*.f64 (pow.f64 #s(literal 1 binary64) #s(literal 1/2 binary64)) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))
(*.f64 (sqrt.f64 #s(literal 1 binary64)) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))
(*.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))) (pow.f64 #s(literal 1 binary64) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 1 binary64)))
(pow.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))) #s(literal 1/2 binary64))
(/.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))
(/.f64 (sqrt.f64 #s(literal 1 binary64)) (sqrt.f64 (/.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))
(/.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))))
(sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))
(fabs.f64 (neg.f64 (neg.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))))
(fabs.f64 (neg.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))))
(fabs.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))
(exp.f64 (*.f64 (log.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(*.f64 (*.f64 (neg.f64 (sin.f64 ky)) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))) (sin.f64 ky))
(*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))) (neg.f64 (sin.f64 ky)))
(*.f64 (neg.f64 (sin.f64 ky)) (/.f64 #s(literal -1 binary64) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))))
(*.f64 (sin.f64 ky) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))))
(/.f64 (neg.f64 (*.f64 (neg.f64 (sin.f64 ky)) #s(literal -1 binary64))) (neg.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))))
(/.f64 (neg.f64 (*.f64 (neg.f64 (sin.f64 ky)) #s(literal 1 binary64))) (neg.f64 (neg.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))))
(/.f64 (neg.f64 (*.f64 (sin.f64 ky) #s(literal 1 binary64))) (neg.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))))
(/.f64 (neg.f64 (neg.f64 (neg.f64 (sin.f64 ky)))) (neg.f64 (neg.f64 (neg.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))))))
(/.f64 (*.f64 (neg.f64 (sin.f64 ky)) #s(literal -1 binary64)) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))
(/.f64 (*.f64 (neg.f64 (sin.f64 ky)) #s(literal 1 binary64)) (neg.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))))
(/.f64 (neg.f64 (neg.f64 (sin.f64 ky))) (neg.f64 (neg.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))))
(/.f64 (*.f64 (sin.f64 ky) #s(literal 1 binary64)) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))
(/.f64 (neg.f64 (sin.f64 ky)) (neg.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))) (neg.f64 (sin.f64 ky))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))) (sin.f64 ky)))
(/.f64 (sin.f64 ky) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))
(134-z0z1z2z3z4 (/.f64 #s(literal -1 binary64) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))) (cos.f64 ky) #s(literal 0 binary64) (sin.f64 ky) #s(literal 1 binary64))
(134-z0z1z2z3z4 (/.f64 #s(literal -1 binary64) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))) #s(literal 0 binary64) (cos.f64 ky) #s(literal 1 binary64) (sin.f64 ky))
(134-z0z1z2z3z4 (/.f64 #s(literal -1 binary64) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))) (sin.f64 ky) #s(literal -1 binary64) (cos.f64 ky) (sin.f64 (neg.f64 (PI.f64))))
(neg.f64 (*.f64 (sin.f64 ky) (/.f64 #s(literal -1 binary64) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))))
(neg.f64 (/.f64 (sin.f64 ky) (neg.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))))
(neg.f64 (/.f64 (neg.f64 (sin.f64 ky)) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))))
(-.f64 (/.f64 (*.f64 (cos.f64 ky) #s(literal 0 binary64)) (neg.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))) (/.f64 (*.f64 (sin.f64 ky) #s(literal 1 binary64)) (neg.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))))
(+.f64 (/.f64 (*.f64 (sin.f64 ky) #s(literal -1 binary64)) (neg.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))) (/.f64 (*.f64 (cos.f64 ky) #s(literal 0 binary64)) (neg.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))))
(*.f64 (*.f64 (neg.f64 (sin.f64 ky)) (sin.f64 th)) (/.f64 #s(literal -1 binary64) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))) (sin.f64 th))
(*.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))))
(*.f64 (/.f64 (neg.f64 (sin.f64 th)) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))) (neg.f64 (sin.f64 ky)))
(*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))) (*.f64 (sin.f64 th) (neg.f64 (sin.f64 ky))))
(*.f64 (neg.f64 (sin.f64 ky)) (/.f64 (neg.f64 (sin.f64 th)) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))))
(*.f64 (sin.f64 th) (/.f64 (sin.f64 ky) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))))
(*.f64 (sin.f64 ky) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))) (sin.f64 th)))
(*.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))))
(*.f64 (sin.f64 ky) (neg.f64 (/.f64 (neg.f64 (sin.f64 th)) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 ky th))) #s(literal -1 binary64)) (*.f64 #s(literal 2 binary64) (neg.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 ky th))) #s(literal 1 binary64)) (*.f64 #s(literal 2 binary64) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))))
(/.f64 (neg.f64 (*.f64 (sin.f64 th) (neg.f64 (sin.f64 ky)))) (neg.f64 (neg.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))))
(/.f64 (neg.f64 (*.f64 (neg.f64 (sin.f64 ky)) (neg.f64 (sin.f64 th)))) (neg.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))))
(/.f64 (neg.f64 (*.f64 (neg.f64 (sin.f64 ky)) (sin.f64 th))) (neg.f64 (neg.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))))
(/.f64 (neg.f64 (*.f64 (neg.f64 (sin.f64 th)) (neg.f64 (sin.f64 ky)))) (neg.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))))
(/.f64 (neg.f64 (neg.f64 (*.f64 (sin.f64 th) (sin.f64 ky)))) (neg.f64 (neg.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))))
(/.f64 (*.f64 (sin.f64 th) (neg.f64 (sin.f64 ky))) (neg.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))))
(/.f64 (*.f64 (neg.f64 (sin.f64 ky)) (neg.f64 (sin.f64 th))) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))
(/.f64 (*.f64 (neg.f64 (sin.f64 ky)) (sin.f64 th)) (neg.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))))
(/.f64 (*.f64 (neg.f64 (sin.f64 th)) (neg.f64 (sin.f64 ky))) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))
(/.f64 (neg.f64 (*.f64 (sin.f64 th) (sin.f64 ky))) (neg.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))))
(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))) (*.f64 (sin.f64 th) (sin.f64 ky))))
(134-z0z1z2z3z4 (/.f64 (neg.f64 (sin.f64 th)) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))) (cos.f64 ky) #s(literal 0 binary64) (sin.f64 ky) #s(literal 1 binary64))
(134-z0z1z2z3z4 (/.f64 (neg.f64 (sin.f64 th)) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))) #s(literal 0 binary64) (cos.f64 ky) #s(literal 1 binary64) (sin.f64 ky))
(134-z0z1z2z3z4 (/.f64 (neg.f64 (sin.f64 th)) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))) (sin.f64 ky) #s(literal -1 binary64) (cos.f64 ky) (sin.f64 (neg.f64 (PI.f64))))
(neg.f64 (/.f64 (*.f64 (sin.f64 ky) (neg.f64 (sin.f64 th))) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))))

eval3.8s (20.1%)

Memory
152.3MiB live, 8 124.4MiB allocated; 976ms collecting garbage
Samples
2.7s41 949×0valid
141.0ms1 240×1valid
22.0ms331×0invalid
Compiler

Compiled 63 601 to 9 711 computations (84.7% saved)

Precisions
Click to see histograms. Total time spent on operations: 1.0s
ival-mult!: 788.0ms (75.8% of total)
ival-sub!: 158.0ms (15.2% of total)
adjust: 95.0ms (9.1% of total)

prune118.0ms (0.6%)

Memory
-12.5MiB live, 181.5MiB allocated; 32ms collecting garbage
Pruning

51 alts after pruning (49 fresh and 2 done)

PrunedKeptTotal
New1 556411 597
Fresh10818
Picked505
Done-121
Total1 570511 621
Accuracy
100.0%
Counts
1 621 → 51
Alt Table
Click to see full alt table
StatusAccuracyProgram
77.3%
(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (-.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))))))
76.9%
(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))
76.6%
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))) (*.f64 (sin.f64 th) (sin.f64 ky))))
16.1%
(*.f64 (/.f64 (sin.f64 (+.f64 (neg.f64 ky) (PI.f64))) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 (+.f64 (neg.f64 ky) (PI.f64))) #s(literal 2 binary64))))) (sin.f64 th))
6.8%
(*.f64 (/.f64 (sin.f64 (neg.f64 (+.f64 (PI.f64) ky))) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 (+.f64 (PI.f64) ky))) #s(literal 2 binary64))))) (sin.f64 th))
77.2%
(*.f64 (/.f64 (sin.f64 ky) (/.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (sqrt.f64 #s(literal 2 binary64)))) (sin.f64 th))
76.6%
(*.f64 (/.f64 (sin.f64 ky) (/.f64 (sqrt.f64 #s(literal 1 binary64)) (sqrt.f64 (/.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))) (sin.f64 th))
80.5%
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (/.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 (neg.f64 (sin.f64 kx)) (sin.f64 kx)) #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 (neg.f64 (sin.f64 kx)) (sin.f64 kx)) (*.f64 (neg.f64 (sin.f64 kx)) (sin.f64 kx))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (*.f64 (neg.f64 (sin.f64 kx)) (sin.f64 kx)))))))) (sin.f64 th))
76.9%
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))) (sin.f64 th))
33.4%
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(approx (pow (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))) -1) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))) (sin.f64 th))
93.8%
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
86.9%
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))) (sin.f64 th))
45.3%
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (pow.f64 ky #s(literal 2 binary64)))))) (sin.f64 th))
76.9%
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))) (sin.f64 th))
31.9%
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))) (sin.f64 th))
33.5%
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))) (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (sin.f64 th))
41.2%
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
41.5%
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 th))
76.9%
(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))) (sin.f64 ky))) (sin.f64 th))
76.9%
(*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))) (sin.f64 ky)) (sin.f64 th))
76.7%
(*.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))))
77.0%
(*.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))))
76.9%
(*.f64 (neg.f64 (sin.f64 ky)) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))) (neg.f64 (sin.f64 th)))))
77.2%
(*.f64 (neg.f64 (sin.f64 ky)) (*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (+.f64 (134-z0z1z2z3z4 #s(literal 1/2 binary64) (cos.f64 ky) (cos.f64 ky) (-.f64 #s(literal 1 binary64) (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)))))) (sin.f64 th)))
77.3%
(*.f64 (neg.f64 (sin.f64 ky)) (*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (cos.f64 (+.f64 ky ky)) #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))))))) (sin.f64 th)))
33.3%
(*.f64 (neg.f64 (sin.f64 ky)) (*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (sin.f64 th)))
31.9%
(*.f64 (neg.f64 (sin.f64 ky)) (*.f64 #s(approx (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))) (sin.f64 th)))
33.4%
(*.f64 (neg.f64 (sin.f64 ky)) #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))))
31.9%
(*.f64 (neg.f64 (sin.f64 ky)) #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))
42.7%
(*.f64 (neg.f64 (sin.f64 ky)) #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (*.f64 #s(literal -1 binary64) (/.f64 th (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))))
27.5%
(*.f64 #s(approx (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (/.f64 ky (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))) (sin.f64 th))
28.4%
(*.f64 #s(approx (neg (sin ky)) (*.f64 #s(literal -1 binary64) ky)) (*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.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)))))) (sin.f64 th)))
33.2%
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
42.5%
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 (*.f64 th (sin.f64 ky)) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))
38.4%
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 (sin.f64 kx))))
41.9%
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
27.3%
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (/.f64 (sqrt.f64 (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx)))) (sqrt.f64 #s(literal 2 binary64)))))
23.9%
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (*.f64 (sqrt.f64 (sin.f64 kx)) (sqrt.f64 (sin.f64 kx)))))
14.5%
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (*.f64 (sqrt.f64 (neg.f64 (sin.f64 kx))) (sqrt.f64 (neg.f64 (sin.f64 kx))))))
27.3%
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))
27.1%
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (sqrt.f64 (neg.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))))))
17.6%
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (sqrt.f64 #s(approx (pow (sin kx) 2) (pow.f64 kx #s(literal 2 binary64))))))
19.1%
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(approx (* ky (sin th)) (*.f64 ky th)) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
38.2%
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(literal 1 binary64) (/.f64 (fabs.f64 (sin.f64 kx)) (*.f64 (sin.f64 th) ky))))
40.6%
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx))) ky))
38.3%
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))) (*.f64 (sin.f64 th) ky)))
40.6%
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (sin.f64 th) (/.f64 ky (fabs.f64 (sin.f64 kx)))))
40.5%
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (sin.f64 th) (*.f64 ky (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))))))
21.2%
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (*.f64 ky (sin.f64 th)) kx)))
42.6%
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (- 1/2 (* (cos (+ ky ky)) 1/2))))) (sin th)) (/.f64 (*.f64 th (sin.f64 ky)) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
42.5%
#s(approx (* (neg (sin ky)) (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th))) (/.f64 (*.f64 th (sin.f64 ky)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))
Samples
25.0ms512×0valid
Compiler

Compiled 3 074 to 2 306 computations (25.0% saved)

Precisions
Click to see histograms. Total time spent on operations: 9.0ms
ival-mult!: 6.0ms (70.5% of total)
ival-sub!: 1.0ms (11.7% of total)
adjust: 1.0ms (11.7% of total)

series204.0ms (1.1%)

Memory
12.2MiB live, 286.6MiB allocated; 34ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0161518161
Stop Event
iter-limit
Counts
62 → 293
Calls
Call 1
Inputs
ky
(sin.f64 ky)
#s(literal 1/2 binary64)
(+.f64 ky ky)
(cos.f64 (+.f64 ky ky))
(*.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)))
#s(literal 3 binary64)
(pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #s(literal 3 binary64))
kx
(sin.f64 kx)
(neg.f64 (sin.f64 kx))
(*.f64 (neg.f64 (sin.f64 kx)) (sin.f64 kx))
(pow.f64 (*.f64 (neg.f64 (sin.f64 kx)) (sin.f64 kx)) #s(literal 3 binary64))
(-.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 (neg.f64 (sin.f64 kx)) (sin.f64 kx)) #s(literal 3 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/2 binary64))))
(*.f64 (*.f64 (neg.f64 (sin.f64 kx)) (sin.f64 kx)) (*.f64 (neg.f64 (sin.f64 kx)) (sin.f64 kx)))
(*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (*.f64 (neg.f64 (sin.f64 kx)) (sin.f64 kx)))
(+.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 kx)) (sin.f64 kx)) (*.f64 (neg.f64 (sin.f64 kx)) (sin.f64 kx))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (*.f64 (neg.f64 (sin.f64 kx)) (sin.f64 kx))))
(+.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 (neg.f64 (sin.f64 kx)) (sin.f64 kx)) (*.f64 (neg.f64 (sin.f64 kx)) (sin.f64 kx))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (*.f64 (neg.f64 (sin.f64 kx)) (sin.f64 kx)))))
(/.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 (neg.f64 (sin.f64 kx)) (sin.f64 kx)) #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 (neg.f64 (sin.f64 kx)) (sin.f64 kx)) (*.f64 (neg.f64 (sin.f64 kx)) (sin.f64 kx))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (*.f64 (neg.f64 (sin.f64 kx)) (sin.f64 kx))))))
(sqrt.f64 (/.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 (neg.f64 (sin.f64 kx)) (sin.f64 kx)) #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 (neg.f64 (sin.f64 kx)) (sin.f64 kx)) (*.f64 (neg.f64 (sin.f64 kx)) (sin.f64 kx))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (*.f64 (neg.f64 (sin.f64 kx)) (sin.f64 kx)))))))
(/.f64 (sin.f64 ky) (sqrt.f64 (/.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 (neg.f64 (sin.f64 kx)) (sin.f64 kx)) #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 (neg.f64 (sin.f64 kx)) (sin.f64 kx)) (*.f64 (neg.f64 (sin.f64 kx)) (sin.f64 kx))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (*.f64 (neg.f64 (sin.f64 kx)) (sin.f64 kx))))))))
th
(sin.f64 th)
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (/.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 (neg.f64 (sin.f64 kx)) (sin.f64 kx)) #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 (neg.f64 (sin.f64 kx)) (sin.f64 kx)) (*.f64 (neg.f64 (sin.f64 kx)) (sin.f64 kx))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (*.f64 (neg.f64 (sin.f64 kx)) (sin.f64 kx)))))))) (sin.f64 th))
(*.f64 ky (sin.f64 th))
(/.f64 (*.f64 ky (sin.f64 th)) kx)
#s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (*.f64 ky (sin.f64 th)) kx))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (*.f64 ky (sin.f64 th)) kx)))
(*.f64 (sin.f64 ky) (sin.f64 th))
#s(literal 1 binary64)
#s(literal 2 binary64)
(*.f64 #s(literal 2 binary64) ky)
(cos.f64 (*.f64 #s(literal 2 binary64) ky))
(-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))
(*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))
(sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))
(/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
(neg.f64 (sin.f64 ky))
#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) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))
(+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))
(-.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))
(sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))
(/.f64 th (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
(*.f64 #s(literal -1 binary64) (/.f64 th (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))
#s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (*.f64 #s(literal -1 binary64) (/.f64 th (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))))
(*.f64 (neg.f64 (sin.f64 ky)) #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (*.f64 #s(literal -1 binary64) (/.f64 th (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))))
(*.f64 (sin.f64 th) (sin.f64 ky))
(+.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 (*.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 ky ky)) #s(literal 1/2 binary64)) (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))))
(sqrt.f64 (-.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 (*.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (-.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))))))
Outputs
#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 (neg (sin kx)) (*.f64 #s(literal -1 binary64) kx))
#s(approx (neg (sin kx)) (*.f64 kx (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 kx #s(literal 2 binary64))) #s(literal 1 binary64))))
#s(approx (neg (sin kx)) (*.f64 kx (-.f64 (*.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1/120 binary64) (pow.f64 kx #s(literal 2 binary64))))) #s(literal 1 binary64))))
#s(approx (neg (sin kx)) (*.f64 kx (-.f64 (*.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/5040 binary64) (pow.f64 kx #s(literal 2 binary64))) #s(literal 1/120 binary64))))) #s(literal 1 binary64))))
#s(approx (* (neg (sin kx)) (sin kx)) (*.f64 #s(literal -1 binary64) (pow.f64 kx #s(literal 2 binary64))))
#s(approx (* (neg (sin kx)) (sin kx)) (*.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 (* (neg (sin kx)) (sin kx)) (*.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 (* (neg (sin kx)) (sin kx)) (*.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 (pow (* (neg (sin kx)) (sin kx)) 3) (*.f64 #s(literal -1 binary64) (pow.f64 kx #s(literal 6 binary64))))
#s(approx (pow (* (neg (sin kx)) (sin kx)) 3) (*.f64 (pow.f64 kx #s(literal 6 binary64)) (-.f64 (pow.f64 kx #s(literal 2 binary64)) #s(literal 1 binary64))))
#s(approx (pow (* (neg (sin kx)) (sin kx)) 3) (*.f64 (pow.f64 kx #s(literal 6 binary64)) (-.f64 (*.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -7/15 binary64) (pow.f64 kx #s(literal 2 binary64))))) #s(literal 1 binary64))))
#s(approx (pow (* (neg (sin kx)) (sin kx)) 3) (*.f64 (pow.f64 kx #s(literal 6 binary64)) (-.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 128/945 binary64) (pow.f64 kx #s(literal 2 binary64))) #s(literal 7/15 binary64))))) #s(literal 1 binary64))))
#s(approx (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 3 binary64)))
#s(approx (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+.f64 (pow.f64 kx #s(literal 6 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 3 binary64))))
#s(approx (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+.f64 (*.f64 (pow.f64 kx #s(literal 6 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (pow.f64 kx #s(literal 2 binary64))))) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 3 binary64))))
#s(approx (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+.f64 (*.f64 (pow.f64 kx #s(literal 6 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 7/15 binary64) (pow.f64 kx #s(literal 2 binary64))) #s(literal 1 binary64))))) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 3 binary64))))
#s(approx (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (pow.f64 kx #s(literal 4 binary64)))
#s(approx (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (*.f64 (pow.f64 kx #s(literal 4 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -2/3 binary64) (pow.f64 kx #s(literal 2 binary64))))))
#s(approx (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (*.f64 (pow.f64 kx #s(literal 4 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/5 binary64) (pow.f64 kx #s(literal 2 binary64))) #s(literal 2/3 binary64))))))
#s(approx (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (*.f64 (pow.f64 kx #s(literal 4 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 1/5 binary64) (*.f64 #s(literal -34/945 binary64) (pow.f64 kx #s(literal 2 binary64))))) #s(literal 2/3 binary64))))))
#s(approx (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
#s(approx (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx))) (*.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))))
#s(approx (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx))) (*.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2/45 binary64) (*.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 #s(literal 1/3 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))))
#s(approx (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx))) (*.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/3 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2/45 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 #s(literal 1/315 binary64) (*.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))))))))
#s(approx (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))) (*.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/3 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))))
#s(approx (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))) (*.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/3 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -2/45 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2/3 binary64)))))))))
#s(approx (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))) (*.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/3 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -2/45 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 #s(literal 1/5 binary64) (*.f64 #s(literal 1/315 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))) #s(literal 2/3 binary64)))))))))
#s(approx (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx))))) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 2 binary64)))
#s(approx (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 2 binary64))))
#s(approx (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx))))) (+.f64 (*.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/3 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 2 binary64))))
#s(approx (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx))))) (+.f64 (*.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/3 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -2/45 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2/3 binary64)))))))) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 2 binary64))))
#s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))
#s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (pow.f64 kx #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))
#s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.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)))))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))
#s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.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 (+.f64 #s(literal 2/45 binary64) (*.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (*.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))) #s(literal 1/3 binary64)))))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))
#s(approx (sqrt (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx))))))) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))
#s(approx (sqrt (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx))))))) (+.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 kx #s(literal 2 binary64)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))))
#s(approx (sqrt (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx))))))) (+.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.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 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))))))
#s(approx (sqrt (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx))))))) (+.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 #s(literal 2/45 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))))))
#s(approx (/ (sin ky) (sqrt (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))))) (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
#s(approx (/ (sin ky) (sqrt (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 kx #s(literal 2 binary64)) (sin.f64 ky)) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))) (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))
#s(approx (/ (sin ky) (sqrt (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))))) (+.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 -1/2 binary64) (/.f64 (*.f64 (sin.f64 ky) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 ky) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 5 binary64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 ky) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))))) (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))
#s(approx (/ (sin ky) (sqrt (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))))) (+.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 -1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 ky) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 ky) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 5 binary64))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (sin.f64 ky) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 5 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 ky) (-.f64 #s(literal 2/45 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 ky) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 ky) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 5 binary64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 ky) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))))) (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))
#s(approx (* (/ (sin ky) (sqrt (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))))) (sin th)) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
#s(approx (* (/ (sin ky) (sqrt (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))))) (sin th)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 kx #s(literal 2 binary64)) (*.f64 (sin.f64 ky) (sin.f64 th))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))
#s(approx (* (/ (sin ky) (sqrt (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))))) (sin th)) (+.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 -1/2 binary64) (/.f64 (*.f64 (sin.f64 ky) (*.f64 (sin.f64 th) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 5 binary64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))))) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))
#s(approx (* (/ (sin ky) (sqrt (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))))) (sin th)) (+.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 -1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 ky) (*.f64 (sin.f64 th) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 5 binary64))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (sin.f64 ky) (*.f64 (sin.f64 th) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 5 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 ky) (*.f64 (sin.f64 th) (-.f64 #s(literal 2/45 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 ky) (*.f64 (sin.f64 th) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 5 binary64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))))) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))
#s(approx (/ (* ky (sin th)) kx) (/.f64 (*.f64 ky (sin.f64 th)) kx))
#s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 kx #s(literal 2 binary64)) (*.f64 ky (sin.f64 th)))) (*.f64 ky (sin.f64 th))) kx))
#s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (+.f64 (*.f64 ky (sin.f64 th)) (*.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 -1/36 binary64) (*.f64 ky (sin.f64 th))) (*.f64 #s(literal 1/120 binary64) (*.f64 ky (sin.f64 th)))))) (*.f64 #s(literal -1/6 binary64) (*.f64 ky (sin.f64 th)))))) kx))
#s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (+.f64 (*.f64 ky (sin.f64 th)) (*.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 -1/5040 binary64) (*.f64 ky (sin.f64 th))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 ky (sin.f64 th))) (*.f64 #s(literal 1/6 binary64) (+.f64 (*.f64 #s(literal -1/36 binary64) (*.f64 ky (sin.f64 th))) (*.f64 #s(literal 1/120 binary64) (*.f64 ky (sin.f64 th))))))))) (+.f64 (*.f64 #s(literal -1/36 binary64) (*.f64 ky (sin.f64 th))) (*.f64 #s(literal 1/120 binary64) (*.f64 ky (sin.f64 th)))))) (*.f64 #s(literal -1/6 binary64) (*.f64 ky (sin.f64 th)))))) kx))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 kx #s(literal 2 binary64)) (*.f64 (sin.f64 ky) (sin.f64 th))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (+.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 -1/2 binary64) (/.f64 (*.f64 (sin.f64 ky) (*.f64 (sin.f64 th) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 5 binary64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (+.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 -1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 ky) (*.f64 (sin.f64 th) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 5 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (sin.f64 ky) (*.f64 (sin.f64 th) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 5 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 ky) (*.f64 (sin.f64 th) (-.f64 #s(literal 2/45 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 ky) (*.f64 (sin.f64 th) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 5 binary64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 kx #s(literal 2 binary64)) (*.f64 (sin.f64 ky) (sin.f64 th))) (pow.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (+.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 -1/2 binary64) (/.f64 (*.f64 (sin.f64 ky) (*.f64 (sin.f64 th) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (pow.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 5 binary64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (pow.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))))) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (+.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 -1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 ky) (*.f64 (sin.f64 th) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (pow.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 5 binary64))))) (pow.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (sin.f64 ky) (*.f64 (sin.f64 th) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 5 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 ky) (*.f64 (sin.f64 th) (-.f64 #s(literal 2/45 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 ky) (*.f64 (sin.f64 th) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (pow.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 5 binary64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (pow.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))))) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))
#s(approx (* 2 kx) (*.f64 #s(literal 2 binary64) kx))
#s(approx (cos (* 2 kx)) #s(literal 1 binary64))
#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))) #s(literal 1/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 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))
#s(approx (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))) (+.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 kx #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))
#s(approx (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))) (+.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))) (*.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))) (* 1/2 (cos (* 2 ky)))) (+.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))) (*.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 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.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)))))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))
#s(approx (/ th (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))) (/.f64 th (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
#s(approx (/ th (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 kx #s(literal 2 binary64)) th) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))) (/.f64 th (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))
#s(approx (/ th (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))) (+.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 -1/2 binary64) (/.f64 (*.f64 th (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 th (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 5 binary64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 th (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))))) (/.f64 th (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))
#s(approx (/ th (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))) (+.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 -1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 th (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 th (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 5 binary64))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 th (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 5 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 th (-.f64 #s(literal 2/45 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 th (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 th (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 5 binary64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 th (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))))) (/.f64 th (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))
#s(approx (* -1 (/ th (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (*.f64 #s(literal -1 binary64) (/.f64 th (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))
#s(approx (* -1 (/ th (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 th (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 kx #s(literal 2 binary64)) th) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64))))))
#s(approx (* -1 (/ th (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 th (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (*.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 th (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))) (*.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 th (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 th (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 5 binary64))))))))))
#s(approx (* -1 (/ th (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 th (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (*.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 th (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))) (*.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 th (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 th (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 5 binary64)))) (*.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 th (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 th (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 5 binary64))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 th (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 5 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 th (-.f64 #s(literal 2/45 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64))))))))))))))
#s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))
#s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 kx #s(literal 2 binary64)) (sin.f64 th)) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64))))))
#s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (*.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))) (*.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 th) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 5 binary64))))))))))
#s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (*.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))) (*.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 th) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 5 binary64)))) (*.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 (sin.f64 th) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 5 binary64))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (sin.f64 th) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 5 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 th) (-.f64 #s(literal 2/45 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64))))))))))))))
#s(approx (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))
#s(approx (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2)) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 kx #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))
#s(approx (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2)) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))) (*.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 (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2)) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))) (*.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 (sin kx) (sin.f64 kx))
#s(approx (neg (sin kx)) (*.f64 #s(literal -1 binary64) (sin.f64 kx)))
#s(approx (* (neg (sin kx)) (sin kx)) (*.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))
#s(approx (pow (* (neg (sin kx)) (sin kx)) 3) (*.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 kx) #s(literal 6 binary64))))
#s(approx (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (-.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 3 binary64)) (*.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 kx) #s(literal 6 binary64)))))
#s(approx (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (pow.f64 (sin.f64 kx) #s(literal 4 binary64)))
#s(approx (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
#s(approx (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (pow.f64 (sin.f64 kx) #s(literal 4 binary64))))
#s(approx (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 2 binary64)))))
#s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (/.f64 (-.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 3 binary64)) (*.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 kx) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 2 binary64))))))
#s(approx (sqrt (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx))))))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 3 binary64)) (*.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 kx) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 2 binary64)))))))
#s(approx (/ (sin ky) (sqrt (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))))) (/.f64 (sin.f64 ky) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 3 binary64)) (*.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 kx) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 2 binary64))))))))
#s(approx (* (/ (sin ky) (sqrt (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))))) (sin th)) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 3 binary64)) (*.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 kx) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 2 binary64))))))))
#s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (*.f64 ky (sin.f64 th)) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 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 (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 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))
#s(approx (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (-.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))
#s(approx (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
#s(approx (/ th (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))) (/.f64 th (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))
#s(approx (* -1 (/ th (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (*.f64 #s(literal -1 binary64) (/.f64 th (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))))
#s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))))
#s(approx (* (neg (sin ky)) (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th))) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))
#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 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2)) (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 1/2 binary64)))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (*.f64 #s(literal -2 binary64) kx)))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))))
#s(approx (* (neg (sin ky)) (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th))) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (*.f64 #s(literal -2 binary64) kx)))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))
#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 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2)) (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (*.f64 #s(literal -2 binary64) kx)))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 1/2 binary64)))
#s(approx (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))) (-.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (*.f64 #s(literal -2 binary64) kx)))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))
#s(approx (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (*.f64 #s(literal -2 binary64) kx)))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
#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 (+ 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 (* (cos (+ ky ky)) 1/2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1 binary64) (pow.f64 ky #s(literal 2 binary64)))))
#s(approx (* (cos (+ ky ky)) 1/2) (+.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 (* (cos (+ ky ky)) 1/2) (+.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 (* (cos (+ ky ky)) 1/2)) (pow.f64 ky #s(literal 2 binary64)))
#s(approx (- 1/2 (* (cos (+ ky ky)) 1/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 (- 1/2 (* (cos (+ ky ky)) 1/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 (- 1/2 (* (cos (+ ky ky)) 1/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 (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow.f64 ky #s(literal 6 binary64)))
#s(approx (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (*.f64 (pow.f64 ky #s(literal 6 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (pow.f64 ky #s(literal 2 binary64))))))
#s(approx (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (*.f64 (pow.f64 ky #s(literal 6 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 7/15 binary64) (pow.f64 ky #s(literal 2 binary64))) #s(literal 1 binary64))))))
#s(approx (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (*.f64 (pow.f64 ky #s(literal 6 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 7/15 binary64) (*.f64 #s(literal -128/945 binary64) (pow.f64 ky #s(literal 2 binary64))))) #s(literal 1 binary64))))))
#s(approx (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (pow.f64 (sin.f64 kx) #s(literal 6 binary64)))
#s(approx (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (-.f64 (pow.f64 ky #s(literal 6 binary64)) (*.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 kx) #s(literal 6 binary64)))))
#s(approx (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (-.f64 (*.f64 (pow.f64 ky #s(literal 6 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (pow.f64 ky #s(literal 2 binary64))))) (*.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 kx) #s(literal 6 binary64)))))
#s(approx (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (-.f64 (*.f64 (pow.f64 ky #s(literal 6 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 7/15 binary64) (pow.f64 ky #s(literal 2 binary64))) #s(literal 1 binary64))))) (*.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 kx) #s(literal 6 binary64)))))
#s(approx (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (pow.f64 ky #s(literal 4 binary64)))
#s(approx (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (*.f64 (pow.f64 ky #s(literal 4 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -2/3 binary64) (pow.f64 ky #s(literal 2 binary64))))))
#s(approx (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (*.f64 (pow.f64 ky #s(literal 4 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/5 binary64) (pow.f64 ky #s(literal 2 binary64))) #s(literal 2/3 binary64))))))
#s(approx (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (*.f64 (pow.f64 ky #s(literal 4 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 1/5 binary64) (*.f64 #s(literal -34/945 binary64) (pow.f64 ky #s(literal 2 binary64))))) #s(literal 2/3 binary64))))))
#s(approx (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 ky #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
#s(approx (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx))) (*.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 #s(literal 1/3 binary64) (*.f64 (pow.f64 ky #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))))
#s(approx (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx))) (*.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2/45 binary64) (*.f64 (pow.f64 ky #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))) (*.f64 #s(literal 1/3 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))))))
#s(approx (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx))) (*.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/3 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2/45 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 #s(literal 1/315 binary64) (*.f64 (pow.f64 ky #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))))))))
#s(approx (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 ky #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 4 binary64))))
#s(approx (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))) (+.f64 (*.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 #s(literal 1/3 binary64) (*.f64 (pow.f64 ky #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))) (pow.f64 (sin.f64 kx) #s(literal 4 binary64))))
#s(approx (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))) (+.f64 (*.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2/45 binary64) (*.f64 (pow.f64 ky #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))) (*.f64 #s(literal 1/3 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))))) (pow.f64 (sin.f64 kx) #s(literal 4 binary64))))
#s(approx (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx))))) (+.f64 (*.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/3 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))))) (pow.f64 (sin.f64 kx) #s(literal 4 binary64))))
#s(approx (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx))))) (+.f64 (*.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/3 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -2/45 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2/3 binary64)))))))) (pow.f64 (sin.f64 kx) #s(literal 4 binary64))))
#s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))
#s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (+.f64 (pow.f64 ky #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))
#s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (+.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 (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (+.f64 (*.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 (+.f64 #s(literal 2/45 binary64) (*.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (*.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))) #s(literal 1/3 binary64))))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))
#s(approx (sqrt (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx))))))) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))
#s(approx (sqrt (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx))))))) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 ky #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))))
#s(approx (sqrt (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx))))))) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #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 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))))))
#s(approx (sqrt (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx))))))) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 #s(literal 2/45 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))))))
#s(approx (/ (sin ky) (sqrt (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))))) (/.f64 ky (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
#s(approx (/ (sin ky) (sqrt (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))))) (*.f64 ky (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))))
#s(approx (/ (sin ky) (sqrt (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))))) (*.f64 ky (+.f64 (*.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))))
#s(approx (/ (sin ky) (sqrt (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))))) (*.f64 ky (+.f64 (*.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/5040 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 #s(literal 2/45 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/120 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/120 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))))
#s(approx (* (/ (sin ky) (sqrt (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))))) (sin th)) (*.f64 ky (+.f64 (*.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (/.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))))
#s(approx (* (/ (sin ky) (sqrt (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))))) (sin th)) (*.f64 ky (+.f64 (*.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (*.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 th) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (/.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))))
#s(approx (* (/ (sin ky) (sqrt (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))))) (sin th)) (*.f64 ky (+.f64 (*.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (*.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 1/120 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (*.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/5040 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64))))) (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 th) (-.f64 #s(literal 2/45 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/120 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 th) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64))))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 th) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (/.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))))
#s(approx (* ky (sin th)) (*.f64 ky (sin.f64 th)))
#s(approx (* (sin ky) (sin th)) (*.f64 ky (+.f64 (sin.f64 th) (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 ky #s(literal 2 binary64)) (sin.f64 th))))))
#s(approx (* (sin ky) (sin th)) (*.f64 ky (+.f64 (sin.f64 th) (*.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/6 binary64) (sin.f64 th)) (*.f64 #s(literal 1/120 binary64) (*.f64 (pow.f64 ky #s(literal 2 binary64)) (sin.f64 th))))))))
#s(approx (* (sin ky) (sin th)) (*.f64 ky (+.f64 (sin.f64 th) (*.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/6 binary64) (sin.f64 th)) (*.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/5040 binary64) (*.f64 (pow.f64 ky #s(literal 2 binary64)) (sin.f64 th))) (*.f64 #s(literal 1/120 binary64) (sin.f64 th)))))))))
#s(approx (- 1 (cos (* 2 ky))) (*.f64 #s(literal 2 binary64) (pow.f64 ky #s(literal 2 binary64))))
#s(approx (- 1 (cos (* 2 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 (* 2 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 (* 2 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 (/ (* (sin ky) (sin th)) (sqrt (* 1/2 (- 1 (cos (* 2 ky)))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 ky (+.f64 (*.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64)))))) (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 ky (+.f64 (*.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (-.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 1/120 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 th) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64)))))) (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 ky (+.f64 (*.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (-.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 (*.f64 #s(literal 1/120 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (-.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 -1/5040 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64))))) (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64)))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 th) (-.f64 #s(literal 2/45 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/120 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 th) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64))))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 th) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64)))))) (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))
#s(approx (neg (sin ky)) (*.f64 #s(literal -1 binary64) ky))
#s(approx (neg (sin ky)) (*.f64 ky (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 ky #s(literal 2 binary64))) #s(literal 1 binary64))))
#s(approx (neg (sin ky)) (*.f64 ky (-.f64 (*.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1/120 binary64) (pow.f64 ky #s(literal 2 binary64))))) #s(literal 1 binary64))))
#s(approx (neg (sin ky)) (*.f64 ky (-.f64 (*.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/5040 binary64) (pow.f64 ky #s(literal 2 binary64))) #s(literal 1/120 binary64))))) #s(literal 1 binary64))))
#s(approx (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))
#s(approx (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))) (+.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 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 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))) (+.f64 #s(literal 1/2 binary64) (+.f64 (*.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 1/3 binary64) (pow.f64 ky #s(literal 2 binary64))) #s(literal 1 binary64))))))
#s(approx (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))) (+.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))) (*.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 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))
#s(approx (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (pow.f64 ky #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))
#s(approx (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (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 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (-.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 (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))
#s(approx (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (+.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 ky #s(literal 2 binary64)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))
#s(approx (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (+.f64 (sqrt.f64 (-.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 -1/2 binary64) (/.f64 (*.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))))
#s(approx (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (+.f64 (sqrt.f64 (-.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 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 #s(literal 2/45 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))))
#s(approx (/ th (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))) (/.f64 th (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))
#s(approx (/ th (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 ky #s(literal 2 binary64)) th) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64)))) (/.f64 th (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))
#s(approx (/ th (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))) (+.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 -1/2 binary64) (/.f64 (*.f64 th (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 th (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 5 binary64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 th (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64)))))) (/.f64 th (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))
#s(approx (/ th (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))) (+.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 -1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 th (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 th (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 5 binary64))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 th (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 5 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 th (-.f64 #s(literal 2/45 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64)))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 th (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 th (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 5 binary64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 th (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64)))))) (/.f64 th (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))
#s(approx (* -1 (/ th (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (*.f64 #s(literal -1 binary64) (/.f64 th (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))
#s(approx (* -1 (/ th (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 th (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 ky #s(literal 2 binary64)) th) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64))))))
#s(approx (* -1 (/ th (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 th (sqrt.f64 (-.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 1/2 binary64) (/.f64 th (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64)))) (*.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 th (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 th (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 5 binary64))))))))))
#s(approx (* -1 (/ th (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 th (sqrt.f64 (-.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 1/2 binary64) (/.f64 th (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64)))) (*.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 th (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 th (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 5 binary64)))) (*.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 th (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 th (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 5 binary64))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 th (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 5 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 th (-.f64 #s(literal 2/45 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64))))))))))))))
#s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))
#s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 ky #s(literal 2 binary64)) (sin.f64 th)) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64))))))
#s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (-.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 1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64)))) (*.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 th) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 5 binary64))))))))))
#s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (-.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 1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64)))) (*.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 th) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 5 binary64)))) (*.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 (sin.f64 th) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 5 binary64))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (sin.f64 th) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 5 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 th) (-.f64 #s(literal 2/45 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64))))))))))))))
#s(approx (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2)) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 ky #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))
#s(approx (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2)) (+.f64 (*.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 1/3 binary64) (pow.f64 ky #s(literal 2 binary64))) #s(literal 1 binary64)))))
#s(approx (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2)) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))) (*.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 (sin ky) (sin.f64 ky))
#s(approx (cos (+ ky ky)) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))
#s(approx (* (sin ky) (sin th)) (*.f64 (sin.f64 ky) (sin.f64 th)))
#s(approx (- 1 (cos (* 2 ky))) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))
#s(approx (* 1/2 (- 1 (cos (* 2 ky)))) (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))
#s(approx (sqrt (* 1/2 (- 1 (cos (* 2 ky))))) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))
#s(approx (neg (sin ky)) (*.f64 #s(literal -1 binary64) (sin.f64 ky)))
#s(approx (cos (+ ky ky)) (cos.f64 (neg.f64 (*.f64 #s(literal -2 binary64) ky))))
#s(approx (* (cos (+ ky ky)) 1/2) (*.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (*.f64 #s(literal -2 binary64) ky)))))
#s(approx (- 1/2 (* (cos (+ ky ky)) 1/2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (*.f64 #s(literal -2 binary64) ky))))))
#s(approx (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (*.f64 #s(literal -2 binary64) ky))))) #s(literal 3 binary64)))
#s(approx (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (-.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (*.f64 #s(literal -2 binary64) ky))))) #s(literal 3 binary64)) (*.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 kx) #s(literal 6 binary64)))))
#s(approx (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (*.f64 #s(literal -2 binary64) ky))))) #s(literal 2 binary64)))
#s(approx (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (*.f64 #s(literal -2 binary64) ky))))))))
#s(approx (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (*.f64 #s(literal -2 binary64) ky))))))) (pow.f64 (sin.f64 kx) #s(literal 4 binary64))))
#s(approx (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (*.f64 #s(literal -2 binary64) ky))))))) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (*.f64 #s(literal -2 binary64) ky))))) #s(literal 2 binary64)))))
#s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (/.f64 (-.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (*.f64 #s(literal -2 binary64) ky))))) #s(literal 3 binary64)) (*.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 kx) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (*.f64 #s(literal -2 binary64) ky))))))) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (*.f64 #s(literal -2 binary64) ky))))) #s(literal 2 binary64))))))
#s(approx (sqrt (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx))))))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (*.f64 #s(literal -2 binary64) ky))))) #s(literal 3 binary64)) (*.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 kx) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (*.f64 #s(literal -2 binary64) ky))))))) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (*.f64 #s(literal -2 binary64) ky))))) #s(literal 2 binary64)))))))
#s(approx (/ (sin ky) (sqrt (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))))) (/.f64 (sin.f64 ky) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (*.f64 #s(literal -2 binary64) ky))))) #s(literal 3 binary64)) (*.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 kx) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (*.f64 #s(literal -2 binary64) ky))))))) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (*.f64 #s(literal -2 binary64) ky))))) #s(literal 2 binary64))))))))
#s(approx (* (/ (sin ky) (sqrt (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))))) (sin th)) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (*.f64 #s(literal -2 binary64) ky))))) #s(literal 3 binary64)) (*.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 kx) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (*.f64 #s(literal -2 binary64) ky))))))) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (*.f64 #s(literal -2 binary64) ky))))) #s(literal 2 binary64))))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (-.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 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/2 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 (* (neg (sin ky)) (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th))) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/2 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 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2)) (-.f64 (+.f64 (*.f64 #s(literal 1/2 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(literal 1/2 binary64)))
#s(approx (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))) (-.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/2 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 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/2 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 th th)
#s(approx (sin th) (*.f64 th (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 th #s(literal 2 binary64))))))
#s(approx (sin th) (*.f64 th (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 th #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 th #s(literal 2 binary64))) #s(literal 1/6 binary64))))))
#s(approx (sin th) (*.f64 th (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 th #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 #s(literal 1/120 binary64) (*.f64 #s(literal -1/5040 binary64) (pow.f64 th #s(literal 2 binary64))))) #s(literal 1/6 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))))) (sin th)) (/.f64 (*.f64 th (sin.f64 ky)) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 3 binary64)) (*.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 kx) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 2 binary64))))))))
#s(approx (* (/ (sin ky) (sqrt (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))))) (sin th)) (*.f64 th (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (sin.f64 ky)) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 3 binary64)) (*.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 kx) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 2 binary64)))))))) (/.f64 (sin.f64 ky) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 3 binary64)) (*.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 kx) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 2 binary64))))))))))
#s(approx (* (/ (sin ky) (sqrt (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))))) (sin th)) (*.f64 th (+.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 ky) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 3 binary64)) (*.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 kx) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/120 binary64) (/.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (sin.f64 ky)) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 3 binary64)) (*.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 kx) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 2 binary64)))))))))) (/.f64 (sin.f64 ky) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 3 binary64)) (*.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 kx) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 2 binary64))))))))))
#s(approx (* (/ (sin ky) (sqrt (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))))) (sin th)) (*.f64 th (+.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 ky) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 3 binary64)) (*.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 kx) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/5040 binary64) (/.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (sin.f64 ky)) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 3 binary64)) (*.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 kx) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/120 binary64) (/.f64 (sin.f64 ky) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 3 binary64)) (*.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 kx) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 2 binary64)))))))))))) (/.f64 (sin.f64 ky) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 3 binary64)) (*.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 kx) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 2 binary64))))))))))
#s(approx (* ky (sin th)) (*.f64 ky th))
#s(approx (* ky (sin th)) (*.f64 th (+.f64 ky (*.f64 #s(literal -1/6 binary64) (*.f64 ky (pow.f64 th #s(literal 2 binary64)))))))
#s(approx (* ky (sin th)) (*.f64 th (+.f64 ky (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/6 binary64) ky) (*.f64 #s(literal 1/120 binary64) (*.f64 ky (pow.f64 th #s(literal 2 binary64)))))))))
#s(approx (* ky (sin th)) (*.f64 th (+.f64 ky (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/6 binary64) ky) (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/5040 binary64) (*.f64 ky (pow.f64 th #s(literal 2 binary64)))) (*.f64 #s(literal 1/120 binary64) ky))))))))
#s(approx (/ (* ky (sin th)) kx) (/.f64 (*.f64 ky th) kx))
#s(approx (/ (* ky (sin th)) kx) (*.f64 th (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 ky (pow.f64 th #s(literal 2 binary64))) kx)) (/.f64 ky kx))))
#s(approx (/ (* ky (sin th)) kx) (*.f64 th (+.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 ky kx)) (*.f64 #s(literal 1/120 binary64) (/.f64 (*.f64 ky (pow.f64 th #s(literal 2 binary64))) kx)))) (/.f64 ky kx))))
#s(approx (/ (* ky (sin th)) kx) (*.f64 th (+.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 ky kx)) (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/5040 binary64) (/.f64 (*.f64 ky (pow.f64 th #s(literal 2 binary64))) kx)) (*.f64 #s(literal 1/120 binary64) (/.f64 ky kx)))))) (/.f64 ky kx))))
#s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (*.f64 ky th) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
#s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (*.f64 th (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 ky (pow.f64 th #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (/.f64 ky (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))))
#s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (*.f64 th (+.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 ky (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (*.f64 #s(literal 1/120 binary64) (/.f64 (*.f64 ky (pow.f64 th #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))))) (/.f64 ky (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))))
#s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (*.f64 th (+.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 ky (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/5040 binary64) (/.f64 (*.f64 ky (pow.f64 th #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (*.f64 #s(literal 1/120 binary64) (/.f64 ky (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))))))) (/.f64 ky (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 th (sin.f64 ky)) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 th (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (sin.f64 ky)) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 th (+.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/120 binary64) (/.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (sin.f64 ky)) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))))) (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 th (+.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/5040 binary64) (/.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (sin.f64 ky)) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/120 binary64) (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))))))) (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))
#s(approx (* (sin ky) (sin th)) (*.f64 th (sin.f64 ky)))
#s(approx (* (sin ky) (sin th)) (*.f64 th (+.f64 (sin.f64 ky) (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 th #s(literal 2 binary64)) (sin.f64 ky))))))
#s(approx (* (sin ky) (sin th)) (*.f64 th (+.f64 (sin.f64 ky) (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/6 binary64) (sin.f64 ky)) (*.f64 #s(literal 1/120 binary64) (*.f64 (pow.f64 th #s(literal 2 binary64)) (sin.f64 ky))))))))
#s(approx (* (sin ky) (sin th)) (*.f64 th (+.f64 (sin.f64 ky) (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/6 binary64) (sin.f64 ky)) (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/5040 binary64) (*.f64 (pow.f64 th #s(literal 2 binary64)) (sin.f64 ky))) (*.f64 #s(literal 1/120 binary64) (sin.f64 ky)))))))))
#s(approx (/ (* (sin ky) (sin th)) (sqrt (* 1/2 (- 1 (cos (* 2 ky)))))) (/.f64 (*.f64 th (sin.f64 ky)) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
#s(approx (/ (* (sin ky) (sin th)) (sqrt (* 1/2 (- 1 (cos (* 2 ky)))))) (*.f64 th (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (sin.f64 ky)) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (/.f64 (sin.f64 ky) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))))
#s(approx (/ (* (sin ky) (sin th)) (sqrt (* 1/2 (- 1 (cos (* 2 ky)))))) (*.f64 th (+.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 ky) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (*.f64 #s(literal 1/120 binary64) (/.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (sin.f64 ky)) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))) (/.f64 (sin.f64 ky) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))))
#s(approx (/ (* (sin ky) (sin th)) (sqrt (* 1/2 (- 1 (cos (* 2 ky)))))) (*.f64 th (+.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 ky) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/5040 binary64) (/.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (sin.f64 ky)) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (*.f64 #s(literal 1/120 binary64) (/.f64 (sin.f64 ky) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))))) (/.f64 (sin.f64 ky) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 (*.f64 th (sin.f64 ky)) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 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 (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 th (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (sin.f64 ky)) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 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 (sin.f64 ky) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 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 (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 th (+.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 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/120 binary64) (/.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (sin.f64 ky)) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 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 (sin.f64 ky) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 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 (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 th (+.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 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 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/5040 binary64) (/.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (sin.f64 ky)) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 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/120 binary64) (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 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 (sin.f64 ky) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 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/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (*.f64 th (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 th #s(literal 2 binary64)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))))
#s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (*.f64 th (-.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/120 binary64) (/.f64 (pow.f64 th #s(literal 2 binary64)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))) (*.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))))
#s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (*.f64 th (-.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/5040 binary64) (/.f64 (pow.f64 th #s(literal 2 binary64)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))) (*.f64 #s(literal 1/120 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))))) (*.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))))
#s(approx (* (neg (sin ky)) (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th))) (/.f64 (*.f64 th (sin.f64 ky)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))
#s(approx (* (neg (sin ky)) (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th))) (*.f64 th (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (sin.f64 ky)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))) (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))))
#s(approx (* (neg (sin ky)) (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th))) (*.f64 th (+.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))) (*.f64 #s(literal 1/120 binary64) (/.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (sin.f64 ky)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))))) (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))))
#s(approx (* (neg (sin ky)) (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th))) (*.f64 th (+.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))) (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/5040 binary64) (/.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (sin.f64 ky)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))) (*.f64 #s(literal 1/120 binary64) (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))))))) (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))))
Calls

9 calls:

TimeVariablePoint
33.0ms
kx
inf
17.0ms
ky
-inf
13.0ms
ky
inf
12.0ms
kx
-inf
12.0ms
ky
0

rewrite385.0ms (2.0%)

Memory
18.3MiB live, 738.5MiB allocated; 103ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
093929
0150781
1703610
23026610
04191502
Stop Event
iter-limit
node-limit
iter-limit
Counts
62 → 1 324
Calls
Call 1
Inputs
ky
(sin.f64 ky)
#s(literal 1/2 binary64)
(+.f64 ky ky)
(cos.f64 (+.f64 ky ky))
(*.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)))
#s(literal 3 binary64)
(pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #s(literal 3 binary64))
kx
(sin.f64 kx)
(neg.f64 (sin.f64 kx))
(*.f64 (neg.f64 (sin.f64 kx)) (sin.f64 kx))
(pow.f64 (*.f64 (neg.f64 (sin.f64 kx)) (sin.f64 kx)) #s(literal 3 binary64))
(-.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 (neg.f64 (sin.f64 kx)) (sin.f64 kx)) #s(literal 3 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/2 binary64))))
(*.f64 (*.f64 (neg.f64 (sin.f64 kx)) (sin.f64 kx)) (*.f64 (neg.f64 (sin.f64 kx)) (sin.f64 kx)))
(*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (*.f64 (neg.f64 (sin.f64 kx)) (sin.f64 kx)))
(+.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 kx)) (sin.f64 kx)) (*.f64 (neg.f64 (sin.f64 kx)) (sin.f64 kx))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (*.f64 (neg.f64 (sin.f64 kx)) (sin.f64 kx))))
(+.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 (neg.f64 (sin.f64 kx)) (sin.f64 kx)) (*.f64 (neg.f64 (sin.f64 kx)) (sin.f64 kx))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (*.f64 (neg.f64 (sin.f64 kx)) (sin.f64 kx)))))
(/.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 (neg.f64 (sin.f64 kx)) (sin.f64 kx)) #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 (neg.f64 (sin.f64 kx)) (sin.f64 kx)) (*.f64 (neg.f64 (sin.f64 kx)) (sin.f64 kx))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (*.f64 (neg.f64 (sin.f64 kx)) (sin.f64 kx))))))
(sqrt.f64 (/.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 (neg.f64 (sin.f64 kx)) (sin.f64 kx)) #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 (neg.f64 (sin.f64 kx)) (sin.f64 kx)) (*.f64 (neg.f64 (sin.f64 kx)) (sin.f64 kx))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (*.f64 (neg.f64 (sin.f64 kx)) (sin.f64 kx)))))))
(/.f64 (sin.f64 ky) (sqrt.f64 (/.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 (neg.f64 (sin.f64 kx)) (sin.f64 kx)) #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 (neg.f64 (sin.f64 kx)) (sin.f64 kx)) (*.f64 (neg.f64 (sin.f64 kx)) (sin.f64 kx))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (*.f64 (neg.f64 (sin.f64 kx)) (sin.f64 kx))))))))
th
(sin.f64 th)
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (/.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 (neg.f64 (sin.f64 kx)) (sin.f64 kx)) #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 (neg.f64 (sin.f64 kx)) (sin.f64 kx)) (*.f64 (neg.f64 (sin.f64 kx)) (sin.f64 kx))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (*.f64 (neg.f64 (sin.f64 kx)) (sin.f64 kx)))))))) (sin.f64 th))
(*.f64 ky (sin.f64 th))
(/.f64 (*.f64 ky (sin.f64 th)) kx)
#s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (*.f64 ky (sin.f64 th)) kx))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (*.f64 ky (sin.f64 th)) kx)))
(*.f64 (sin.f64 ky) (sin.f64 th))
#s(literal 1 binary64)
#s(literal 2 binary64)
(*.f64 #s(literal 2 binary64) ky)
(cos.f64 (*.f64 #s(literal 2 binary64) ky))
(-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))
(*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))
(sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))
(/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
(neg.f64 (sin.f64 ky))
#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) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))
(+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))
(-.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))
(sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))
(/.f64 th (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
(*.f64 #s(literal -1 binary64) (/.f64 th (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))
#s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (*.f64 #s(literal -1 binary64) (/.f64 th (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))))
(*.f64 (neg.f64 (sin.f64 ky)) #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (*.f64 #s(literal -1 binary64) (/.f64 th (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))))
(*.f64 (sin.f64 th) (sin.f64 ky))
(+.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 (*.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 ky ky)) #s(literal 1/2 binary64)) (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))))
(sqrt.f64 (-.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 (*.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (-.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))))))
Outputs
ky
(sin.f64 ky)
#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 #s(literal 2 binary64) ky)
(*.f64 ky #s(literal 2 binary64))
(/.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 (*.f64 ky #s(literal 1 binary64)) (*.f64 ky #s(literal 1 binary64)))
(+.f64 (*.f64 #s(literal 1 binary64) ky) (*.f64 #s(literal 1 binary64) 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 (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)))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 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/2 binary64)))))
(/.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 #s(literal 1/2 binary64) (*.f64 (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 (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 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/2 binary64)))))))
(neg.f64 (neg.f64 (cos.f64 (+.f64 ky ky))))
(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 #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))))
(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 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 #s(literal 1/2 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 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (fabs.f64 (cos.f64 ky)) (fabs.f64 (cos.f64 ky)) (sin.f64 (fabs.f64 ky)) (sin.f64 (fabs.f64 ky)))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (fabs.f64 (cos.f64 ky)) (fabs.f64 (cos.f64 ky)) (fabs.f64 (sin.f64 ky)) (fabs.f64 (sin.f64 ky)))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (fabs.f64 (cos.f64 ky)) (fabs.f64 (cos.f64 ky)) (neg.f64 (sin.f64 ky)) (neg.f64 (sin.f64 ky)))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (fabs.f64 (cos.f64 ky)) (fabs.f64 (cos.f64 ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (fabs.f64 (cos.f64 ky)) (fabs.f64 (cos.f64 ky)) #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (fabs.f64 (cos.f64 ky)) (fabs.f64 (cos.f64 ky)) (sin.f64 ky) (sin.f64 ky))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (neg.f64 (cos.f64 ky)) (neg.f64 (cos.f64 ky)) (sin.f64 (fabs.f64 ky)) (sin.f64 (fabs.f64 ky)))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (neg.f64 (cos.f64 ky)) (neg.f64 (cos.f64 ky)) (fabs.f64 (sin.f64 ky)) (fabs.f64 (sin.f64 ky)))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (neg.f64 (cos.f64 ky)) (neg.f64 (cos.f64 ky)) (neg.f64 (sin.f64 ky)) (neg.f64 (sin.f64 ky)))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (neg.f64 (cos.f64 ky)) (neg.f64 (cos.f64 ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (neg.f64 (cos.f64 ky)) (neg.f64 (cos.f64 ky)) #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (neg.f64 (cos.f64 ky)) (neg.f64 (cos.f64 ky)) (sin.f64 ky) (sin.f64 ky))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (cos.f64 ky) (cos.f64 ky) (sin.f64 (fabs.f64 ky)) (sin.f64 (fabs.f64 ky)))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (cos.f64 ky) (cos.f64 ky) (fabs.f64 (sin.f64 ky)) (fabs.f64 (sin.f64 ky)))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (cos.f64 ky) (cos.f64 ky) (neg.f64 (sin.f64 ky)) (neg.f64 (sin.f64 ky)))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (cos.f64 ky) (cos.f64 ky) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (cos.f64 ky) (cos.f64 ky) #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (cos.f64 ky) (cos.f64 ky) (sin.f64 ky) (sin.f64 ky))
(*.f64 (sin.f64 (fabs.f64 ky)) (sin.f64 (fabs.f64 ky)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))
(*.f64 (fabs.f64 (sin.f64 ky)) (fabs.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 (neg.f64 (sin.f64 ky)) (neg.f64 (sin.f64 ky)))
(*.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 ky ky))))
(*.f64 (sin.f64 ky) (sin.f64 ky))
(pow.f64 (sin.f64 ky) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)) (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)))) (cos.f64 (-.f64 (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)) (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)) (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)))) (cos.f64 (-.f64 (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)) (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky))) (cos.f64 (-.f64 (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)) (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)))) (cos.f64 (-.f64 (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)) (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)) (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)))) (cos.f64 (-.f64 (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)) (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky))) (cos.f64 (-.f64 (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)))) (cos.f64 (-.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)))) (cos.f64 (-.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky))) (cos.f64 (-.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 ky))) (cos.f64 (+.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 ky)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (PI.f64) ky))) (cos.f64 (+.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (PI.f64) ky)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (neg.f64 ky) (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (neg.f64 ky) (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (neg.f64 ky) (neg.f64 ky))) (cos.f64 (+.f64 ky ky))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (neg.f64 ky) (+.f64 (PI.f64) ky))) (cos.f64 (+.f64 (neg.f64 ky) (+.f64 (PI.f64) ky)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (PI.f64) ky) (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (+.f64 (PI.f64) ky) (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (PI.f64) ky) (neg.f64 ky))) (cos.f64 (+.f64 (+.f64 (PI.f64) ky) (neg.f64 ky)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (PI.f64) ky) (+.f64 (PI.f64) ky))) (cos.f64 (+.f64 (+.f64 (PI.f64) ky) (+.f64 (PI.f64) ky)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)))) (sin.f64 (+.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)))) (sin.f64 (+.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky))) (sin.f64 (+.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (neg.f64 ky) (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)))) (sin.f64 (+.f64 (neg.f64 ky) (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (neg.f64 ky) (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)))) (sin.f64 (+.f64 (neg.f64 ky) (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (neg.f64 ky) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky))) (sin.f64 (+.f64 (neg.f64 ky) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (PI.f64) ky) (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)))) (sin.f64 (+.f64 (+.f64 (PI.f64) ky) (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (PI.f64) ky) (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)))) (sin.f64 (+.f64 (+.f64 (PI.f64) ky) (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (PI.f64) ky) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky))) (sin.f64 (+.f64 (+.f64 (PI.f64) ky) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))))
(/.f64 (+.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 3 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))) (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))))))
(/.f64 (-.f64 (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))))))
(134-z0z1z2z3z4 (neg.f64 (sin.f64 ky)) (cos.f64 ky) (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (sin.f64 ky) (sin.f64 (*.f64 (PI.f64) #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) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))))
(-.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 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))
(+.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 (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)))))) (fabs.f64 (*.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 (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) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))
(*.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (/.f64 #s(literal 3 binary64) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (/.f64 #s(literal 3 binary64) #s(literal 2 binary64))))
(*.f64 (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (*.f64 (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (-.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 #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 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))
(*.f64 (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (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))))
(*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))
(pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #s(literal 3 binary64))
(neg.f64 (*.f64 (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))))
(neg.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))))
(neg.f64 (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 3 binary64)))
(exp.f64 (*.f64 (log.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) #s(literal 3 binary64)))
(+.f64 (*.f64 (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)) #s(literal 1/2 binary64)) (*.f64 (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))))
kx
(sin.f64 kx)
(neg.f64 (sin.f64 kx))
(sin.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) kx) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (neg.f64 kx))
(sin.f64 (+.f64 (PI.f64) kx))
(-.f64 (*.f64 (cos.f64 kx) (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 kx) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))))
(cos.f64 (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) kx)))
(cos.f64 (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) kx)))
(cos.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) kx))
(+.f64 (*.f64 (sin.f64 kx) (cos.f64 (PI.f64))) (*.f64 (cos.f64 kx) (sin.f64 (PI.f64))))
(*.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 (neg.f64 (sin.f64 kx)) (sin.f64 kx))
(*.f64 (sin.f64 kx) (neg.f64 (sin.f64 kx)))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) kx) (*.f64 (PI.f64) #s(literal 1/2 binary64))) kx)) (cos.f64 (+.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) kx) (*.f64 (PI.f64) #s(literal 1/2 binary64))) kx))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 kx (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) kx) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 kx (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) kx) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 kx (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) kx)))) (sin.f64 (+.f64 kx (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) kx))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 kx (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) kx)))) (sin.f64 (+.f64 kx (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) kx))))) #s(literal 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)))))
(/.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 (neg.f64 kx) kx))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (PI.f64) kx) kx)) (cos.f64 (+.f64 (+.f64 (PI.f64) kx) kx))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 kx (neg.f64 kx)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 kx (+.f64 (PI.f64) kx))) (cos.f64 (+.f64 kx (+.f64 (PI.f64) kx)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 kx (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) kx))) (cos.f64 (+.f64 kx kx))) #s(literal 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)))))
(134-z0z1z2z3z4 (sin.f64 kx) (cos.f64 kx) (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (sin.f64 kx) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(neg.f64 (-.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/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 (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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (neg.f64 (sin.f64 kx))) (sin.f64 kx))
(*.f64 (*.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (sin.f64 kx)) (neg.f64 (sin.f64 kx)))
(*.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (sin.f64 kx))
(*.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) (fabs.f64 (-.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 (cos.f64 (+.f64 kx kx)) #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 (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 (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))
(*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 3 binary64) #s(literal 2 binary64))) (pow.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 3 binary64) #s(literal 2 binary64))))
(*.f64 (fabs.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (*.f64 (fabs.f64 (-.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/2 binary64)) #s(literal 1/2 binary64))))
(*.f64 (pow.f64 (sin.f64 kx) #s(literal 3 binary64)) (neg.f64 (pow.f64 (sin.f64 kx) #s(literal 3 binary64))))
(*.f64 (-.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 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))))
(*.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))
(*.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64)))
(*.f64 (neg.f64 (sin.f64 kx)) (*.f64 (neg.f64 (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))))
(*.f64 (neg.f64 (sin.f64 kx)) (*.f64 (sin.f64 kx) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64))))
(*.f64 (sin.f64 kx) (*.f64 (neg.f64 (sin.f64 kx)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64))))
(pow.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) #s(literal 3 binary64))
(134-z0z1z2z3z4 (*.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (sin.f64 kx)) (cos.f64 kx) (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (sin.f64 kx) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(neg.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 3 binary64)))
(exp.f64 (*.f64 (log.f64 (-.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) (/.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 (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 ky ky)) #s(literal 1/2 binary64))) #s(literal 3 binary64)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (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 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #s(literal 3 binary64)))
(*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))))
(*.f64 (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))
(/.f64 (-.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 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (-.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 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 3 binary64))))
(/.f64 (+.f64 (pow.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #s(literal 3 binary64)) #s(literal 3 binary64)) (pow.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 3 binary64)) #s(literal 3 binary64))) (+.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 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (-.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (*.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 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 3 binary64))))))
(/.f64 (-.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 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) #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 (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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) #s(literal 3 binary64))))
(/.f64 (-.f64 (pow.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #s(literal 3 binary64)) #s(literal 3 binary64)) (pow.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) #s(literal 3 binary64)) #s(literal 3 binary64))) (+.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 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (+.f64 (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) #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 (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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) #s(literal 3 binary64))))))
(134-z0z1z2z3z4 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (fabs.f64 (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))) (fabs.f64 (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 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))))))
(134-z0z1z2z3z4 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (fabs.f64 (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))) (fabs.f64 (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 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 (-.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)))))))
(134-z0z1z2z3z4 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (neg.f64 (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))) (neg.f64 (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 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))))))
(134-z0z1z2z3z4 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (neg.f64 (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))) (neg.f64 (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 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 (-.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)))))))
(134-z0z1z2z3z4 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 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 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) (neg.f64 (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))) (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))))
(134-z0z1z2z3z4 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 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 (*.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 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))
(134-z0z1z2z3z4 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 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 (*.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 ky ky)) #s(literal 1/2 binary64))) (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))
(134-z0z1z2z3z4 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (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))))) (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 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))))))
(134-z0z1z2z3z4 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (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))))) (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 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 (-.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)))))))
(134-z0z1z2z3z4 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (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) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 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))))))
(134-z0z1z2z3z4 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (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) (-.f64 #s(literal 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 (-.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)))))))
(134-z0z1z2z3z4 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (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 (-.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))))) (neg.f64 (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))) (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))))
(134-z0z1z2z3z4 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (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 (-.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 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))
(134-z0z1z2z3z4 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (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 (-.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 (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)))))
(134-z0z1z2z3z4 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (neg.f64 (sin.f64 kx)) (*.f64 (sin.f64 kx) (-.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)))))) (neg.f64 (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))) (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))))
(134-z0z1z2z3z4 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (neg.f64 (sin.f64 kx)) (*.f64 (sin.f64 kx) (-.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 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))
(134-z0z1z2z3z4 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (neg.f64 (sin.f64 kx)) (*.f64 (sin.f64 kx) (-.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 (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)))))
(134-z0z1z2z3z4 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (sin.f64 kx) (*.f64 (neg.f64 (sin.f64 kx)) (-.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)))))) (neg.f64 (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))) (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))))
(134-z0z1z2z3z4 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (sin.f64 kx) (*.f64 (neg.f64 (sin.f64 kx)) (-.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 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))
(134-z0z1z2z3z4 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (sin.f64 kx) (*.f64 (neg.f64 (sin.f64 kx)) (-.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 (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)))))
(134-z0z1z2z3z4 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (sin.f64 kx) (+.f64 (*.f64 (neg.f64 (sin.f64 kx)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (neg.f64 (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))) (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))))
(134-z0z1z2z3z4 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (sin.f64 kx) (+.f64 (*.f64 (neg.f64 (sin.f64 kx)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))
(134-z0z1z2z3z4 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (sin.f64 kx) (+.f64 (*.f64 (neg.f64 (sin.f64 kx)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 3 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 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))
(134-z0z1z2z3z4 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (sin.f64 kx) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 3 binary64)) (*.f64 (neg.f64 (sin.f64 kx)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (neg.f64 (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))) (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))))
(134-z0z1z2z3z4 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (sin.f64 kx) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 3 binary64)) (*.f64 (neg.f64 (sin.f64 kx)) (-.f64 #s(literal 1/2 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) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))
(134-z0z1z2z3z4 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (sin.f64 kx) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 3 binary64)) (*.f64 (neg.f64 (sin.f64 kx)) (-.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 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))
(134-z0z1z2z3z4 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (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 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 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))))))
(134-z0z1z2z3z4 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) (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)))))))
(134-z0z1z2z3z4 (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))) (sin.f64 (fabs.f64 ky)) (sin.f64 (fabs.f64 ky)) (neg.f64 (sin.f64 kx)) (sin.f64 kx))
(134-z0z1z2z3z4 (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))) (sin.f64 (fabs.f64 ky)) (sin.f64 (fabs.f64 ky)) (sin.f64 kx) (neg.f64 (sin.f64 kx)))
(134-z0z1z2z3z4 (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))) (sin.f64 (fabs.f64 kx)) (sin.f64 (fabs.f64 kx)) #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))
(134-z0z1z2z3z4 (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))) (sin.f64 (fabs.f64 kx)) (sin.f64 (fabs.f64 kx)) (-.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(134-z0z1z2z3z4 (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))) (sin.f64 (fabs.f64 kx)) (sin.f64 (fabs.f64 kx)) (neg.f64 (sin.f64 ky)) (sin.f64 ky))
(134-z0z1z2z3z4 (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))) (sin.f64 (fabs.f64 kx)) (sin.f64 (fabs.f64 kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal -1/2 binary64))
(134-z0z1z2z3z4 (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))) (sin.f64 (fabs.f64 kx)) (sin.f64 (fabs.f64 kx)) #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64)))
(134-z0z1z2z3z4 (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))) (sin.f64 (fabs.f64 kx)) (sin.f64 (fabs.f64 kx)) (sin.f64 ky) (neg.f64 (sin.f64 ky)))
(134-z0z1z2z3z4 (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))) (fabs.f64 (sin.f64 ky)) (fabs.f64 (sin.f64 ky)) (neg.f64 (sin.f64 kx)) (sin.f64 kx))
(134-z0z1z2z3z4 (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))) (fabs.f64 (sin.f64 ky)) (fabs.f64 (sin.f64 ky)) (sin.f64 kx) (neg.f64 (sin.f64 kx)))
(134-z0z1z2z3z4 (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))) (neg.f64 (neg.f64 (sin.f64 kx))) (neg.f64 (neg.f64 (sin.f64 kx))) #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))
(134-z0z1z2z3z4 (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))) (neg.f64 (neg.f64 (sin.f64 kx))) (neg.f64 (neg.f64 (sin.f64 kx))) (-.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(134-z0z1z2z3z4 (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))) (neg.f64 (neg.f64 (sin.f64 kx))) (neg.f64 (neg.f64 (sin.f64 kx))) (neg.f64 (sin.f64 ky)) (sin.f64 ky))
(134-z0z1z2z3z4 (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))) (neg.f64 (neg.f64 (sin.f64 kx))) (neg.f64 (neg.f64 (sin.f64 kx))) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal -1/2 binary64))
(134-z0z1z2z3z4 (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))) (neg.f64 (neg.f64 (sin.f64 kx))) (neg.f64 (neg.f64 (sin.f64 kx))) #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64)))
(134-z0z1z2z3z4 (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))) (neg.f64 (neg.f64 (sin.f64 kx))) (neg.f64 (neg.f64 (sin.f64 kx))) (sin.f64 ky) (neg.f64 (sin.f64 ky)))
(134-z0z1z2z3z4 (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))) (neg.f64 (neg.f64 (sin.f64 kx))) (sin.f64 kx) #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))
(134-z0z1z2z3z4 (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))) (neg.f64 (neg.f64 (sin.f64 kx))) (sin.f64 kx) (-.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(134-z0z1z2z3z4 (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))) (neg.f64 (neg.f64 (sin.f64 kx))) (sin.f64 kx) (neg.f64 (sin.f64 ky)) (sin.f64 ky))
(134-z0z1z2z3z4 (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))) (neg.f64 (neg.f64 (sin.f64 kx))) (sin.f64 kx) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal -1/2 binary64))
(134-z0z1z2z3z4 (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))) (neg.f64 (neg.f64 (sin.f64 kx))) (sin.f64 kx) #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64)))
(134-z0z1z2z3z4 (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))) (neg.f64 (neg.f64 (sin.f64 kx))) (sin.f64 kx) (sin.f64 ky) (neg.f64 (sin.f64 ky)))
(134-z0z1z2z3z4 (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))) (fabs.f64 (neg.f64 (sin.f64 kx))) (fabs.f64 (neg.f64 (sin.f64 kx))) #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))
(134-z0z1z2z3z4 (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))) (fabs.f64 (neg.f64 (sin.f64 kx))) (fabs.f64 (neg.f64 (sin.f64 kx))) (-.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(134-z0z1z2z3z4 (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))) (fabs.f64 (neg.f64 (sin.f64 kx))) (fabs.f64 (neg.f64 (sin.f64 kx))) (neg.f64 (sin.f64 ky)) (sin.f64 ky))
(134-z0z1z2z3z4 (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))) (fabs.f64 (neg.f64 (sin.f64 kx))) (fabs.f64 (neg.f64 (sin.f64 kx))) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal -1/2 binary64))
(134-z0z1z2z3z4 (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))) (fabs.f64 (neg.f64 (sin.f64 kx))) (fabs.f64 (neg.f64 (sin.f64 kx))) #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64)))
(134-z0z1z2z3z4 (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))) (fabs.f64 (neg.f64 (sin.f64 kx))) (fabs.f64 (neg.f64 (sin.f64 kx))) (sin.f64 ky) (neg.f64 (sin.f64 ky)))
(134-z0z1z2z3z4 (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))) (neg.f64 (sin.f64 ky)) (neg.f64 (sin.f64 ky)) (neg.f64 (sin.f64 kx)) (sin.f64 kx))
(134-z0z1z2z3z4 (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))) (neg.f64 (sin.f64 ky)) (neg.f64 (sin.f64 ky)) (sin.f64 kx) (neg.f64 (sin.f64 kx)))
(134-z0z1z2z3z4 (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (neg.f64 (sin.f64 kx)) (sin.f64 kx))
(134-z0z1z2z3z4 (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) (sin.f64 kx) (neg.f64 (sin.f64 kx)))
(134-z0z1z2z3z4 (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))) (fabs.f64 (sin.f64 kx)) (fabs.f64 (sin.f64 kx)) #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))
(134-z0z1z2z3z4 (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))) (fabs.f64 (sin.f64 kx)) (fabs.f64 (sin.f64 kx)) (-.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(134-z0z1z2z3z4 (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))) (fabs.f64 (sin.f64 kx)) (fabs.f64 (sin.f64 kx)) (neg.f64 (sin.f64 ky)) (sin.f64 ky))
(134-z0z1z2z3z4 (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))) (fabs.f64 (sin.f64 kx)) (fabs.f64 (sin.f64 kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal -1/2 binary64))
(134-z0z1z2z3z4 (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))) (fabs.f64 (sin.f64 kx)) (fabs.f64 (sin.f64 kx)) #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64)))
(134-z0z1z2z3z4 (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))) (fabs.f64 (sin.f64 kx)) (fabs.f64 (sin.f64 kx)) (sin.f64 ky) (neg.f64 (sin.f64 ky)))
(134-z0z1z2z3z4 (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))) (neg.f64 (sin.f64 kx)) (neg.f64 (sin.f64 kx)) #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))
(134-z0z1z2z3z4 (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))) (neg.f64 (sin.f64 kx)) (neg.f64 (sin.f64 kx)) (-.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(134-z0z1z2z3z4 (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))) (neg.f64 (sin.f64 kx)) (neg.f64 (sin.f64 kx)) (neg.f64 (sin.f64 ky)) (sin.f64 ky))
(134-z0z1z2z3z4 (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))) (neg.f64 (sin.f64 kx)) (neg.f64 (sin.f64 kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal -1/2 binary64))
(134-z0z1z2z3z4 (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))) (neg.f64 (sin.f64 kx)) (neg.f64 (sin.f64 kx)) #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64)))
(134-z0z1z2z3z4 (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))) (neg.f64 (sin.f64 kx)) (neg.f64 (sin.f64 kx)) (sin.f64 ky) (neg.f64 (sin.f64 ky)))
(134-z0z1z2z3z4 (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))) (sin.f64 kx) (neg.f64 (neg.f64 (sin.f64 kx))) #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))
(134-z0z1z2z3z4 (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))) (sin.f64 kx) (neg.f64 (neg.f64 (sin.f64 kx))) (-.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(134-z0z1z2z3z4 (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))) (sin.f64 kx) (neg.f64 (neg.f64 (sin.f64 kx))) (neg.f64 (sin.f64 ky)) (sin.f64 ky))
(134-z0z1z2z3z4 (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))) (sin.f64 kx) (neg.f64 (neg.f64 (sin.f64 kx))) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal -1/2 binary64))
(134-z0z1z2z3z4 (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))) (sin.f64 kx) (neg.f64 (neg.f64 (sin.f64 kx))) #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64)))
(134-z0z1z2z3z4 (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))) (sin.f64 kx) (neg.f64 (neg.f64 (sin.f64 kx))) (sin.f64 ky) (neg.f64 (sin.f64 ky)))
(134-z0z1z2z3z4 (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))) (sin.f64 kx) (sin.f64 kx) #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))
(134-z0z1z2z3z4 (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))) (sin.f64 kx) (sin.f64 kx) (-.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(134-z0z1z2z3z4 (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))) (sin.f64 kx) (sin.f64 kx) (neg.f64 (sin.f64 ky)) (sin.f64 ky))
(134-z0z1z2z3z4 (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))) (sin.f64 kx) (sin.f64 kx) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal -1/2 binary64))
(134-z0z1z2z3z4 (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))) (sin.f64 kx) (sin.f64 kx) #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64)))
(134-z0z1z2z3z4 (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))) (sin.f64 kx) (sin.f64 kx) (sin.f64 ky) (neg.f64 (sin.f64 ky)))
(134-z0z1z2z3z4 (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))) #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (neg.f64 (sin.f64 kx)) (sin.f64 kx))
(134-z0z1z2z3z4 (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))) #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (sin.f64 kx) (neg.f64 (sin.f64 kx)))
(134-z0z1z2z3z4 (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))) (sin.f64 ky) (sin.f64 ky) (neg.f64 (sin.f64 kx)) (sin.f64 kx))
(134-z0z1z2z3z4 (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))) (sin.f64 ky) (sin.f64 ky) (sin.f64 kx) (neg.f64 (sin.f64 kx)))
(neg.f64 (-.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #s(literal 3 binary64))))
(-.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) #s(literal 3 binary64)))
(+.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 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #s(literal 3 binary64)))
(+.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 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 3 binary64)))
(*.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(*.f64 (fabs.f64 (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))) (fabs.f64 (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))))
(*.f64 (neg.f64 (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))) (neg.f64 (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))))
(*.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #s(literal 1 binary64)))
(*.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))
(*.f64 (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (fabs.f64 (*.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 #s(literal -1/2 binary64) (-.f64 #s(literal 1 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 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))
(pow.f64 (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal 2 binary64))
(pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))
(pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #s(literal 2 binary64))
(neg.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 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))))
(neg.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 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))
(fabs.f64 (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) #s(literal 2 binary64)))
(+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #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) (cos.f64 (+.f64 ky ky)))))
(+.f64 (*.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 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))
(+.f64 (+.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 2 binary64)))
(+.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (pow.f64 (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) #s(literal 2 binary64)))
(*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(*.f64 (fabs.f64 (fabs.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))) (fabs.f64 (fabs.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))
(*.f64 (neg.f64 (fabs.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))) (neg.f64 (fabs.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))
(*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (pow.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))
(*.f64 (neg.f64 (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (neg.f64 (sin.f64 kx)))
(*.f64 (fabs.f64 (-.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))
(*.f64 (pow.f64 (sin.f64 kx) #s(literal 3 binary64)) (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/2 binary64))))
(*.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 (neg.f64 (sin.f64 kx)) (neg.f64 (pow.f64 (sin.f64 kx) #s(literal 3 binary64))))
(*.f64 (sin.f64 kx) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))
(pow.f64 (fabs.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal 2 binary64))
(pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64))
(pow.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) #s(literal 2 binary64))
(134-z0z1z2z3z4 (neg.f64 (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (cos.f64 kx) (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (sin.f64 kx) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(neg.f64 (*.f64 (-.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/2 binary64)) #s(literal 1/2 binary64))))
(neg.f64 (*.f64 (sin.f64 kx) (neg.f64 (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))))
(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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))
(fabs.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) #s(literal 2 binary64)))
(*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (sin.f64 kx)) (neg.f64 (sin.f64 kx)))
(*.f64 (*.f64 (neg.f64 (sin.f64 kx)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (sin.f64 kx))
(*.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 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))
(*.f64 (neg.f64 (sin.f64 kx)) (*.f64 (sin.f64 kx) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))
(*.f64 (sin.f64 kx) (*.f64 (neg.f64 (sin.f64 kx)) (-.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 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))
(134-z0z1z2z3z4 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (sin.f64 kx)) (cos.f64 kx) (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (sin.f64 kx) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(neg.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.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)) #s(literal 1/2 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) (cos.f64 (+.f64 ky ky)))))
(+.f64 (*.f64 #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) (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 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 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 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 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 (cos.f64 (+.f64 ky ky)) #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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 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 (*.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 (*.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 ky ky)) #s(literal 1/2 binary64)))) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64)))
(*.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 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 (neg.f64 (sin.f64 kx)) (*.f64 (sin.f64 kx) (-.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 (sin.f64 kx) (*.f64 (neg.f64 (sin.f64 kx)) (-.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 (sin.f64 kx) (+.f64 (*.f64 (neg.f64 (sin.f64 kx)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))))
(*.f64 (sin.f64 kx) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 3 binary64)) (*.f64 (neg.f64 (sin.f64 kx)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))
(/.f64 (-.f64 (*.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 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 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 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (*.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 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 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #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 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))))) (+.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 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 (-.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 ky ky)) #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) #s(literal 3 binary64))) (+.f64 (*.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 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 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 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (-.f64 (*.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 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 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))
(/.f64 (-.f64 (pow.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (+.f64 (*.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #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 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))) (*.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 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 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 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 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 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 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))) (-.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 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 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))
(/.f64 (+.f64 (pow.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.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 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) #s(literal 3 binary64))) (+.f64 (*.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (-.f64 (*.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 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 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 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (*.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 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 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))))
(134-z0z1z2z3z4 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) (neg.f64 (sin.f64 kx)) (sin.f64 kx) #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))
(134-z0z1z2z3z4 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) (neg.f64 (sin.f64 kx)) (sin.f64 kx) (-.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(134-z0z1z2z3z4 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) (neg.f64 (sin.f64 kx)) (sin.f64 kx) (neg.f64 (sin.f64 ky)) (sin.f64 ky))
(134-z0z1z2z3z4 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) (neg.f64 (sin.f64 kx)) (sin.f64 kx) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal -1/2 binary64))
(134-z0z1z2z3z4 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) (neg.f64 (sin.f64 kx)) (sin.f64 kx) #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64)))
(134-z0z1z2z3z4 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) (neg.f64 (sin.f64 kx)) (sin.f64 kx) (sin.f64 ky) (neg.f64 (sin.f64 ky)))
(134-z0z1z2z3z4 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) (sin.f64 kx) (neg.f64 (sin.f64 kx)) #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))
(134-z0z1z2z3z4 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) (sin.f64 kx) (neg.f64 (sin.f64 kx)) (-.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(134-z0z1z2z3z4 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) (sin.f64 kx) (neg.f64 (sin.f64 kx)) (neg.f64 (sin.f64 ky)) (sin.f64 ky))
(134-z0z1z2z3z4 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) (sin.f64 kx) (neg.f64 (sin.f64 kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal -1/2 binary64))
(134-z0z1z2z3z4 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) (sin.f64 kx) (neg.f64 (sin.f64 kx)) #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64)))
(134-z0z1z2z3z4 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) (sin.f64 kx) (neg.f64 (sin.f64 kx)) (sin.f64 ky) (neg.f64 (sin.f64 ky)))
(neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 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 (*.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 (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/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)) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 kx) (neg.f64 (pow.f64 (sin.f64 kx) #s(literal 3 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 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (*.f64 (neg.f64 (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (sin.f64 kx)))
(-.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 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 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 (cos.f64 (+.f64 kx kx)) #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 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (*.f64 (neg.f64 (fabs.f64 (-.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 (cos.f64 (+.f64 kx kx)) #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 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (*.f64 (neg.f64 (neg.f64 (sin.f64 kx))) (neg.f64 (pow.f64 (sin.f64 kx) #s(literal 3 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 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (neg.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64))))
(-.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 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 (*.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 ky ky)) #s(literal 1/2 binary64)))) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64)))
(+.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 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 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))
(*.f64 (+.f64 #s(literal 1 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 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (+.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))))) (+.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 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 (*.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 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 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)))))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))
(/.f64 (-.f64 (*.f64 (+.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))) (+.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 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 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 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 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))) (-.f64 (+.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 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 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))
(/.f64 (-.f64 (*.f64 (*.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 (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 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))) (*.f64 (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (-.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 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 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 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 (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 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 (+.f64 (pow.f64 (+.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.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 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) #s(literal 3 binary64))) (+.f64 (*.f64 (+.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))) (+.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (-.f64 (*.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 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 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 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (*.f64 (+.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 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 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))))
(/.f64 (+.f64 (pow.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (pow.f64 (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.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 (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 (*.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 2 binary64)) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))) (*.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))))))
(/.f64 (-.f64 (pow.f64 (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 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)))))) #s(literal 3 binary64))) (+.f64 (*.f64 (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 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 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 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 (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 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 (-.f64 (*.f64 (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))) (*.f64 (*.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 (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 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))))) (-.f64 (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 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 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))))
(/.f64 (+.f64 (pow.f64 (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (+.f64 (*.f64 (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))) (-.f64 (*.f64 (*.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 (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 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))) (*.f64 (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 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 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))))))
(neg.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 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)))))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))))
(-.f64 (+.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 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)))) (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))))
(-.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #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 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))))
(-.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (*.f64 (neg.f64 (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))) (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))))
(-.f64 (*.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 (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 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))
(-.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (neg.f64 (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))))
(-.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #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))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))))
(-.f64 (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 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 (+.f64 (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 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 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64)))
(+.f64 (+.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 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 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))
(+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 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 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (+.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))))
(+.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 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 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))))
(+.f64 (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 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 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #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/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 #s(literal 1 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 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 binary64) (/.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky)))) #s(literal 1 binary64))) #s(literal 1 binary64))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (/.f64 (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 (-.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))))) (/.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))
(*.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 (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 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 (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 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (-.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 (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) (/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (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 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))
(*.f64 (-.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 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)))))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))))
(*.f64 (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))))))
(*.f64 (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))))
(*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))))
(/.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) #s(literal 3 binary64))) #s(literal 1 binary64)) (+.f64 (*.f64 (-.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))))
(/.f64 (-.f64 (*.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)) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 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 (-.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))))
(/.f64 (-.f64 (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 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 kx kx)) #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 2 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 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 (-.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))) (+.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 ky ky))))))
(/.f64 (-.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))) (-.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 ky ky)) #s(literal 1/2 binary64)))))
(/.f64 (-.f64 (*.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (*.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky)))) (*.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))))))
(/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))))
(/.f64 (-.f64 (*.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)) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))))) (*.f64 (/.f64 (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 (-.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (/.f64 (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 (-.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))))) (+.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)) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (/.f64 (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 (-.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))))))
(/.f64 (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #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 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (*.f64 (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 #s(literal -1/2 binary64) (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky)))) #s(literal 3 binary64))) (+.f64 (*.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky)))) (*.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))))) (*.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))))))))
(/.f64 (+.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal 3 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))))))
(/.f64 (-.f64 (pow.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)) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (/.f64 (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 (-.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) #s(literal 3 binary64))) (+.f64 (*.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)) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))))) (+.f64 (*.f64 (/.f64 (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 (-.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (/.f64 (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 (-.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))))) (*.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)) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (/.f64 (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 (-.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))))))))
(/.f64 (-.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #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 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #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 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))
(/.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 ky ky)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)) (*.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 ky ky))))))))
(/.f64 (-.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)) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (*.f64 (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 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 (-.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))))
(/.f64 (-.f64 (*.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (*.f64 (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) (+.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))
(/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.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 (cos.f64 (+.f64 kx kx)) (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 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (*.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (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 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (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 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))))
(/.f64 (-.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (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 kx kx)) #s(literal 1/2 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)))))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 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)))))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))) (-.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))) (-.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) #s(literal 3 binary64)))))
(/.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (+.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 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)))) (-.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 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #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 (-.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (*.f64 (-.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)))))) (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (*.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (neg.f64 (sin.f64 kx))) (sin.f64 kx))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (*.f64 (-.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)))))) (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (*.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (sin.f64 kx)) (neg.f64 (sin.f64 kx)))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (*.f64 (-.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)))))) (fabs.f64 (*.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)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (sin.f64 kx))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (*.f64 (-.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)))))) (fabs.f64 (*.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)) (fabs.f64 (-.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (*.f64 (-.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)))))) (fabs.f64 (*.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 #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))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (*.f64 (-.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)))))) (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (neg.f64 (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (*.f64 (-.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)))))) (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (fabs.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (*.f64 (fabs.f64 (-.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/2 binary64)) #s(literal 1/2 binary64))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (*.f64 (-.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)))))) (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)) (neg.f64 (pow.f64 (sin.f64 kx) #s(literal 3 binary64))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (*.f64 (-.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)))))) (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (-.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 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (*.f64 (-.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)))))) (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (*.f64 (-.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)))))) (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64)))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (*.f64 (-.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)))))) (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (neg.f64 (sin.f64 kx)) (*.f64 (neg.f64 (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (*.f64 (-.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)))))) (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (neg.f64 (sin.f64 kx)) (*.f64 (sin.f64 kx) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (*.f64 (-.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)))))) (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (sin.f64 kx) (*.f64 (neg.f64 (sin.f64 kx)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 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 #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 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (neg.f64 (sin.f64 kx))) (sin.f64 kx))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 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 #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 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (sin.f64 kx)) (neg.f64 (sin.f64 kx)))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 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 #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)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (sin.f64 kx))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 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 #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)) (fabs.f64 (-.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 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 #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 #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))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 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 #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)))) (neg.f64 (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 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 #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)))) (fabs.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (*.f64 (fabs.f64 (-.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/2 binary64)) #s(literal 1/2 binary64))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 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 #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)))) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)) (neg.f64 (pow.f64 (sin.f64 kx) #s(literal 3 binary64))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 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 #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/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 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 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 #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)))) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 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 #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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64)))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 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 #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)))) (neg.f64 (sin.f64 kx)) (*.f64 (neg.f64 (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 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 #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)))) (neg.f64 (sin.f64 kx)) (*.f64 (sin.f64 kx) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 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 #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)))) (sin.f64 kx) (*.f64 (neg.f64 (sin.f64 kx)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (*.f64 (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (*.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (neg.f64 (sin.f64 kx))) (sin.f64 kx))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (*.f64 (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (*.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (sin.f64 kx)) (neg.f64 (sin.f64 kx)))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (*.f64 (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (*.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (sin.f64 kx))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (*.f64 (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (*.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) (fabs.f64 (-.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (*.f64 (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 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 (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))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (*.f64 (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (neg.f64 (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (*.f64 (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (-.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (*.f64 (fabs.f64 (-.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/2 binary64)) #s(literal 1/2 binary64))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (*.f64 (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)) (neg.f64 (pow.f64 (sin.f64 kx) #s(literal 3 binary64))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (*.f64 (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (-.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 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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (*.f64 (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (*.f64 (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (-.f64 #s(literal 1/2 binary64) (*.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)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64)))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (*.f64 (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (neg.f64 (sin.f64 kx)) (*.f64 (neg.f64 (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (*.f64 (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (neg.f64 (sin.f64 kx)) (*.f64 (sin.f64 kx) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (*.f64 (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (sin.f64 kx) (*.f64 (neg.f64 (sin.f64 kx)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (*.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 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (*.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (neg.f64 (sin.f64 kx))) (sin.f64 kx))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (*.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 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (*.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (sin.f64 kx)) (neg.f64 (sin.f64 kx)))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (*.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 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (*.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (sin.f64 kx))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (*.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 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (*.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) (fabs.f64 (-.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (*.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 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 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 (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))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (*.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 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (neg.f64 (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (*.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 #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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (*.f64 (fabs.f64 (-.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/2 binary64)) #s(literal 1/2 binary64))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (*.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 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)) (neg.f64 (pow.f64 (sin.f64 kx) #s(literal 3 binary64))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (*.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 #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 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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (*.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 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (*.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 #s(literal 1/2 binary64) (*.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)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64)))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (*.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 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (neg.f64 (sin.f64 kx)) (*.f64 (neg.f64 (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (*.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 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (neg.f64 (sin.f64 kx)) (*.f64 (sin.f64 kx) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (*.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 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (sin.f64 kx) (*.f64 (neg.f64 (sin.f64 kx)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (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))) (*.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (neg.f64 (sin.f64 kx))) (sin.f64 kx))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (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))) (*.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (sin.f64 kx)) (neg.f64 (sin.f64 kx)))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (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))) (*.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (sin.f64 kx))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (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))) (*.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) (fabs.f64 (-.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (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))) (*.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 (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))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (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))) (neg.f64 (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (*.f64 (fabs.f64 (-.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/2 binary64)) #s(literal 1/2 binary64))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (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))) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)) (neg.f64 (pow.f64 (sin.f64 kx) #s(literal 3 binary64))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (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))) (-.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 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (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))) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (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))) (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64)))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (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))) (neg.f64 (sin.f64 kx)) (*.f64 (neg.f64 (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (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))) (neg.f64 (sin.f64 kx)) (*.f64 (sin.f64 kx) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (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))) (sin.f64 kx) (*.f64 (neg.f64 (sin.f64 kx)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (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))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (neg.f64 (sin.f64 kx))) (sin.f64 kx))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (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))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (sin.f64 kx)) (neg.f64 (sin.f64 kx)))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (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))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (sin.f64 kx))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (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))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) (fabs.f64 (-.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (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))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 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 (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))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (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))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)) (neg.f64 (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (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))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)) (fabs.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (*.f64 (fabs.f64 (-.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/2 binary64)) #s(literal 1/2 binary64))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (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))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)) (neg.f64 (pow.f64 (sin.f64 kx) #s(literal 3 binary64))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (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))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 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 (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))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (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))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (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))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64)))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (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))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)) (neg.f64 (sin.f64 kx)) (*.f64 (neg.f64 (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (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))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)) (neg.f64 (sin.f64 kx)) (*.f64 (sin.f64 kx) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (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))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)) (sin.f64 kx) (*.f64 (neg.f64 (sin.f64 kx)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64))))
(neg.f64 (*.f64 (-.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))))))
(neg.f64 (+.f64 #s(literal -1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))
(neg.f64 (/.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 (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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 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)))))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))))
(neg.f64 (/.f64 (-.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))))
(neg.f64 (-.f64 (/.f64 (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 (-.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))))))
(neg.f64 (-.f64 (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))
(neg.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))
(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 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))
(neg.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) #s(literal 1 binary64)))
(-.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))
(-.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))
(-.f64 (-.f64 #s(literal 1 binary64) (*.f64 (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 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal -1/2 binary64))
(-.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)) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (/.f64 (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 (-.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))))
(-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (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/2 binary64))) (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 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 (*.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)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))
(+.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))
(+.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky)))) #s(literal 1 binary64))
(+.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal 1/2 binary64))
(+.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)) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (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 (-.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))))))
(+.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)) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))))
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky)))))
(+.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 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 kx kx)) #s(literal 1/2 binary64))))
(+.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 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/2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))))
(*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))))
(*.f64 (pow.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) #s(literal 3 binary64))) #s(literal 1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) #s(literal 1/2 binary64)))
(*.f64 (sqrt.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) #s(literal 3 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))))))
(pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))
(/.f64 (sqrt.f64 (-.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (sqrt.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 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)))))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))))
(/.f64 (sqrt.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) #s(literal 3 binary64)))) (sqrt.f64 (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))))
(sqrt.f64 (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))))
(sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))
(fabs.f64 (neg.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))))
(fabs.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))))
(exp.f64 (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))) (sin.f64 ky))
(*.f64 (neg.f64 (sin.f64 ky)) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))))
(*.f64 (sin.f64 ky) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))))
(/.f64 (*.f64 (sin.f64 ky) #s(literal 1 binary64)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))))
(/.f64 (neg.f64 (neg.f64 (sin.f64 ky))) (neg.f64 (neg.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))))))
(/.f64 (neg.f64 (sin.f64 ky)) (neg.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))) (neg.f64 (sin.f64 ky))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) (sin.f64 ky)))
(/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))))
(neg.f64 (/.f64 (sin.f64 ky) (neg.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))))))
(neg.f64 (/.f64 (neg.f64 (sin.f64 ky)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))))
th
(sin.f64 th)
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))) (sin.f64 th))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))) (*.f64 (sin.f64 th) (sin.f64 ky)))
(*.f64 (*.f64 (neg.f64 (sin.f64 ky)) (sin.f64 th)) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))))
(*.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))))
(*.f64 (sin.f64 th) (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))))
(*.f64 (sin.f64 ky) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))) (sin.f64 th)))
(*.f64 (sin.f64 ky) (*.f64 (sin.f64 th) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))))))
(*.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))))
(/.f64 (*.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) #s(literal 1 binary64)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky))) #s(literal 1 binary64)) (*.f64 #s(literal 2 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))))
(/.f64 (neg.f64 (*.f64 (neg.f64 (sin.f64 ky)) (sin.f64 th))) (neg.f64 (neg.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))))))
(/.f64 (*.f64 (neg.f64 (sin.f64 ky)) (sin.f64 th)) (neg.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))))
(/.f64 (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky))) (*.f64 #s(literal 2 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))))
(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))) (*.f64 (neg.f64 (sin.f64 ky)) (sin.f64 th))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 th) (sin.f64 ky))))
(neg.f64 (/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (neg.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))))))
(neg.f64 (/.f64 (*.f64 (neg.f64 (sin.f64 ky)) (sin.f64 th)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))))
(*.f64 (sin.f64 th) ky)
(*.f64 ky (sin.f64 th))
(*.f64 (/.f64 (sin.f64 th) kx) ky)
(*.f64 (/.f64 #s(literal 1 binary64) kx) (*.f64 (sin.f64 th) ky))
(*.f64 (*.f64 (neg.f64 ky) (sin.f64 th)) (/.f64 #s(literal 1 binary64) (neg.f64 kx)))
(*.f64 (*.f64 (sin.f64 th) ky) (/.f64 #s(literal 1 binary64) kx))
(*.f64 (sin.f64 th) (*.f64 ky (/.f64 #s(literal 1 binary64) kx)))
(*.f64 (sin.f64 th) (/.f64 ky kx))
(*.f64 ky (/.f64 (sin.f64 th) kx))
(/.f64 (*.f64 (*.f64 (sin.f64 th) ky) #s(literal 1 binary64)) kx)
(/.f64 (neg.f64 (*.f64 (neg.f64 ky) (sin.f64 th))) (neg.f64 (neg.f64 kx)))
(/.f64 (*.f64 (neg.f64 ky) (sin.f64 th)) (neg.f64 kx))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 kx) (*.f64 (neg.f64 ky) (sin.f64 th))))
(/.f64 #s(literal 1 binary64) (/.f64 kx (*.f64 (sin.f64 th) ky)))
(/.f64 (*.f64 (sin.f64 th) ky) kx)
(neg.f64 (/.f64 (*.f64 (sin.f64 th) ky) (neg.f64 kx)))
(neg.f64 (/.f64 (*.f64 (neg.f64 ky) (sin.f64 th)) kx))
#s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (*.f64 (sin.f64 th) ky) kx))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (*.f64 (sin.f64 th) ky) kx)))
(*.f64 (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky))) #s(literal 1/2 binary64))
(*.f64 (sin.f64 th) (sin.f64 ky))
(*.f64 (sin.f64 ky) (sin.f64 th))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky)))) #s(literal -2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky))) #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky)))))
(-.f64 (/.f64 (cos.f64 (-.f64 ky th)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 th ky)) #s(literal 2 binary64)))
#s(literal 1 binary64)
#s(literal 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 #s(literal 2 binary64) ky)
(*.f64 ky #s(literal 2 binary64))
(/.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 (*.f64 ky #s(literal 1 binary64)) (*.f64 ky #s(literal 1 binary64)))
(+.f64 (*.f64 #s(literal 1 binary64) ky) (*.f64 #s(literal 1 binary64) 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 (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)))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 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/2 binary64)))))
(/.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 #s(literal 1/2 binary64) (*.f64 (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 (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 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/2 binary64)))))))
(neg.f64 (neg.f64 (cos.f64 (+.f64 ky ky))))
(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 #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))))
(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 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 #s(literal 1/2 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 (+.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 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64)))
(-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))
(+.f64 (-.f64 #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/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))
(+.f64 (neg.f64 (cos.f64 (+.f64 ky ky))) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (neg.f64 (cos.f64 (+.f64 ky ky))))
(*.f64 (sin.f64 (fabs.f64 ky)) (sin.f64 (fabs.f64 ky)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))
(*.f64 (fabs.f64 (sin.f64 ky)) (fabs.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 (neg.f64 (sin.f64 ky)) (neg.f64 (sin.f64 ky)))
(*.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 ky ky))))
(*.f64 (sin.f64 ky) (sin.f64 ky))
(pow.f64 (sin.f64 ky) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)) (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)))) (cos.f64 (-.f64 (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)) (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)) (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)))) (cos.f64 (-.f64 (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)) (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky))) (cos.f64 (-.f64 (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)) (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)))) (cos.f64 (-.f64 (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)) (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)) (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)))) (cos.f64 (-.f64 (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)) (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky))) (cos.f64 (-.f64 (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)))) (cos.f64 (-.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)))) (cos.f64 (-.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky))) (cos.f64 (-.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 ky))) (cos.f64 (+.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 ky)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (PI.f64) ky))) (cos.f64 (+.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (PI.f64) ky)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (neg.f64 ky) (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (neg.f64 ky) (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (neg.f64 ky) (neg.f64 ky))) (cos.f64 (+.f64 ky ky))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (neg.f64 ky) (+.f64 (PI.f64) ky))) (cos.f64 (+.f64 (neg.f64 ky) (+.f64 (PI.f64) ky)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (PI.f64) ky) (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (+.f64 (PI.f64) ky) (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (PI.f64) ky) (neg.f64 ky))) (cos.f64 (+.f64 (+.f64 (PI.f64) ky) (neg.f64 ky)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (PI.f64) ky) (+.f64 (PI.f64) ky))) (cos.f64 (+.f64 (+.f64 (PI.f64) ky) (+.f64 (PI.f64) ky)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)))) (sin.f64 (+.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)))) (sin.f64 (+.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky))) (sin.f64 (+.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (neg.f64 ky) (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)))) (sin.f64 (+.f64 (neg.f64 ky) (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (neg.f64 ky) (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)))) (sin.f64 (+.f64 (neg.f64 ky) (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (neg.f64 ky) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky))) (sin.f64 (+.f64 (neg.f64 ky) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (PI.f64) ky) (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)))) (sin.f64 (+.f64 (+.f64 (PI.f64) ky) (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (PI.f64) ky) (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)))) (sin.f64 (+.f64 (+.f64 (PI.f64) ky) (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (PI.f64) ky) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky))) (sin.f64 (+.f64 (+.f64 (PI.f64) ky) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))))
(/.f64 (+.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 3 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))) (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))))))
(/.f64 (-.f64 (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))))))
(134-z0z1z2z3z4 (neg.f64 (sin.f64 ky)) (cos.f64 ky) (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (sin.f64 ky) (sin.f64 (*.f64 (PI.f64) #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) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))))
(-.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 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))
(*.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))))
(*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #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) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) (sqrt.f64 #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))
(pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))
(sqrt.f64 (*.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))
(sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))
(fabs.f64 (neg.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))
(fabs.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))
(exp.f64 (*.f64 (log.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64)))
(*.f64 (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (sin.f64 ky))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (*.f64 (sin.f64 th) (sin.f64 ky)))
(*.f64 (*.f64 (neg.f64 (sin.f64 ky)) (sin.f64 th)) (/.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))))
(*.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))
(*.f64 (sin.f64 th) (*.f64 (sin.f64 ky) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))))
(*.f64 (sin.f64 th) (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))
(*.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))
(/.f64 (*.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) #s(literal 1 binary64)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky))) #s(literal 1 binary64)) (*.f64 #s(literal 2 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))
(/.f64 (neg.f64 (*.f64 (neg.f64 (sin.f64 ky)) (sin.f64 th))) (neg.f64 (neg.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))))
(/.f64 (*.f64 (neg.f64 (sin.f64 ky)) (sin.f64 th)) (neg.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))
(/.f64 (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky))) (*.f64 #s(literal 2 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))
(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (*.f64 (neg.f64 (sin.f64 ky)) (sin.f64 th))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 th) (sin.f64 ky))))
(neg.f64 (/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (neg.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))))
(neg.f64 (/.f64 (*.f64 (neg.f64 (sin.f64 ky)) (sin.f64 th)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))
(neg.f64 (sin.f64 ky))
(sin.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (neg.f64 ky))
(sin.f64 (+.f64 (PI.f64) ky))
(-.f64 (*.f64 (cos.f64 ky) (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 ky) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))))
(cos.f64 (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)))
(cos.f64 (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky)))
(cos.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) ky))
(+.f64 (*.f64 (sin.f64 ky) (cos.f64 (PI.f64))) (*.f64 (cos.f64 ky) (sin.f64 (PI.f64))))
#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 #s(literal 2 binary64) kx)
(*.f64 kx #s(literal 2 binary64))
(/.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 (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)))) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (+.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 (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 (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 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (*.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)))))))
(neg.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)))))
(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 #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))))
(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 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 (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 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (fabs.f64 (cos.f64 kx)) (fabs.f64 (cos.f64 kx)) (sin.f64 (fabs.f64 kx)) (sin.f64 (fabs.f64 kx)))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (fabs.f64 (cos.f64 kx)) (fabs.f64 (cos.f64 kx)) (neg.f64 (neg.f64 (sin.f64 kx))) (neg.f64 (neg.f64 (sin.f64 kx))))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (fabs.f64 (cos.f64 kx)) (fabs.f64 (cos.f64 kx)) (neg.f64 (neg.f64 (sin.f64 kx))) (sin.f64 kx))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (fabs.f64 (cos.f64 kx)) (fabs.f64 (cos.f64 kx)) (fabs.f64 (neg.f64 (sin.f64 kx))) (fabs.f64 (neg.f64 (sin.f64 kx))))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (fabs.f64 (cos.f64 kx)) (fabs.f64 (cos.f64 kx)) (fabs.f64 (sin.f64 kx)) (fabs.f64 (sin.f64 kx)))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (fabs.f64 (cos.f64 kx)) (fabs.f64 (cos.f64 kx)) (neg.f64 (sin.f64 kx)) (neg.f64 (sin.f64 kx)))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (fabs.f64 (cos.f64 kx)) (fabs.f64 (cos.f64 kx)) (sin.f64 kx) (neg.f64 (neg.f64 (sin.f64 kx))))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (fabs.f64 (cos.f64 kx)) (fabs.f64 (cos.f64 kx)) (sin.f64 kx) (sin.f64 kx))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (neg.f64 (cos.f64 kx)) (neg.f64 (cos.f64 kx)) (sin.f64 (fabs.f64 kx)) (sin.f64 (fabs.f64 kx)))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (neg.f64 (cos.f64 kx)) (neg.f64 (cos.f64 kx)) (neg.f64 (neg.f64 (sin.f64 kx))) (neg.f64 (neg.f64 (sin.f64 kx))))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (neg.f64 (cos.f64 kx)) (neg.f64 (cos.f64 kx)) (neg.f64 (neg.f64 (sin.f64 kx))) (sin.f64 kx))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (neg.f64 (cos.f64 kx)) (neg.f64 (cos.f64 kx)) (fabs.f64 (neg.f64 (sin.f64 kx))) (fabs.f64 (neg.f64 (sin.f64 kx))))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (neg.f64 (cos.f64 kx)) (neg.f64 (cos.f64 kx)) (fabs.f64 (sin.f64 kx)) (fabs.f64 (sin.f64 kx)))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (neg.f64 (cos.f64 kx)) (neg.f64 (cos.f64 kx)) (neg.f64 (sin.f64 kx)) (neg.f64 (sin.f64 kx)))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (neg.f64 (cos.f64 kx)) (neg.f64 (cos.f64 kx)) (sin.f64 kx) (neg.f64 (neg.f64 (sin.f64 kx))))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (neg.f64 (cos.f64 kx)) (neg.f64 (cos.f64 kx)) (sin.f64 kx) (sin.f64 kx))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (cos.f64 kx) (cos.f64 kx) (sin.f64 (fabs.f64 kx)) (sin.f64 (fabs.f64 kx)))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (cos.f64 kx) (cos.f64 kx) (neg.f64 (neg.f64 (sin.f64 kx))) (neg.f64 (neg.f64 (sin.f64 kx))))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (cos.f64 kx) (cos.f64 kx) (neg.f64 (neg.f64 (sin.f64 kx))) (sin.f64 kx))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (cos.f64 kx) (cos.f64 kx) (fabs.f64 (neg.f64 (sin.f64 kx))) (fabs.f64 (neg.f64 (sin.f64 kx))))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (cos.f64 kx) (cos.f64 kx) (fabs.f64 (sin.f64 kx)) (fabs.f64 (sin.f64 kx)))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (cos.f64 kx) (cos.f64 kx) (neg.f64 (sin.f64 kx)) (neg.f64 (sin.f64 kx)))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (cos.f64 kx) (cos.f64 kx) (sin.f64 kx) (neg.f64 (neg.f64 (sin.f64 kx))))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (cos.f64 kx) (cos.f64 kx) (sin.f64 kx) (sin.f64 kx))
(*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (fabs.f64 (cos.f64 ky)) (fabs.f64 (cos.f64 ky)) (sin.f64 (fabs.f64 ky)) (sin.f64 (fabs.f64 ky)))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (fabs.f64 (cos.f64 ky)) (fabs.f64 (cos.f64 ky)) (fabs.f64 (sin.f64 ky)) (fabs.f64 (sin.f64 ky)))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (fabs.f64 (cos.f64 ky)) (fabs.f64 (cos.f64 ky)) (neg.f64 (sin.f64 ky)) (neg.f64 (sin.f64 ky)))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (fabs.f64 (cos.f64 ky)) (fabs.f64 (cos.f64 ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (fabs.f64 (cos.f64 ky)) (fabs.f64 (cos.f64 ky)) #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (fabs.f64 (cos.f64 ky)) (fabs.f64 (cos.f64 ky)) (sin.f64 ky) (sin.f64 ky))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (neg.f64 (cos.f64 ky)) (neg.f64 (cos.f64 ky)) (sin.f64 (fabs.f64 ky)) (sin.f64 (fabs.f64 ky)))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (neg.f64 (cos.f64 ky)) (neg.f64 (cos.f64 ky)) (fabs.f64 (sin.f64 ky)) (fabs.f64 (sin.f64 ky)))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (neg.f64 (cos.f64 ky)) (neg.f64 (cos.f64 ky)) (neg.f64 (sin.f64 ky)) (neg.f64 (sin.f64 ky)))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (neg.f64 (cos.f64 ky)) (neg.f64 (cos.f64 ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (neg.f64 (cos.f64 ky)) (neg.f64 (cos.f64 ky)) #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (neg.f64 (cos.f64 ky)) (neg.f64 (cos.f64 ky)) (sin.f64 ky) (sin.f64 ky))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (cos.f64 ky) (cos.f64 ky) (sin.f64 (fabs.f64 ky)) (sin.f64 (fabs.f64 ky)))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (cos.f64 ky) (cos.f64 ky) (fabs.f64 (sin.f64 ky)) (fabs.f64 (sin.f64 ky)))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (cos.f64 ky) (cos.f64 ky) (neg.f64 (sin.f64 ky)) (neg.f64 (sin.f64 ky)))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (cos.f64 ky) (cos.f64 ky) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (cos.f64 ky) (cos.f64 ky) #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (cos.f64 ky) (cos.f64 ky) (sin.f64 ky) (sin.f64 ky))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))
(*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (cos.f64 (+.f64 ky ky)) #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)) (cos.f64 (+.f64 ky ky))))
(/.f64 (-.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 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (-.f64 (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 kx kx)) #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 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))) (+.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (+.f64 ky ky)) #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 (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 ky ky)) #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 (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 kx kx)) #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 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))) #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 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))) (*.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))))))
(/.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 (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 ky ky)) #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 (*.f64 (cos.f64 (+.f64 ky ky)) #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 (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))
(neg.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky)))))
(-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))
(-.f64 (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (*.f64 (neg.f64 (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))
(-.f64 (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx))))
(-.f64 (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (neg.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))
(+.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))))
(+.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))
(+.f64 (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 kx kx)) #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/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 #s(literal 1 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 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 binary64) (/.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky)))) #s(literal 1 binary64))) #s(literal 1 binary64))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (/.f64 (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 (-.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))))) (/.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))
(*.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 (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 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 (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 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (-.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 (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) (/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (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 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))
(*.f64 (-.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 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)))))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))))
(*.f64 (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))))))
(*.f64 (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))))
(*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))))
(/.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) #s(literal 3 binary64))) #s(literal 1 binary64)) (+.f64 (*.f64 (-.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))))
(/.f64 (-.f64 (*.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)) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 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 (-.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))))
(/.f64 (-.f64 (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 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 kx kx)) #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 2 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 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 (-.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))) (+.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 ky ky))))))
(/.f64 (-.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))) (-.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 ky ky)) #s(literal 1/2 binary64)))))
(/.f64 (-.f64 (*.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (*.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky)))) (*.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))))))
(/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))))
(/.f64 (-.f64 (*.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)) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))))) (*.f64 (/.f64 (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 (-.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (/.f64 (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 (-.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))))) (+.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)) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (/.f64 (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 (-.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))))))
(/.f64 (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #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 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (*.f64 (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 #s(literal -1/2 binary64) (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky)))) #s(literal 3 binary64))) (+.f64 (*.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky)))) (*.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))))) (*.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))))))))
(/.f64 (+.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal 3 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))))))
(/.f64 (-.f64 (pow.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)) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (/.f64 (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 (-.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) #s(literal 3 binary64))) (+.f64 (*.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)) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))))) (+.f64 (*.f64 (/.f64 (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 (-.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (/.f64 (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 (-.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))))) (*.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)) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (/.f64 (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 (-.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))))))))
(/.f64 (-.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #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 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #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 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))
(/.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 ky ky)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)) (*.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 ky ky))))))))
(/.f64 (-.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)) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (*.f64 (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 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 (-.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))))
(/.f64 (-.f64 (*.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (*.f64 (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) (+.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))
(/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.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 (cos.f64 (+.f64 kx kx)) (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 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (*.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (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 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (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 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))))
(/.f64 (-.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (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 kx kx)) #s(literal 1/2 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)))))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 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)))))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))) (-.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))) (-.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) #s(literal 3 binary64)))))
(/.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (+.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 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)))) (-.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 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #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 (-.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (*.f64 (-.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)))))) (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (*.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (neg.f64 (sin.f64 kx))) (sin.f64 kx))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (*.f64 (-.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)))))) (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (*.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (sin.f64 kx)) (neg.f64 (sin.f64 kx)))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (*.f64 (-.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)))))) (fabs.f64 (*.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)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (sin.f64 kx))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (*.f64 (-.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)))))) (fabs.f64 (*.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)) (fabs.f64 (-.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (*.f64 (-.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)))))) (fabs.f64 (*.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 #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))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (*.f64 (-.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)))))) (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (neg.f64 (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (*.f64 (-.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)))))) (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (fabs.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (*.f64 (fabs.f64 (-.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/2 binary64)) #s(literal 1/2 binary64))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (*.f64 (-.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)))))) (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)) (neg.f64 (pow.f64 (sin.f64 kx) #s(literal 3 binary64))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (*.f64 (-.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)))))) (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (-.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 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (*.f64 (-.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)))))) (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (*.f64 (-.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)))))) (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64)))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (*.f64 (-.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)))))) (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (neg.f64 (sin.f64 kx)) (*.f64 (neg.f64 (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (*.f64 (-.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)))))) (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (neg.f64 (sin.f64 kx)) (*.f64 (sin.f64 kx) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (*.f64 (-.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)))))) (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (sin.f64 kx) (*.f64 (neg.f64 (sin.f64 kx)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 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 #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 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (neg.f64 (sin.f64 kx))) (sin.f64 kx))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 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 #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 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (sin.f64 kx)) (neg.f64 (sin.f64 kx)))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 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 #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)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (sin.f64 kx))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 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 #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)) (fabs.f64 (-.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 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 #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 #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))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 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 #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)))) (neg.f64 (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 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 #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)))) (fabs.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (*.f64 (fabs.f64 (-.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/2 binary64)) #s(literal 1/2 binary64))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 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 #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)))) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)) (neg.f64 (pow.f64 (sin.f64 kx) #s(literal 3 binary64))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 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 #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/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 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 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 #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)))) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 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 #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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64)))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 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 #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)))) (neg.f64 (sin.f64 kx)) (*.f64 (neg.f64 (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 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 #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)))) (neg.f64 (sin.f64 kx)) (*.f64 (sin.f64 kx) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 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 #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)))) (sin.f64 kx) (*.f64 (neg.f64 (sin.f64 kx)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (*.f64 (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (*.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (neg.f64 (sin.f64 kx))) (sin.f64 kx))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (*.f64 (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (*.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (sin.f64 kx)) (neg.f64 (sin.f64 kx)))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (*.f64 (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (*.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (sin.f64 kx))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (*.f64 (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (*.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) (fabs.f64 (-.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (*.f64 (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 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 (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))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (*.f64 (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (neg.f64 (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (*.f64 (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (-.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (*.f64 (fabs.f64 (-.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/2 binary64)) #s(literal 1/2 binary64))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (*.f64 (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)) (neg.f64 (pow.f64 (sin.f64 kx) #s(literal 3 binary64))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (*.f64 (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (-.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 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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (*.f64 (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (*.f64 (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (-.f64 #s(literal 1/2 binary64) (*.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)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64)))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (*.f64 (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (neg.f64 (sin.f64 kx)) (*.f64 (neg.f64 (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (*.f64 (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (neg.f64 (sin.f64 kx)) (*.f64 (sin.f64 kx) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (*.f64 (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (sin.f64 kx) (*.f64 (neg.f64 (sin.f64 kx)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (*.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 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (*.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (neg.f64 (sin.f64 kx))) (sin.f64 kx))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (*.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 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (*.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (sin.f64 kx)) (neg.f64 (sin.f64 kx)))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (*.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 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (*.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (sin.f64 kx))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (*.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 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (*.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) (fabs.f64 (-.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (*.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 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 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 (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))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (*.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 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (neg.f64 (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (*.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 #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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (*.f64 (fabs.f64 (-.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/2 binary64)) #s(literal 1/2 binary64))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (*.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 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)) (neg.f64 (pow.f64 (sin.f64 kx) #s(literal 3 binary64))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (*.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 #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 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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (*.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 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (*.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 #s(literal 1/2 binary64) (*.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)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64)))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (*.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 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (neg.f64 (sin.f64 kx)) (*.f64 (neg.f64 (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (*.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 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (neg.f64 (sin.f64 kx)) (*.f64 (sin.f64 kx) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (*.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 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (sin.f64 kx) (*.f64 (neg.f64 (sin.f64 kx)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (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))) (*.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (neg.f64 (sin.f64 kx))) (sin.f64 kx))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (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))) (*.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (sin.f64 kx)) (neg.f64 (sin.f64 kx)))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (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))) (*.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (sin.f64 kx))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (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))) (*.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) (fabs.f64 (-.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (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))) (*.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 (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))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (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))) (neg.f64 (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (*.f64 (fabs.f64 (-.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/2 binary64)) #s(literal 1/2 binary64))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (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))) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)) (neg.f64 (pow.f64 (sin.f64 kx) #s(literal 3 binary64))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (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))) (-.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 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (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))) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (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))) (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64)))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (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))) (neg.f64 (sin.f64 kx)) (*.f64 (neg.f64 (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (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))) (neg.f64 (sin.f64 kx)) (*.f64 (sin.f64 kx) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (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))) (sin.f64 kx) (*.f64 (neg.f64 (sin.f64 kx)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (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))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (neg.f64 (sin.f64 kx))) (sin.f64 kx))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (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))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (sin.f64 kx)) (neg.f64 (sin.f64 kx)))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (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))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (sin.f64 kx))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (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))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) (fabs.f64 (-.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (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))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 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 (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))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (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))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)) (neg.f64 (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (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))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)) (fabs.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (*.f64 (fabs.f64 (-.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/2 binary64)) #s(literal 1/2 binary64))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (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))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)) (neg.f64 (pow.f64 (sin.f64 kx) #s(literal 3 binary64))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (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))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 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 (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))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (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))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (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))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64)))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (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))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)) (neg.f64 (sin.f64 kx)) (*.f64 (neg.f64 (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (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))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)) (neg.f64 (sin.f64 kx)) (*.f64 (sin.f64 kx) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (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))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)) (sin.f64 kx) (*.f64 (neg.f64 (sin.f64 kx)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64))))
(neg.f64 (*.f64 (-.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))))))
(neg.f64 (+.f64 #s(literal -1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))
(neg.f64 (/.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 (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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 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)))))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))))
(neg.f64 (/.f64 (-.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))))
(neg.f64 (-.f64 (/.f64 (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 (-.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))))))
(neg.f64 (-.f64 (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))
(neg.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))
(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 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))
(neg.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) #s(literal 1 binary64)))
(-.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))
(-.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))
(-.f64 (-.f64 #s(literal 1 binary64) (*.f64 (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 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal -1/2 binary64))
(-.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)) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (/.f64 (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 (-.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))))
(-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (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/2 binary64))) (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 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 (*.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)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))
(+.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))
(+.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky)))) #s(literal 1 binary64))
(+.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal 1/2 binary64))
(+.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)) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (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 (-.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))))))
(+.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)) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))))
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky)))))
(+.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 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 kx kx)) #s(literal 1/2 binary64))))
(+.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 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/2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))))
(*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))))
(*.f64 (pow.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) #s(literal 3 binary64))) #s(literal 1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) #s(literal 1/2 binary64)))
(*.f64 (sqrt.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) #s(literal 3 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))))))
(pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))
(/.f64 (sqrt.f64 (-.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (sqrt.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 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)))))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))))
(/.f64 (sqrt.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) #s(literal 3 binary64)))) (sqrt.f64 (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))))
(sqrt.f64 (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))))
(sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))
(fabs.f64 (neg.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))))
(fabs.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))))
(exp.f64 (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))) th)
(*.f64 (neg.f64 th) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))))
(*.f64 th (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))))
(/.f64 (*.f64 th #s(literal 1 binary64)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))))
(/.f64 (neg.f64 (neg.f64 th)) (neg.f64 (neg.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))))))
(/.f64 (neg.f64 th) (neg.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))) (neg.f64 th)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) th))
(/.f64 th (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))))
(neg.f64 (/.f64 (neg.f64 th) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))))
(*.f64 (neg.f64 th) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))))
(*.f64 (/.f64 th (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))) #s(literal -1 binary64))
(*.f64 #s(literal -1 binary64) (/.f64 th (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))))
(*.f64 th (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))))
(/.f64 (*.f64 #s(literal -1 binary64) (neg.f64 th)) (neg.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))))
(/.f64 (*.f64 (neg.f64 th) #s(literal -1 binary64)) (neg.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))))
(/.f64 (neg.f64 (neg.f64 th)) (neg.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))))
(/.f64 (neg.f64 th) (neg.f64 (neg.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))))))
(/.f64 (neg.f64 th) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) (neg.f64 th)))
(/.f64 th (neg.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))))
(neg.f64 (/.f64 th (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))))
#s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (/.f64 (neg.f64 th) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))))
(*.f64 #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (/.f64 (neg.f64 th) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))))) (neg.f64 (sin.f64 ky)))
(*.f64 (neg.f64 (sin.f64 ky)) #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (/.f64 (neg.f64 th) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))))))
(*.f64 (sin.f64 ky) (neg.f64 #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (/.f64 (neg.f64 th) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))))))
(134-z0z1z2z3z4 #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (/.f64 (neg.f64 th) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))))) (cos.f64 ky) (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (sin.f64 ky) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(neg.f64 (*.f64 #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (/.f64 (neg.f64 th) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))))) (sin.f64 ky)))
(*.f64 (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky))) #s(literal 1/2 binary64))
(*.f64 (sin.f64 th) (sin.f64 ky))
(*.f64 (sin.f64 ky) (sin.f64 th))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky)))) #s(literal -2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky))) #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky)))))
(-.f64 (/.f64 (cos.f64 (-.f64 ky th)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 th ky)) #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 #s(literal 2 binary64) kx)
(*.f64 kx #s(literal 2 binary64))
(/.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 (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)))) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (+.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 (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 (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 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (*.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)))))))
(neg.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)))))
(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 #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))))
(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 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 (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 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (fabs.f64 (cos.f64 kx)) (fabs.f64 (cos.f64 kx)) (sin.f64 (fabs.f64 kx)) (sin.f64 (fabs.f64 kx)))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (fabs.f64 (cos.f64 kx)) (fabs.f64 (cos.f64 kx)) (neg.f64 (neg.f64 (sin.f64 kx))) (neg.f64 (neg.f64 (sin.f64 kx))))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (fabs.f64 (cos.f64 kx)) (fabs.f64 (cos.f64 kx)) (neg.f64 (neg.f64 (sin.f64 kx))) (sin.f64 kx))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (fabs.f64 (cos.f64 kx)) (fabs.f64 (cos.f64 kx)) (fabs.f64 (neg.f64 (sin.f64 kx))) (fabs.f64 (neg.f64 (sin.f64 kx))))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (fabs.f64 (cos.f64 kx)) (fabs.f64 (cos.f64 kx)) (fabs.f64 (sin.f64 kx)) (fabs.f64 (sin.f64 kx)))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (fabs.f64 (cos.f64 kx)) (fabs.f64 (cos.f64 kx)) (neg.f64 (sin.f64 kx)) (neg.f64 (sin.f64 kx)))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (fabs.f64 (cos.f64 kx)) (fabs.f64 (cos.f64 kx)) (sin.f64 kx) (neg.f64 (neg.f64 (sin.f64 kx))))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (fabs.f64 (cos.f64 kx)) (fabs.f64 (cos.f64 kx)) (sin.f64 kx) (sin.f64 kx))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (neg.f64 (cos.f64 kx)) (neg.f64 (cos.f64 kx)) (sin.f64 (fabs.f64 kx)) (sin.f64 (fabs.f64 kx)))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (neg.f64 (cos.f64 kx)) (neg.f64 (cos.f64 kx)) (neg.f64 (neg.f64 (sin.f64 kx))) (neg.f64 (neg.f64 (sin.f64 kx))))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (neg.f64 (cos.f64 kx)) (neg.f64 (cos.f64 kx)) (neg.f64 (neg.f64 (sin.f64 kx))) (sin.f64 kx))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (neg.f64 (cos.f64 kx)) (neg.f64 (cos.f64 kx)) (fabs.f64 (neg.f64 (sin.f64 kx))) (fabs.f64 (neg.f64 (sin.f64 kx))))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (neg.f64 (cos.f64 kx)) (neg.f64 (cos.f64 kx)) (fabs.f64 (sin.f64 kx)) (fabs.f64 (sin.f64 kx)))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (neg.f64 (cos.f64 kx)) (neg.f64 (cos.f64 kx)) (neg.f64 (sin.f64 kx)) (neg.f64 (sin.f64 kx)))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (neg.f64 (cos.f64 kx)) (neg.f64 (cos.f64 kx)) (sin.f64 kx) (neg.f64 (neg.f64 (sin.f64 kx))))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (neg.f64 (cos.f64 kx)) (neg.f64 (cos.f64 kx)) (sin.f64 kx) (sin.f64 kx))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (cos.f64 kx) (cos.f64 kx) (sin.f64 (fabs.f64 kx)) (sin.f64 (fabs.f64 kx)))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (cos.f64 kx) (cos.f64 kx) (neg.f64 (neg.f64 (sin.f64 kx))) (neg.f64 (neg.f64 (sin.f64 kx))))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (cos.f64 kx) (cos.f64 kx) (neg.f64 (neg.f64 (sin.f64 kx))) (sin.f64 kx))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (cos.f64 kx) (cos.f64 kx) (fabs.f64 (neg.f64 (sin.f64 kx))) (fabs.f64 (neg.f64 (sin.f64 kx))))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (cos.f64 kx) (cos.f64 kx) (fabs.f64 (sin.f64 kx)) (fabs.f64 (sin.f64 kx)))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (cos.f64 kx) (cos.f64 kx) (neg.f64 (sin.f64 kx)) (neg.f64 (sin.f64 kx)))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (cos.f64 kx) (cos.f64 kx) (sin.f64 kx) (neg.f64 (neg.f64 (sin.f64 kx))))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (cos.f64 kx) (cos.f64 kx) (sin.f64 kx) (sin.f64 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 (neg.f64 (sin.f64 kx)) (sin.f64 kx))
(*.f64 (sin.f64 kx) (neg.f64 (sin.f64 kx)))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) kx) (*.f64 (PI.f64) #s(literal 1/2 binary64))) kx)) (cos.f64 (+.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) kx) (*.f64 (PI.f64) #s(literal 1/2 binary64))) kx))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 kx (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) kx) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 kx (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) kx) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 kx (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) kx)))) (sin.f64 (+.f64 kx (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) kx))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 kx (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) kx)))) (sin.f64 (+.f64 kx (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) kx))))) #s(literal 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)))))
(/.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 (neg.f64 kx) kx))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (PI.f64) kx) kx)) (cos.f64 (+.f64 (+.f64 (PI.f64) kx) kx))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 kx (neg.f64 kx)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 kx (+.f64 (PI.f64) kx))) (cos.f64 (+.f64 kx (+.f64 (PI.f64) kx)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 kx (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) kx))) (cos.f64 (+.f64 kx kx))) #s(literal 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)))))
(134-z0z1z2z3z4 (sin.f64 kx) (cos.f64 kx) (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (sin.f64 kx) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(neg.f64 (-.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/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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal -1/2 binary64))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) (*.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 (*.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 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (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/2 binary64))) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))
(*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (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 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (*.f64 (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 ky ky)) #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)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))
(/.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))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 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 (-.f64 (*.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))) (+.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #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 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 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 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (+.f64 (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (+.f64 (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 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 (+.f64 (pow.f64 (*.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 ky ky)))) #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 (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 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 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #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 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 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 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 #s(literal 1/2 binary64) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (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/2 binary64))) #s(literal 3 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 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) #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 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (-.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 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 (-.f64 (pow.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #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 (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #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 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))))
(-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #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 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) #s(literal 1/2 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) (cos.f64 (+.f64 ky ky))))
(-.f64 (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))
(+.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))
(+.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #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 kx kx)) #s(literal 1/2 binary64)) (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))
(+.f64 (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) #s(literal -1/2 binary64))
(+.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 ky ky)) #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 (+.f64 #s(literal 1 binary64) (/.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 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 #s(literal 1 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 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 binary64) (/.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky)))) #s(literal 1 binary64))) #s(literal 1 binary64))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (/.f64 (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 (-.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))))) (/.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))
(*.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 (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 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 (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 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (-.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 (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) (/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (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 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))
(*.f64 (-.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 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)))))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))))
(*.f64 (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))))))
(*.f64 (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))))
(*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))))
(/.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) #s(literal 3 binary64))) #s(literal 1 binary64)) (+.f64 (*.f64 (-.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))))
(/.f64 (-.f64 (*.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)) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 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 (-.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))))
(/.f64 (-.f64 (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 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 kx kx)) #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 2 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 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 (-.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))) (+.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 ky ky))))))
(/.f64 (-.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))) (-.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 ky ky)) #s(literal 1/2 binary64)))))
(/.f64 (-.f64 (*.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (*.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky)))) (*.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))))))
(/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))))
(/.f64 (-.f64 (*.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)) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))))) (*.f64 (/.f64 (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 (-.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (/.f64 (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 (-.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))))) (+.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)) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (/.f64 (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 (-.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))))))
(/.f64 (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #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 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (*.f64 (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 #s(literal -1/2 binary64) (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky)))) #s(literal 3 binary64))) (+.f64 (*.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky)))) (*.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))))) (*.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))))))))
(/.f64 (+.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal 3 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))))))
(/.f64 (-.f64 (pow.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)) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (/.f64 (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 (-.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) #s(literal 3 binary64))) (+.f64 (*.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)) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))))) (+.f64 (*.f64 (/.f64 (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 (-.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (/.f64 (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 (-.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))))) (*.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)) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (/.f64 (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 (-.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))))))))
(/.f64 (-.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #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 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #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 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))
(/.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 ky ky)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)) (*.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 ky ky))))))))
(/.f64 (-.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)) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (*.f64 (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 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 (-.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))))
(/.f64 (-.f64 (*.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (*.f64 (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) (+.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))
(/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.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 (cos.f64 (+.f64 kx kx)) (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 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (*.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (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 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (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 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))))))
(/.f64 (-.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (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 kx kx)) #s(literal 1/2 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)))))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 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)))))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))) (-.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))) (-.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) #s(literal 3 binary64)))))
(/.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (+.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 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)))) (-.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 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #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 (-.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (*.f64 (-.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)))))) (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (*.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (neg.f64 (sin.f64 kx))) (sin.f64 kx))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (*.f64 (-.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)))))) (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (*.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (sin.f64 kx)) (neg.f64 (sin.f64 kx)))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (*.f64 (-.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)))))) (fabs.f64 (*.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)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (sin.f64 kx))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (*.f64 (-.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)))))) (fabs.f64 (*.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)) (fabs.f64 (-.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (*.f64 (-.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)))))) (fabs.f64 (*.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 #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))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (*.f64 (-.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)))))) (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (neg.f64 (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (*.f64 (-.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)))))) (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (fabs.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (*.f64 (fabs.f64 (-.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/2 binary64)) #s(literal 1/2 binary64))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (*.f64 (-.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)))))) (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)) (neg.f64 (pow.f64 (sin.f64 kx) #s(literal 3 binary64))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (*.f64 (-.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)))))) (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (-.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 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (*.f64 (-.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)))))) (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (*.f64 (-.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)))))) (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64)))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (*.f64 (-.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)))))) (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (neg.f64 (sin.f64 kx)) (*.f64 (neg.f64 (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (*.f64 (-.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)))))) (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (neg.f64 (sin.f64 kx)) (*.f64 (sin.f64 kx) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (*.f64 (-.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)))))) (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (sin.f64 kx) (*.f64 (neg.f64 (sin.f64 kx)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 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 #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 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (neg.f64 (sin.f64 kx))) (sin.f64 kx))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 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 #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 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (sin.f64 kx)) (neg.f64 (sin.f64 kx)))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 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 #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)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (sin.f64 kx))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 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 #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)) (fabs.f64 (-.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 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 #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 #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))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 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 #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)))) (neg.f64 (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 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 #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)))) (fabs.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (*.f64 (fabs.f64 (-.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/2 binary64)) #s(literal 1/2 binary64))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 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 #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)))) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)) (neg.f64 (pow.f64 (sin.f64 kx) #s(literal 3 binary64))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 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 #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/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 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 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 #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)))) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 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 #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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64)))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 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 #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)))) (neg.f64 (sin.f64 kx)) (*.f64 (neg.f64 (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 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 #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)))) (neg.f64 (sin.f64 kx)) (*.f64 (sin.f64 kx) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 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 #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)))) (sin.f64 kx) (*.f64 (neg.f64 (sin.f64 kx)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (*.f64 (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (*.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (neg.f64 (sin.f64 kx))) (sin.f64 kx))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (*.f64 (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (*.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (sin.f64 kx)) (neg.f64 (sin.f64 kx)))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (*.f64 (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (*.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (sin.f64 kx))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (*.f64 (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (*.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) (fabs.f64 (-.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (*.f64 (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 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 (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))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (*.f64 (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (neg.f64 (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (*.f64 (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (-.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (*.f64 (fabs.f64 (-.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/2 binary64)) #s(literal 1/2 binary64))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (*.f64 (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)) (neg.f64 (pow.f64 (sin.f64 kx) #s(literal 3 binary64))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (*.f64 (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (-.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 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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (*.f64 (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (*.f64 (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (-.f64 #s(literal 1/2 binary64) (*.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)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64)))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (*.f64 (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (neg.f64 (sin.f64 kx)) (*.f64 (neg.f64 (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (*.f64 (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (neg.f64 (sin.f64 kx)) (*.f64 (sin.f64 kx) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (*.f64 (fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (sin.f64 kx) (*.f64 (neg.f64 (sin.f64 kx)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (*.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 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (*.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (neg.f64 (sin.f64 kx))) (sin.f64 kx))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (*.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 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (*.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (sin.f64 kx)) (neg.f64 (sin.f64 kx)))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (*.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 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (*.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (sin.f64 kx))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (*.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 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (*.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) (fabs.f64 (-.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (*.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 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 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 (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))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (*.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 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (neg.f64 (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (*.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 #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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (*.f64 (fabs.f64 (-.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/2 binary64)) #s(literal 1/2 binary64))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (*.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 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)) (neg.f64 (pow.f64 (sin.f64 kx) #s(literal 3 binary64))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (*.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 #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 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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (*.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 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (*.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 #s(literal 1/2 binary64) (*.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)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64)))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (*.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 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (neg.f64 (sin.f64 kx)) (*.f64 (neg.f64 (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (*.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 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (neg.f64 (sin.f64 kx)) (*.f64 (sin.f64 kx) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (*.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 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (sin.f64 kx) (*.f64 (neg.f64 (sin.f64 kx)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (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))) (*.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (neg.f64 (sin.f64 kx))) (sin.f64 kx))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (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))) (*.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (sin.f64 kx)) (neg.f64 (sin.f64 kx)))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (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))) (*.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (sin.f64 kx))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (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))) (*.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) (fabs.f64 (-.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (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))) (*.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 (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))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (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))) (neg.f64 (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (*.f64 (fabs.f64 (-.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/2 binary64)) #s(literal 1/2 binary64))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (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))) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)) (neg.f64 (pow.f64 (sin.f64 kx) #s(literal 3 binary64))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (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))) (-.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 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (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))) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (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))) (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64)))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (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))) (neg.f64 (sin.f64 kx)) (*.f64 (neg.f64 (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (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))) (neg.f64 (sin.f64 kx)) (*.f64 (sin.f64 kx) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (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))) (sin.f64 kx) (*.f64 (neg.f64 (sin.f64 kx)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (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))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (neg.f64 (sin.f64 kx))) (sin.f64 kx))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (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))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (sin.f64 kx)) (neg.f64 (sin.f64 kx)))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (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))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (sin.f64 kx))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (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))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) (fabs.f64 (-.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (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))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 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 (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))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (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))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)) (neg.f64 (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (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))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)) (fabs.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (*.f64 (fabs.f64 (-.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/2 binary64)) #s(literal 1/2 binary64))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (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))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)) (neg.f64 (pow.f64 (sin.f64 kx) #s(literal 3 binary64))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (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))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 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 (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))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (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))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (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))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64)))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (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))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)) (neg.f64 (sin.f64 kx)) (*.f64 (neg.f64 (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (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))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)) (neg.f64 (sin.f64 kx)) (*.f64 (sin.f64 kx) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (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))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)) (sin.f64 kx) (*.f64 (neg.f64 (sin.f64 kx)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64))))
(neg.f64 (*.f64 (-.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))))))
(neg.f64 (+.f64 #s(literal -1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))
(neg.f64 (/.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 (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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 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)))))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))))
(neg.f64 (/.f64 (-.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))))
(neg.f64 (-.f64 (/.f64 (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 (-.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))))))
(neg.f64 (-.f64 (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))
(neg.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))
(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 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))
(neg.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) #s(literal 1 binary64)))
(-.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))
(-.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))
(-.f64 (-.f64 #s(literal 1 binary64) (*.f64 (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 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal -1/2 binary64))
(-.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)) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (/.f64 (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 (-.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))))
(-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (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/2 binary64))) (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 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 (*.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)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))
(+.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))
(+.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky)))) #s(literal 1 binary64))
(+.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal 1/2 binary64))
(+.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)) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (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 (-.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))))))
(+.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)) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))))
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky)))))
(+.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 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 kx kx)) #s(literal 1/2 binary64))))
(+.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 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/2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))))
(*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))))
(*.f64 (pow.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) #s(literal 3 binary64))) #s(literal 1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))) #s(literal 1/2 binary64)))
(*.f64 (sqrt.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) #s(literal 3 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))))))
(pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))
(/.f64 (sqrt.f64 (-.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (sqrt.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 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)))))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))))
(/.f64 (sqrt.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) #s(literal 3 binary64)))) (sqrt.f64 (+.f64 (*.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)))))
(sqrt.f64 (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))))
(sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))
(fabs.f64 (neg.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))))
(fabs.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))))
(exp.f64 (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64)))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))) (sin.f64 th))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))) (*.f64 (sin.f64 th) (sin.f64 ky)))
(*.f64 (*.f64 (neg.f64 (sin.f64 ky)) (sin.f64 th)) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))))
(*.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))))
(*.f64 (sin.f64 th) (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))))
(*.f64 (sin.f64 ky) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))) (sin.f64 th)))
(*.f64 (sin.f64 ky) (*.f64 (sin.f64 th) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))))))
(*.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))))
(/.f64 (*.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) #s(literal 1 binary64)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky))) #s(literal 1 binary64)) (*.f64 #s(literal 2 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))))
(/.f64 (neg.f64 (*.f64 (neg.f64 (sin.f64 ky)) (sin.f64 th))) (neg.f64 (neg.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))))))
(/.f64 (*.f64 (neg.f64 (sin.f64 ky)) (sin.f64 th)) (neg.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))))
(/.f64 (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 th ky))) (*.f64 #s(literal 2 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))))
(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))) (*.f64 (neg.f64 (sin.f64 ky)) (sin.f64 th))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 th) (sin.f64 ky))))
(neg.f64 (/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (neg.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))))))
(neg.f64 (/.f64 (*.f64 (neg.f64 (sin.f64 ky)) (sin.f64 th)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))))

eval4.3s (22.8%)

Memory
188.6MiB live, 5 521.2MiB allocated; 922ms collecting garbage
Samples
2.9s54 616×0valid
262.0ms4 776×0invalid
Compiler

Compiled 91 805 to 8 429 computations (90.8% saved)

Precisions
Click to see histograms. Total time spent on operations: 1.1s
ival-mult!: 840.0ms (76.7% of total)
ival-sub!: 171.0ms (15.6% of total)
adjust: 84.0ms (7.7% of total)

prune118.0ms (0.6%)

Memory
3.0MiB live, 287.1MiB allocated; 24ms collecting garbage
Pruning

62 alts after pruning (59 fresh and 3 done)

PrunedKeptTotal
New1 105371 142
Fresh222244
Picked505
Done-132
Total1 131621 193
Accuracy
100.0%
Counts
1 193 → 62
Alt Table
Click to see full alt table
StatusAccuracyProgram
77.1%
(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))))
77.2%
(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (+.f64 (134-z0z1z2z3z4 #s(literal 1/2 binary64) (cos.f64 ky) (cos.f64 ky) (-.f64 #s(literal 1 binary64) (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))))))
77.3%
(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))))
76.8%
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 th) (sin.f64 ky))))
6.8%
(*.f64 (/.f64 (sin.f64 (neg.f64 (+.f64 (PI.f64) ky))) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 (+.f64 (PI.f64) ky))) #s(literal 2 binary64))))) (sin.f64 th))
77.2%
(*.f64 (/.f64 (sin.f64 ky) (/.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (sqrt.f64 #s(literal 2 binary64)))) (sin.f64 th))
76.6%
(*.f64 (/.f64 (sin.f64 ky) (/.f64 (sqrt.f64 #s(literal 1 binary64)) (sqrt.f64 (/.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))) (sin.f64 th))
76.9%
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))) (sin.f64 th))
33.4%
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(approx (pow (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))) -1) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))) (sin.f64 th))
77.2%
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))) (sin.f64 th))
93.8%
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
86.9%
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))) (sin.f64 th))
45.3%
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (pow.f64 ky #s(literal 2 binary64)))))) (sin.f64 th))
41.5%
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 th))
80.4%
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (/.f64 (-.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 3 binary64)) (*.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 kx) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 2 binary64)))))))) (sin.f64 th))
31.9%
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))) (sin.f64 th))
41.2%
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
77.2%
(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) (sin.f64 ky))) (sin.f64 th))
77.0%
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))) (*.f64 (sin.f64 th) (sin.f64 ky)))
77.1%
(*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))) (sin.f64 ky)) (sin.f64 th))
77.2%
(*.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))))
42.7%
(*.f64 (sin.f64 ky) (neg.f64 #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (/.f64 (neg.f64 th) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))))))
77.3%
(*.f64 (neg.f64 (sin.f64 ky)) (*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (cos.f64 (+.f64 ky ky)) #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))))))) (sin.f64 th)))
31.9%
(*.f64 (neg.f64 (sin.f64 ky)) (*.f64 #s(approx (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))) (sin.f64 th)))
42.7%
(*.f64 (neg.f64 (sin.f64 ky)) #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) (neg.f64 th)))))
42.6%
(*.f64 (neg.f64 (sin.f64 ky)) #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (*.f64 th (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))))))
18.5%
(*.f64 (neg.f64 (sin.f64 ky)) #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (*.f64 #s(literal -1 binary64) (/.f64 th (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(approx (* 1/2 (cos (* 2 kx))) #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))))
18.1%
(*.f64 (neg.f64 (sin.f64 ky)) #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (*.f64 #s(literal -1 binary64) (/.f64 th (sqrt.f64 #s(approx (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))))
18.5%
(*.f64 (neg.f64 (sin.f64 ky)) #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (*.f64 #s(literal -1 binary64) #s(approx (/ th (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))) (/.f64 th (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))))
27.5%
(*.f64 #s(approx (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (/.f64 ky (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))) (sin.f64 th))
16.2%
(*.f64 #s(approx (neg (sin ky)) (*.f64 #s(literal -1 binary64) ky)) #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (*.f64 #s(literal -1 binary64) (/.f64 th (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))))
33.2%
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))
33.1%
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) (sqrt.f64 #s(literal 1/2 binary64)))))
12.6%
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) #s(approx (- 1 (cos (* 2 ky))) (*.f64 #s(literal 2 binary64) (pow.f64 ky #s(literal 2 binary64))))))))
42.5%
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 (*.f64 th (sin.f64 ky)) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))
18.3%
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 #s(approx (* (sin ky) (sin th)) (*.f64 th (sin.f64 ky))) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
33.1%
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 th) (sin.f64 ky)))))
33.4%
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (sin.f64 ky)))
33.2%
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (*.f64 (sin.f64 th) (sin.f64 ky))))
33.5%
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 (sin.f64 th) (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))))
33.4%
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 (sin.f64 th) (*.f64 (sin.f64 ky) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))))
26.5%
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) #s(approx (/ (* (sin ky) (sin th)) (sqrt (* 1/2 (- 1 (cos (* 2 ky)))))) (sin.f64 th)))
38.4%
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 (sin.f64 kx))))
41.9%
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
27.3%
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (/.f64 (sqrt.f64 (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx)))) (sqrt.f64 #s(literal 2 binary64)))))
23.9%
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (*.f64 (sqrt.f64 (sin.f64 kx)) (sqrt.f64 (sin.f64 kx)))))
27.3%
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))
17.6%
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (sqrt.f64 #s(approx (pow (sin kx) 2) (pow.f64 kx #s(literal 2 binary64))))))
38.2%
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(literal 1 binary64) (/.f64 (fabs.f64 (sin.f64 kx)) (*.f64 (sin.f64 th) ky))))
38.3%
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))) (*.f64 (sin.f64 th) ky)))
40.6%
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (sin.f64 th) (/.f64 ky (fabs.f64 (sin.f64 kx)))))
40.5%
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (sin.f64 th) (*.f64 ky (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))))))
21.2%
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (*.f64 ky (sin.f64 th)) kx)))
14.5%
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (*.f64 ky #s(approx (sin th) (*.f64 th (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 th #s(literal 2 binary64))))))) kx)))
14.6%
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 #s(approx (* ky (sin th)) (*.f64 th (+.f64 ky (*.f64 #s(literal -1/6 binary64) (*.f64 ky (pow.f64 th #s(literal 2 binary64))))))) kx)))
15.2%
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 #s(approx (* ky (sin th)) (*.f64 ky th)) kx)))
21.1%
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 #s(literal 1 binary64) (/.f64 kx (*.f64 (sin.f64 th) ky)))))
23.4%
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (*.f64 (/.f64 (sin.f64 th) kx) ky)))
23.4%
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (*.f64 (sin.f64 th) (/.f64 ky kx))))
23.3%
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (*.f64 (sin.f64 th) (*.f64 ky (/.f64 #s(literal 1 binary64) kx)))))
16.6%
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (*.f64 th (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 ky (pow.f64 th #s(literal 2 binary64))) kx)) (/.f64 ky kx))))))
42.5%
#s(approx (* (neg (sin ky)) (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th))) (/.f64 (*.f64 th (sin.f64 ky)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))
Samples
29.0ms512×0valid
Compiler

Compiled 4 470 to 3 161 computations (29.3% saved)

Precisions
Click to see histograms. Total time spent on operations: 9.0ms
ival-mult!: 7.0ms (79.8% of total)
ival-sub!: 1.0ms (11.4% of total)
adjust: 1.0ms (11.4% of total)

series177.0ms (0.9%)

Memory
-20.1MiB live, 304.3MiB allocated; 91ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0127412667
Stop Event
iter-limit
Counts
56 → 210
Calls
Call 1
Inputs
ky
(sin.f64 ky)
kx
#s(literal 1/2 binary64)
#s(literal 2 binary64)
(*.f64 #s(literal 2 binary64) ky)
(cos.f64 (*.f64 #s(literal 2 binary64) ky))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))
#s(literal 3 binary64)
(pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 3 binary64))
#s(literal -1 binary64)
(sin.f64 kx)
#s(literal 6 binary64)
(pow.f64 (sin.f64 kx) #s(literal 6 binary64))
(*.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 kx) #s(literal 6 binary64)))
(-.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 3 binary64)) (*.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 kx) #s(literal 6 binary64))))
(pow.f64 (sin.f64 kx) #s(literal 2 binary64))
(*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))
(*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))
#s(literal 4 binary64)
(pow.f64 (sin.f64 kx) #s(literal 4 binary64))
(pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 2 binary64))
(+.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 2 binary64)))
(+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 2 binary64))))
(/.f64 (-.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 3 binary64)) (*.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 kx) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 2 binary64)))))
#s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (/.f64 (-.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 3 binary64)) (*.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 kx) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 2 binary64))))))
(sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (/.f64 (-.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 3 binary64)) (*.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 kx) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 2 binary64)))))))
(/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (/.f64 (-.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 3 binary64)) (*.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 kx) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 2 binary64))))))))
th
(sin.f64 th)
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (/.f64 (-.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 3 binary64)) (*.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 kx) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 2 binary64)))))))) (sin.f64 th))
(*.f64 ky th)
#s(approx (* ky (sin th)) (*.f64 ky th))
(/.f64 #s(approx (* ky (sin th)) (*.f64 ky th)) kx)
#s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 #s(approx (* ky (sin th)) (*.f64 ky th)) kx))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 #s(approx (* ky (sin th)) (*.f64 ky th)) kx)))
#s(literal 1 binary64)
(fabs.f64 (sin.f64 kx))
(*.f64 (sin.f64 th) ky)
(/.f64 (fabs.f64 (sin.f64 kx)) (*.f64 (sin.f64 th) ky))
(/.f64 #s(literal 1 binary64) (/.f64 (fabs.f64 (sin.f64 kx)) (*.f64 (sin.f64 th) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(literal 1 binary64) (/.f64 (fabs.f64 (sin.f64 kx)) (*.f64 (sin.f64 th) ky))))
(+.f64 ky ky)
(cos.f64 (+.f64 ky ky))
(*.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)))
(sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))
(*.f64 (sin.f64 ky) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))
(*.f64 (sin.f64 th) (*.f64 (sin.f64 ky) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 (sin.f64 th) (*.f64 (sin.f64 ky) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))))
#s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))
(sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))
(/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 th))
Outputs
#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) 6) (pow.f64 kx #s(literal 6 binary64)))
#s(approx (pow (sin kx) 6) (*.f64 (pow.f64 kx #s(literal 6 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (pow.f64 kx #s(literal 2 binary64))))))
#s(approx (pow (sin kx) 6) (*.f64 (pow.f64 kx #s(literal 6 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 7/15 binary64) (pow.f64 kx #s(literal 2 binary64))) #s(literal 1 binary64))))))
#s(approx (pow (sin kx) 6) (*.f64 (pow.f64 kx #s(literal 6 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 7/15 binary64) (*.f64 #s(literal -128/945 binary64) (pow.f64 kx #s(literal 2 binary64))))) #s(literal 1 binary64))))))
#s(approx (* -1 (pow (sin kx) 6)) (*.f64 #s(literal -1 binary64) (pow.f64 kx #s(literal 6 binary64))))
#s(approx (* -1 (pow (sin kx) 6)) (*.f64 (pow.f64 kx #s(literal 6 binary64)) (-.f64 (pow.f64 kx #s(literal 2 binary64)) #s(literal 1 binary64))))
#s(approx (* -1 (pow (sin kx) 6)) (*.f64 (pow.f64 kx #s(literal 6 binary64)) (-.f64 (*.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -7/15 binary64) (pow.f64 kx #s(literal 2 binary64))))) #s(literal 1 binary64))))
#s(approx (* -1 (pow (sin kx) 6)) (*.f64 (pow.f64 kx #s(literal 6 binary64)) (-.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 128/945 binary64) (pow.f64 kx #s(literal 2 binary64))) #s(literal 7/15 binary64))))) #s(literal 1 binary64))))
#s(approx (- (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3) (* -1 (pow (sin kx) 6))) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 3 binary64)))
#s(approx (- (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3) (* -1 (pow (sin kx) 6))) (+.f64 (pow.f64 kx #s(literal 6 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 3 binary64))))
#s(approx (- (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3) (* -1 (pow (sin kx) 6))) (+.f64 (*.f64 (pow.f64 kx #s(literal 6 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (pow.f64 kx #s(literal 2 binary64))))) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 3 binary64))))
#s(approx (- (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3) (* -1 (pow (sin kx) 6))) (+.f64 (*.f64 (pow.f64 kx #s(literal 6 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 7/15 binary64) (pow.f64 kx #s(literal 2 binary64))) #s(literal 1 binary64))))) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 3 binary64))))
#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) (- 1/2 (* 1/2 (cos (* 2 ky))))) (*.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))
#s(approx (* (pow (sin kx) 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (*.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))
#s(approx (* (pow (sin kx) 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (*.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 -1/3 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 #s(literal 2/45 binary64) (*.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))
#s(approx (* (pow (sin kx) 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (*.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 -1/3 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/315 binary64) (*.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 #s(literal 2/45 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))
#s(approx (* -1 (* (pow (sin kx) 2) (- 1/2 (* 1/2 (cos (* 2 ky)))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
#s(approx (* -1 (* (pow (sin kx) 2) (- 1/2 (* 1/2 (cos (* 2 ky)))))) (*.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))))
#s(approx (* -1 (* (pow (sin kx) 2) (- 1/2 (* 1/2 (cos (* 2 ky)))))) (*.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2/45 binary64) (*.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 #s(literal 1/3 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))))
#s(approx (* -1 (* (pow (sin kx) 2) (- 1/2 (* 1/2 (cos (* 2 ky)))))) (*.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/3 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2/45 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 #s(literal 1/315 binary64) (*.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))))))))
#s(approx (pow (sin kx) 4) (pow.f64 kx #s(literal 4 binary64)))
#s(approx (pow (sin kx) 4) (*.f64 (pow.f64 kx #s(literal 4 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -2/3 binary64) (pow.f64 kx #s(literal 2 binary64))))))
#s(approx (pow (sin kx) 4) (*.f64 (pow.f64 kx #s(literal 4 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/5 binary64) (pow.f64 kx #s(literal 2 binary64))) #s(literal 2/3 binary64))))))
#s(approx (pow (sin kx) 4) (*.f64 (pow.f64 kx #s(literal 4 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 1/5 binary64) (*.f64 #s(literal -34/945 binary64) (pow.f64 kx #s(literal 2 binary64))))) #s(literal 2/3 binary64))))))
#s(approx (+ (pow (sin kx) 4) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 2 binary64)))
#s(approx (+ (pow (sin kx) 4) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2)) (+.f64 (pow.f64 kx #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 2 binary64))))
#s(approx (+ (pow (sin kx) 4) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2)) (+.f64 (*.f64 (pow.f64 kx #s(literal 4 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -2/3 binary64) (pow.f64 kx #s(literal 2 binary64))))) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 2 binary64))))
#s(approx (+ (pow (sin kx) 4) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2)) (+.f64 (*.f64 (pow.f64 kx #s(literal 4 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/5 binary64) (pow.f64 kx #s(literal 2 binary64))) #s(literal 2/3 binary64))))) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 2 binary64))))
#s(approx (+ (* -1 (* (pow (sin kx) 2) (- 1/2 (* 1/2 (cos (* 2 ky)))))) (+ (pow (sin kx) 4) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 2 binary64))))
#s(approx (+ (* -1 (* (pow (sin kx) 2) (- 1/2 (* 1/2 (cos (* 2 ky)))))) (+ (pow (sin kx) 4) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2))) (+.f64 (*.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/3 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 2 binary64))))
#s(approx (+ (* -1 (* (pow (sin kx) 2) (- 1/2 (* 1/2 (cos (* 2 ky)))))) (+ (pow (sin kx) 4) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2))) (+.f64 (*.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/3 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -2/45 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2/3 binary64)))))))) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 2 binary64))))
#s(approx (/ (- (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3) (* -1 (pow (sin kx) 6))) (+ (* -1 (* (pow (sin kx) 2) (- 1/2 (* 1/2 (cos (* 2 ky)))))) (+ (pow (sin kx) 4) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))
#s(approx (/ (- (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3) (* -1 (pow (sin kx) 6))) (+ (* -1 (* (pow (sin kx) 2) (- 1/2 (* 1/2 (cos (* 2 ky)))))) (+ (pow (sin kx) 4) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2)))) (-.f64 (+.f64 #s(literal 1/2 binary64) (pow.f64 kx #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))
#s(approx (/ (- (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3) (* -1 (pow (sin kx) 6))) (+ (* -1 (* (pow (sin kx) 2) (- 1/2 (* 1/2 (cos (* 2 ky)))))) (+ (pow (sin kx) 4) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2)))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.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)))))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))
#s(approx (/ (- (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3) (* -1 (pow (sin kx) 6))) (+ (* -1 (* (pow (sin kx) 2) (- 1/2 (* 1/2 (cos (* 2 ky)))))) (+ (pow (sin kx) 4) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2)))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.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 (+.f64 #s(literal 2/45 binary64) (*.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (*.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))) #s(literal 1/3 binary64)))))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))
#s(approx (sqrt (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx))))))) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))
#s(approx (sqrt (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx))))))) (+.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 kx #s(literal 2 binary64)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))))
#s(approx (sqrt (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx))))))) (+.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.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 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))))))
#s(approx (sqrt (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx))))))) (+.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 #s(literal 2/45 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))))))
#s(approx (/ (sin ky) (sqrt (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))))) (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
#s(approx (/ (sin ky) (sqrt (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 kx #s(literal 2 binary64)) (sin.f64 ky)) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))) (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))
#s(approx (/ (sin ky) (sqrt (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))))) (+.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 -1/2 binary64) (/.f64 (*.f64 (sin.f64 ky) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 ky) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 5 binary64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 ky) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))))) (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))
#s(approx (/ (sin ky) (sqrt (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))))) (+.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 -1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 ky) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 ky) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 5 binary64))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (sin.f64 ky) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 5 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 ky) (-.f64 #s(literal 2/45 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 ky) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 ky) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 5 binary64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 ky) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))))) (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))
#s(approx (* (/ (sin ky) (sqrt (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))))) (sin th)) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
#s(approx (* (/ (sin ky) (sqrt (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))))) (sin th)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 kx #s(literal 2 binary64)) (*.f64 (sin.f64 ky) (sin.f64 th))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))
#s(approx (* (/ (sin ky) (sqrt (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))))) (sin th)) (+.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 -1/2 binary64) (/.f64 (*.f64 (sin.f64 ky) (*.f64 (sin.f64 th) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 5 binary64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))))) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))
#s(approx (* (/ (sin ky) (sqrt (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))))) (sin th)) (+.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 -1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 ky) (*.f64 (sin.f64 th) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 5 binary64))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (sin.f64 ky) (*.f64 (sin.f64 th) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 5 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 ky) (*.f64 (sin.f64 th) (-.f64 #s(literal 2/45 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 ky) (*.f64 (sin.f64 th) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 5 binary64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))))) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))
#s(approx (/ (* ky (sin th)) kx) (/.f64 (*.f64 ky (sin.f64 th)) kx))
#s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 kx #s(literal 2 binary64)) (*.f64 ky (sin.f64 th)))) (*.f64 ky (sin.f64 th))) kx))
#s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (+.f64 (*.f64 ky (sin.f64 th)) (*.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 -1/36 binary64) (*.f64 ky (sin.f64 th))) (*.f64 #s(literal 1/120 binary64) (*.f64 ky (sin.f64 th)))))) (*.f64 #s(literal -1/6 binary64) (*.f64 ky (sin.f64 th)))))) kx))
#s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (+.f64 (*.f64 ky (sin.f64 th)) (*.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 -1/5040 binary64) (*.f64 ky (sin.f64 th))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 ky (sin.f64 th))) (*.f64 #s(literal 1/6 binary64) (+.f64 (*.f64 #s(literal -1/36 binary64) (*.f64 ky (sin.f64 th))) (*.f64 #s(literal 1/120 binary64) (*.f64 ky (sin.f64 th))))))))) (+.f64 (*.f64 #s(literal -1/36 binary64) (*.f64 ky (sin.f64 th))) (*.f64 #s(literal 1/120 binary64) (*.f64 ky (sin.f64 th)))))) (*.f64 #s(literal -1/6 binary64) (*.f64 ky (sin.f64 th)))))) kx))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 kx #s(literal 2 binary64)) (*.f64 (sin.f64 ky) (sin.f64 th))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (+.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 -1/2 binary64) (/.f64 (*.f64 (sin.f64 ky) (*.f64 (sin.f64 th) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 5 binary64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (+.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 -1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 ky) (*.f64 (sin.f64 th) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 5 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (sin.f64 ky) (*.f64 (sin.f64 th) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 5 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 ky) (*.f64 (sin.f64 th) (-.f64 #s(literal 2/45 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 ky) (*.f64 (sin.f64 th) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 5 binary64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
#s(approx (fabs (sin kx)) (fabs.f64 (sin.f64 kx)))
#s(approx (/ (fabs (sin kx)) (* (sin th) ky)) (/.f64 (fabs.f64 (sin.f64 kx)) (*.f64 ky (sin.f64 th))))
#s(approx (/ 1 (/ (fabs (sin kx)) (* (sin th) ky))) (/.f64 (*.f64 ky (sin.f64 th)) (fabs.f64 (sin.f64 kx))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 kx #s(literal 2 binary64)) (*.f64 (sin.f64 ky) (sin.f64 th))) (pow.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (+.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 -1/2 binary64) (/.f64 (*.f64 (sin.f64 ky) (*.f64 (sin.f64 th) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (pow.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 5 binary64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (pow.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))))) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (+.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 -1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 ky) (*.f64 (sin.f64 th) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (pow.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 5 binary64))))) (pow.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (sin.f64 ky) (*.f64 (sin.f64 th) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 5 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 ky) (*.f64 (sin.f64 th) (-.f64 #s(literal 2/45 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 ky) (*.f64 (sin.f64 th) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (pow.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 5 binary64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (pow.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))))) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))
#s(approx (sin kx) (sin.f64 kx))
#s(approx (pow (sin kx) 6) (pow.f64 (sin.f64 kx) #s(literal 6 binary64)))
#s(approx (* -1 (pow (sin kx) 6)) (*.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 kx) #s(literal 6 binary64))))
#s(approx (- (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3) (* -1 (pow (sin kx) 6))) (-.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 3 binary64)) (*.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 kx) #s(literal 6 binary64)))))
#s(approx (pow (sin kx) 2) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))
#s(approx (* (pow (sin kx) 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))
#s(approx (* -1 (* (pow (sin kx) 2) (- 1/2 (* 1/2 (cos (* 2 ky)))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
#s(approx (pow (sin kx) 4) (pow.f64 (sin.f64 kx) #s(literal 4 binary64)))
#s(approx (+ (pow (sin kx) 4) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 2 binary64))))
#s(approx (+ (* -1 (* (pow (sin kx) 2) (- 1/2 (* 1/2 (cos (* 2 ky)))))) (+ (pow (sin kx) 4) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 2 binary64)))))
#s(approx (/ (- (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3) (* -1 (pow (sin kx) 6))) (+ (* -1 (* (pow (sin kx) 2) (- 1/2 (* 1/2 (cos (* 2 ky)))))) (+ (pow (sin kx) 4) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2)))) (/.f64 (-.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 3 binary64)) (*.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 kx) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 2 binary64))))))
#s(approx (sqrt (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx))))))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 3 binary64)) (*.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 kx) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 2 binary64)))))))
#s(approx (/ (sin ky) (sqrt (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))))) (/.f64 (sin.f64 ky) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 3 binary64)) (*.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 kx) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 2 binary64))))))))
#s(approx (* (/ (sin ky) (sqrt (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))))) (sin th)) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 3 binary64)) (*.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 kx) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 2 binary64))))))))
#s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (*.f64 ky (sin.f64 th)) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 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 (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 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 (* 2 ky) (*.f64 #s(literal 2 binary64) ky))
#s(approx (cos (* 2 ky)) #s(literal 1 binary64))
#s(approx (cos (* 2 ky)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -2 binary64) (pow.f64 ky #s(literal 2 binary64)))))
#s(approx (cos (* 2 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 (* 2 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/2 (cos (* 2 ky))) #s(literal 1/2 binary64))
#s(approx (* 1/2 (cos (* 2 ky))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1 binary64) (pow.f64 ky #s(literal 2 binary64)))))
#s(approx (* 1/2 (cos (* 2 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 (* 2 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 (* 2 ky)))) (pow.f64 ky #s(literal 2 binary64)))
#s(approx (- 1/2 (* 1/2 (cos (* 2 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 (* 2 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 (* 2 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 (- 1/2 (* 1/2 (cos (* 2 ky)))) 3) (pow.f64 ky #s(literal 6 binary64)))
#s(approx (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3) (*.f64 (pow.f64 ky #s(literal 6 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (pow.f64 ky #s(literal 2 binary64))))))
#s(approx (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3) (*.f64 (pow.f64 ky #s(literal 6 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 7/15 binary64) (pow.f64 ky #s(literal 2 binary64))) #s(literal 1 binary64))))))
#s(approx (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3) (*.f64 (pow.f64 ky #s(literal 6 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 7/15 binary64) (*.f64 #s(literal -128/945 binary64) (pow.f64 ky #s(literal 2 binary64))))) #s(literal 1 binary64))))))
#s(approx (- (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3) (* -1 (pow (sin kx) 6))) (-.f64 (pow.f64 ky #s(literal 6 binary64)) (*.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 kx) #s(literal 6 binary64)))))
#s(approx (- (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3) (* -1 (pow (sin kx) 6))) (-.f64 (*.f64 (pow.f64 ky #s(literal 6 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (pow.f64 ky #s(literal 2 binary64))))) (*.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 kx) #s(literal 6 binary64)))))
#s(approx (- (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3) (* -1 (pow (sin kx) 6))) (-.f64 (*.f64 (pow.f64 ky #s(literal 6 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 7/15 binary64) (pow.f64 ky #s(literal 2 binary64))) #s(literal 1 binary64))))) (*.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 kx) #s(literal 6 binary64)))))
#s(approx (* (pow (sin kx) 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (*.f64 (pow.f64 ky #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))
#s(approx (* (pow (sin kx) 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (*.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 (pow.f64 ky #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
#s(approx (* (pow (sin kx) 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (*.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/3 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 #s(literal 2/45 binary64) (*.f64 (pow.f64 ky #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
#s(approx (* (pow (sin kx) 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (*.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/3 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/315 binary64) (*.f64 (pow.f64 ky #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))) (*.f64 #s(literal 2/45 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
#s(approx (* -1 (* (pow (sin kx) 2) (- 1/2 (* 1/2 (cos (* 2 ky)))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 ky #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
#s(approx (* -1 (* (pow (sin kx) 2) (- 1/2 (* 1/2 (cos (* 2 ky)))))) (*.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 #s(literal 1/3 binary64) (*.f64 (pow.f64 ky #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))))
#s(approx (* -1 (* (pow (sin kx) 2) (- 1/2 (* 1/2 (cos (* 2 ky)))))) (*.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2/45 binary64) (*.f64 (pow.f64 ky #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))) (*.f64 #s(literal 1/3 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))))))
#s(approx (* -1 (* (pow (sin kx) 2) (- 1/2 (* 1/2 (cos (* 2 ky)))))) (*.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/3 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2/45 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 #s(literal 1/315 binary64) (*.f64 (pow.f64 ky #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))))))))
#s(approx (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2) (pow.f64 ky #s(literal 4 binary64)))
#s(approx (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2) (*.f64 (pow.f64 ky #s(literal 4 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -2/3 binary64) (pow.f64 ky #s(literal 2 binary64))))))
#s(approx (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2) (*.f64 (pow.f64 ky #s(literal 4 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/5 binary64) (pow.f64 ky #s(literal 2 binary64))) #s(literal 2/3 binary64))))))
#s(approx (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2) (*.f64 (pow.f64 ky #s(literal 4 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 1/5 binary64) (*.f64 #s(literal -34/945 binary64) (pow.f64 ky #s(literal 2 binary64))))) #s(literal 2/3 binary64))))))
#s(approx (+ (pow (sin kx) 4) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2)) (+.f64 (pow.f64 ky #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 binary64))))
#s(approx (+ (pow (sin kx) 4) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2)) (+.f64 (*.f64 (pow.f64 ky #s(literal 4 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -2/3 binary64) (pow.f64 ky #s(literal 2 binary64))))) (pow.f64 (sin.f64 kx) #s(literal 4 binary64))))
#s(approx (+ (pow (sin kx) 4) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2)) (+.f64 (*.f64 (pow.f64 ky #s(literal 4 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/5 binary64) (pow.f64 ky #s(literal 2 binary64))) #s(literal 2/3 binary64))))) (pow.f64 (sin.f64 kx) #s(literal 4 binary64))))
#s(approx (+ (* -1 (* (pow (sin kx) 2) (- 1/2 (* 1/2 (cos (* 2 ky)))))) (+ (pow (sin kx) 4) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 ky #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 4 binary64))))
#s(approx (+ (* -1 (* (pow (sin kx) 2) (- 1/2 (* 1/2 (cos (* 2 ky)))))) (+ (pow (sin kx) 4) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2))) (+.f64 (*.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/3 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))))) (pow.f64 (sin.f64 kx) #s(literal 4 binary64))))
#s(approx (+ (* -1 (* (pow (sin kx) 2) (- 1/2 (* 1/2 (cos (* 2 ky)))))) (+ (pow (sin kx) 4) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2))) (+.f64 (*.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/3 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -2/45 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2/3 binary64)))))))) (pow.f64 (sin.f64 kx) #s(literal 4 binary64))))
#s(approx (/ (- (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3) (* -1 (pow (sin kx) 6))) (+ (* -1 (* (pow (sin kx) 2) (- 1/2 (* 1/2 (cos (* 2 ky)))))) (+ (pow (sin kx) 4) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2)))) (+.f64 (pow.f64 ky #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))
#s(approx (/ (- (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3) (* -1 (pow (sin kx) 6))) (+ (* -1 (* (pow (sin kx) 2) (- 1/2 (* 1/2 (cos (* 2 ky)))))) (+ (pow (sin kx) 4) (pow (- 1/2 (* 1/2 (cos (* 2 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 (- 1/2 (* 1/2 (cos (* 2 ky)))) 3) (* -1 (pow (sin kx) 6))) (+ (* -1 (* (pow (sin kx) 2) (- 1/2 (* 1/2 (cos (* 2 ky)))))) (+ (pow (sin kx) 4) (pow (- 1/2 (* 1/2 (cos (* 2 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 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 2/45 binary64) (*.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (*.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))) #s(literal 1/3 binary64))))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))
#s(approx (sqrt (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx))))))) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))
#s(approx (sqrt (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx))))))) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 ky #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))))
#s(approx (sqrt (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx))))))) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #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 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))))))
#s(approx (sqrt (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx))))))) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 #s(literal 2/45 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))))))
#s(approx (/ (sin ky) (sqrt (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))))) (/.f64 ky (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
#s(approx (/ (sin ky) (sqrt (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))))) (*.f64 ky (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))))
#s(approx (/ (sin ky) (sqrt (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))))) (*.f64 ky (+.f64 (*.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))))
#s(approx (/ (sin ky) (sqrt (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))))) (*.f64 ky (+.f64 (*.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/5040 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 #s(literal 2/45 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/120 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/120 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))))
#s(approx (* (/ (sin ky) (sqrt (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))))) (sin th)) (*.f64 ky (+.f64 (*.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (/.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))))
#s(approx (* (/ (sin ky) (sqrt (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))))) (sin th)) (*.f64 ky (+.f64 (*.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (*.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 th) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (/.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))))
#s(approx (* (/ (sin ky) (sqrt (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))))) (sin th)) (*.f64 ky (+.f64 (*.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (*.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 1/120 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (*.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/5040 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64))))) (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 th) (-.f64 #s(literal 2/45 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/120 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 th) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64))))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 th) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (/.f64 (sin.f64 th) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))))
#s(approx (* ky th) (*.f64 ky th))
#s(approx (* ky (sin th)) (*.f64 ky (sin.f64 th)))
#s(approx (/ 1 (sqrt (- 1/2 (* (cos (+ ky ky)) 1/2)))) (/.f64 #s(literal 1 binary64) ky))
#s(approx (/ 1 (sqrt (- 1/2 (* (cos (+ ky ky)) 1/2)))) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/6 binary64) (pow.f64 ky #s(literal 2 binary64)))) ky))
#s(approx (/ 1 (sqrt (- 1/2 (* (cos (+ ky ky)) 1/2)))) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal 7/360 binary64) (pow.f64 ky #s(literal 2 binary64)))))) ky))
#s(approx (/ 1 (sqrt (- 1/2 (* (cos (+ ky ky)) 1/2)))) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 #s(literal 7/360 binary64) (*.f64 #s(literal 31/15120 binary64) (pow.f64 ky #s(literal 2 binary64)))))))) ky))
#s(approx (* (sin th) (* (sin ky) (/ 1 (sqrt (- 1/2 (* (cos (+ ky ky)) 1/2)))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 ky (+.f64 (*.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64)))))) (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 ky (+.f64 (*.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (-.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 1/120 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 th) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64)))))) (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 ky (+.f64 (*.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (-.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 (*.f64 #s(literal 1/120 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (-.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 -1/5040 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64))))) (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64)))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 th) (-.f64 #s(literal 2/45 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/120 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 th) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64))))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 th) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64))))) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64)))))) (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))
#s(approx (sin ky) (sin.f64 ky))
#s(approx (cos (* 2 ky)) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))
#s(approx (* 1/2 (cos (* 2 ky))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))
#s(approx (/ 1 (sqrt (- 1/2 (* (cos (+ ky ky)) 1/2)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
#s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (/.f64 (-.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (*.f64 #s(literal -2 binary64) ky))))) #s(literal 3 binary64)) (*.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 kx) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (*.f64 #s(literal -2 binary64) ky))))))) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (*.f64 #s(literal -2 binary64) ky))))) #s(literal 2 binary64))))))
#s(approx (sqrt (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx))))))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (*.f64 #s(literal -2 binary64) ky))))) #s(literal 3 binary64)) (*.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 kx) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (*.f64 #s(literal -2 binary64) ky))))))) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (*.f64 #s(literal -2 binary64) ky))))) #s(literal 2 binary64)))))))
#s(approx (/ (sin ky) (sqrt (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))))) (/.f64 (sin.f64 ky) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (*.f64 #s(literal -2 binary64) ky))))) #s(literal 3 binary64)) (*.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 kx) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (*.f64 #s(literal -2 binary64) ky))))))) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (*.f64 #s(literal -2 binary64) ky))))) #s(literal 2 binary64))))))))
#s(approx (* (/ (sin ky) (sqrt (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))))) (sin th)) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (*.f64 #s(literal -2 binary64) ky))))) #s(literal 3 binary64)) (*.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 kx) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (*.f64 #s(literal -2 binary64) ky))))))) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (*.f64 #s(literal -2 binary64) ky))))) #s(literal 2 binary64))))))))
#s(approx (cos (+ ky ky)) (cos.f64 (neg.f64 (*.f64 #s(literal -2 binary64) ky))))
#s(approx (* (cos (+ ky ky)) 1/2) (*.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (*.f64 #s(literal -2 binary64) ky)))))
#s(approx (- 1/2 (* (cos (+ ky ky)) 1/2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (*.f64 #s(literal -2 binary64) ky))))))
#s(approx (sqrt (- 1/2 (* (cos (+ ky ky)) 1/2))) (sqrt.f64 (-.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 (sqrt (- 1/2 (* (cos (+ ky ky)) 1/2)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (*.f64 #s(literal -2 binary64) ky))))))))
#s(approx (* (sin ky) (/ 1 (sqrt (- 1/2 (* (cos (+ ky ky)) 1/2))))) (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (*.f64 #s(literal -2 binary64) ky))))))))
#s(approx (* (sin th) (* (sin ky) (/ 1 (sqrt (- 1/2 (* (cos (+ ky ky)) 1/2)))))) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (*.f64 #s(literal -2 binary64) ky))))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (-.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 th th)
#s(approx (sin th) (*.f64 th (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 th #s(literal 2 binary64))))))
#s(approx (sin th) (*.f64 th (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 th #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 th #s(literal 2 binary64))) #s(literal 1/6 binary64))))))
#s(approx (sin th) (*.f64 th (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 th #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 #s(literal 1/120 binary64) (*.f64 #s(literal -1/5040 binary64) (pow.f64 th #s(literal 2 binary64))))) #s(literal 1/6 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))))) (sin th)) (/.f64 (*.f64 th (sin.f64 ky)) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 3 binary64)) (*.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 kx) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 2 binary64))))))))
#s(approx (* (/ (sin ky) (sqrt (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))))) (sin th)) (*.f64 th (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (sin.f64 ky)) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 3 binary64)) (*.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 kx) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 2 binary64)))))))) (/.f64 (sin.f64 ky) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 3 binary64)) (*.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 kx) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 2 binary64))))))))))
#s(approx (* (/ (sin ky) (sqrt (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))))) (sin th)) (*.f64 th (+.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 ky) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 3 binary64)) (*.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 kx) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/120 binary64) (/.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (sin.f64 ky)) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 3 binary64)) (*.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 kx) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 2 binary64)))))))))) (/.f64 (sin.f64 ky) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 3 binary64)) (*.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 kx) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 2 binary64))))))))))
#s(approx (* (/ (sin ky) (sqrt (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))))) (sin th)) (*.f64 th (+.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 ky) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 3 binary64)) (*.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 kx) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/5040 binary64) (/.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (sin.f64 ky)) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 3 binary64)) (*.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 kx) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/120 binary64) (/.f64 (sin.f64 ky) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 3 binary64)) (*.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 kx) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 2 binary64)))))))))))) (/.f64 (sin.f64 ky) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 3 binary64)) (*.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 kx) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 2 binary64))))))))))
#s(approx (* ky (sin th)) (*.f64 th (+.f64 ky (*.f64 #s(literal -1/6 binary64) (*.f64 ky (pow.f64 th #s(literal 2 binary64)))))))
#s(approx (* ky (sin th)) (*.f64 th (+.f64 ky (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/6 binary64) ky) (*.f64 #s(literal 1/120 binary64) (*.f64 ky (pow.f64 th #s(literal 2 binary64)))))))))
#s(approx (* ky (sin th)) (*.f64 th (+.f64 ky (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/6 binary64) ky) (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/5040 binary64) (*.f64 ky (pow.f64 th #s(literal 2 binary64)))) (*.f64 #s(literal 1/120 binary64) ky))))))))
#s(approx (/ (* ky (sin th)) kx) (/.f64 (*.f64 ky th) kx))
#s(approx (/ (* ky (sin th)) kx) (*.f64 th (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 ky (pow.f64 th #s(literal 2 binary64))) kx)) (/.f64 ky kx))))
#s(approx (/ (* ky (sin th)) kx) (*.f64 th (+.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 ky kx)) (*.f64 #s(literal 1/120 binary64) (/.f64 (*.f64 ky (pow.f64 th #s(literal 2 binary64))) kx)))) (/.f64 ky kx))))
#s(approx (/ (* ky (sin th)) kx) (*.f64 th (+.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 ky kx)) (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/5040 binary64) (/.f64 (*.f64 ky (pow.f64 th #s(literal 2 binary64))) kx)) (*.f64 #s(literal 1/120 binary64) (/.f64 ky kx)))))) (/.f64 ky kx))))
#s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (*.f64 ky th) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
#s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (*.f64 th (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 ky (pow.f64 th #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (/.f64 ky (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))))
#s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (*.f64 th (+.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 ky (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (*.f64 #s(literal 1/120 binary64) (/.f64 (*.f64 ky (pow.f64 th #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))))) (/.f64 ky (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))))
#s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (*.f64 th (+.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 ky (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/5040 binary64) (/.f64 (*.f64 ky (pow.f64 th #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (*.f64 #s(literal 1/120 binary64) (/.f64 ky (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))))))) (/.f64 ky (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 th (sin.f64 ky)) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 th (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (sin.f64 ky)) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 th (+.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/120 binary64) (/.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (sin.f64 ky)) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))))) (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 th (+.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/5040 binary64) (/.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (sin.f64 ky)) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/120 binary64) (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))))))) (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))
#s(approx (/ (fabs (sin kx)) (* (sin th) ky)) (/.f64 (fabs.f64 (sin.f64 kx)) (*.f64 ky th)))
#s(approx (/ (fabs (sin kx)) (* (sin th) ky)) (/.f64 (+.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (fabs.f64 (sin.f64 kx))) ky)) (/.f64 (fabs.f64 (sin.f64 kx)) ky)) th))
#s(approx (/ (fabs (sin kx)) (* (sin th) ky)) (/.f64 (+.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/36 binary64) (/.f64 (fabs.f64 (sin.f64 kx)) ky)) (*.f64 #s(literal 1/120 binary64) (/.f64 (fabs.f64 (sin.f64 kx)) ky))))) (*.f64 #s(literal -1/6 binary64) (/.f64 (fabs.f64 (sin.f64 kx)) ky)))) (/.f64 (fabs.f64 (sin.f64 kx)) ky)) th))
#s(approx (/ (fabs (sin kx)) (* (sin th) ky)) (/.f64 (+.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/5040 binary64) (/.f64 (fabs.f64 (sin.f64 kx)) ky)) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (fabs.f64 (sin.f64 kx)) ky)) (*.f64 #s(literal 1/6 binary64) (+.f64 (*.f64 #s(literal -1/36 binary64) (/.f64 (fabs.f64 (sin.f64 kx)) ky)) (*.f64 #s(literal 1/120 binary64) (/.f64 (fabs.f64 (sin.f64 kx)) ky)))))))) (+.f64 (*.f64 #s(literal -1/36 binary64) (/.f64 (fabs.f64 (sin.f64 kx)) ky)) (*.f64 #s(literal 1/120 binary64) (/.f64 (fabs.f64 (sin.f64 kx)) ky))))) (*.f64 #s(literal -1/6 binary64) (/.f64 (fabs.f64 (sin.f64 kx)) ky)))) (/.f64 (fabs.f64 (sin.f64 kx)) ky)) th))
#s(approx (/ 1 (/ (fabs (sin kx)) (* (sin th) ky))) (/.f64 (*.f64 ky th) (fabs.f64 (sin.f64 kx))))
#s(approx (/ 1 (/ (fabs (sin kx)) (* (sin th) ky))) (*.f64 th (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 ky (pow.f64 th #s(literal 2 binary64))) (fabs.f64 (sin.f64 kx)))) (/.f64 ky (fabs.f64 (sin.f64 kx))))))
#s(approx (/ 1 (/ (fabs (sin kx)) (* (sin th) ky))) (*.f64 th (+.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 ky (fabs.f64 (sin.f64 kx)))) (*.f64 #s(literal 1/120 binary64) (/.f64 (*.f64 ky (pow.f64 th #s(literal 2 binary64))) (fabs.f64 (sin.f64 kx)))))) (/.f64 ky (fabs.f64 (sin.f64 kx))))))
#s(approx (/ 1 (/ (fabs (sin kx)) (* (sin th) ky))) (*.f64 th (+.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 ky (fabs.f64 (sin.f64 kx)))) (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/5040 binary64) (/.f64 (*.f64 ky (pow.f64 th #s(literal 2 binary64))) (fabs.f64 (sin.f64 kx)))) (*.f64 #s(literal 1/120 binary64) (/.f64 ky (fabs.f64 (sin.f64 kx)))))))) (/.f64 ky (fabs.f64 (sin.f64 kx))))))
#s(approx (* (sin th) (* (sin ky) (/ 1 (sqrt (- 1/2 (* (cos (+ ky ky)) 1/2)))))) (/.f64 (*.f64 th (sin.f64 ky)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
#s(approx (* (sin th) (* (sin ky) (/ 1 (sqrt (- 1/2 (* (cos (+ ky ky)) 1/2)))))) (*.f64 th (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (sin.f64 ky)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))))
#s(approx (* (sin th) (* (sin ky) (/ 1 (sqrt (- 1/2 (* (cos (+ ky ky)) 1/2)))))) (*.f64 th (+.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (*.f64 #s(literal 1/120 binary64) (/.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (sin.f64 ky)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))) (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))))
#s(approx (* (sin th) (* (sin ky) (/ 1 (sqrt (- 1/2 (* (cos (+ ky ky)) 1/2)))))) (*.f64 th (+.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/5040 binary64) (/.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (sin.f64 ky)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (*.f64 #s(literal 1/120 binary64) (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))))) (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 (*.f64 th (sin.f64 ky)) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 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 (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 th (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (sin.f64 ky)) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 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 (sin.f64 ky) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 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 (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 th (+.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 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/120 binary64) (/.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (sin.f64 ky)) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 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 (sin.f64 ky) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 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 (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 th (+.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 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 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/5040 binary64) (/.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (sin.f64 ky)) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 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/120 binary64) (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 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 (sin.f64 ky) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))
Calls

9 calls:

TimeVariablePoint
33.0ms
ky
inf
18.0ms
ky
-inf
12.0ms
th
-inf
11.0ms
kx
inf
8.0ms
th
inf

rewrite264.0ms (1.4%)

Memory
-25.4MiB live, 642.8MiB allocated; 71ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0931241
0141859
1707759
22848759
04088567
Stop Event
iter-limit
node-limit
iter-limit
Counts
56 → 683
Calls
Call 1
Inputs
ky
(sin.f64 ky)
kx
#s(literal 1/2 binary64)
#s(literal 2 binary64)
(*.f64 #s(literal 2 binary64) ky)
(cos.f64 (*.f64 #s(literal 2 binary64) ky))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))
#s(literal 3 binary64)
(pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 3 binary64))
#s(literal -1 binary64)
(sin.f64 kx)
#s(literal 6 binary64)
(pow.f64 (sin.f64 kx) #s(literal 6 binary64))
(*.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 kx) #s(literal 6 binary64)))
(-.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 3 binary64)) (*.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 kx) #s(literal 6 binary64))))
(pow.f64 (sin.f64 kx) #s(literal 2 binary64))
(*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))
(*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))
#s(literal 4 binary64)
(pow.f64 (sin.f64 kx) #s(literal 4 binary64))
(pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 2 binary64))
(+.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 2 binary64)))
(+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 2 binary64))))
(/.f64 (-.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 3 binary64)) (*.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 kx) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 2 binary64)))))
#s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (/.f64 (-.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 3 binary64)) (*.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 kx) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 2 binary64))))))
(sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (/.f64 (-.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 3 binary64)) (*.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 kx) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 2 binary64)))))))
(/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (/.f64 (-.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 3 binary64)) (*.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 kx) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 2 binary64))))))))
th
(sin.f64 th)
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (/.f64 (-.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 3 binary64)) (*.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 kx) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 2 binary64)))))))) (sin.f64 th))
(*.f64 ky th)
#s(approx (* ky (sin th)) (*.f64 ky th))
(/.f64 #s(approx (* ky (sin th)) (*.f64 ky th)) kx)
#s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 #s(approx (* ky (sin th)) (*.f64 ky th)) kx))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 #s(approx (* ky (sin th)) (*.f64 ky th)) kx)))
#s(literal 1 binary64)
(fabs.f64 (sin.f64 kx))
(*.f64 (sin.f64 th) ky)
(/.f64 (fabs.f64 (sin.f64 kx)) (*.f64 (sin.f64 th) ky))
(/.f64 #s(literal 1 binary64) (/.f64 (fabs.f64 (sin.f64 kx)) (*.f64 (sin.f64 th) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(literal 1 binary64) (/.f64 (fabs.f64 (sin.f64 kx)) (*.f64 (sin.f64 th) ky))))
(+.f64 ky ky)
(cos.f64 (+.f64 ky ky))
(*.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)))
(sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))
(*.f64 (sin.f64 ky) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))
(*.f64 (sin.f64 th) (*.f64 (sin.f64 ky) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 (sin.f64 th) (*.f64 (sin.f64 ky) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))))
#s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))
(sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))
(/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 th))
Outputs
ky
(*.f64 #s(literal 1 binary64) (sin.f64 ky))
(*.f64 (sin.f64 ky) #s(literal 1 binary64))
(neg.f64 (*.f64 (sin.f64 ky) #s(literal -1 binary64)))
(sin.f64 ky)
kx
#s(literal 1/2 binary64)
#s(literal 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 #s(literal 2 binary64) ky)
(*.f64 ky #s(literal 2 binary64))
(/.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 (*.f64 ky #s(literal 1 binary64)) (*.f64 ky #s(literal 1 binary64)))
(+.f64 (*.f64 #s(literal 1 binary64) ky) (*.f64 #s(literal 1 binary64) 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)))) (pow.f64 (sin.f64 ky) #s(literal 4 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 (pow.f64 (sin.f64 ky) #s(literal 4 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 (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 ky (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 ky)))
(sin.f64 (+.f64 (+.f64 ky (*.f64 (PI.f64) #s(literal 1/2 binary64))) ky))
(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 (cos.f64 (*.f64 ky #s(literal 1 binary64))) (cos.f64 (*.f64 ky #s(literal 1 binary64)))) (*.f64 (sin.f64 (*.f64 ky #s(literal 1 binary64))) (sin.f64 (*.f64 ky #s(literal 1 binary64)))))
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1 binary64) ky)) (cos.f64 (*.f64 #s(literal 1 binary64) ky))) (*.f64 (sin.f64 (*.f64 #s(literal 1 binary64) ky)) (sin.f64 (*.f64 #s(literal 1 binary64) 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 (+.f64 ky ky)) (cos.f64 (neg.f64 (*.f64 (PI.f64) #s(literal 1/2 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 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #s(literal 1/2 binary64)) (*.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 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #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)) (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 (fabs.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 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/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 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) (+.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 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))
(*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (cos.f64 (*.f64 ky #s(literal 1 binary64))) (cos.f64 (*.f64 ky #s(literal 1 binary64))) (sin.f64 (*.f64 ky #s(literal 1 binary64))) (sin.f64 (*.f64 ky #s(literal 1 binary64))))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1 binary64) ky)) (cos.f64 (*.f64 #s(literal 1 binary64) ky)) (sin.f64 (*.f64 #s(literal 1 binary64) ky)) (sin.f64 (*.f64 #s(literal 1 binary64) ky)))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (fabs.f64 (cos.f64 ky)) (fabs.f64 (cos.f64 ky)) (sin.f64 (fabs.f64 ky)) (sin.f64 (fabs.f64 ky)))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (fabs.f64 (cos.f64 ky)) (fabs.f64 (cos.f64 ky)) (neg.f64 (sin.f64 ky)) (neg.f64 (sin.f64 ky)))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (fabs.f64 (cos.f64 ky)) (fabs.f64 (cos.f64 ky)) (fabs.f64 (sin.f64 ky)) (fabs.f64 (sin.f64 ky)))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (fabs.f64 (cos.f64 ky)) (fabs.f64 (cos.f64 ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (fabs.f64 (cos.f64 ky)) (fabs.f64 (cos.f64 ky)) #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (fabs.f64 (cos.f64 ky)) (fabs.f64 (cos.f64 ky)) (sin.f64 ky) (sin.f64 ky))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (neg.f64 (cos.f64 ky)) (neg.f64 (cos.f64 ky)) (sin.f64 (fabs.f64 ky)) (sin.f64 (fabs.f64 ky)))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (neg.f64 (cos.f64 ky)) (neg.f64 (cos.f64 ky)) (neg.f64 (sin.f64 ky)) (neg.f64 (sin.f64 ky)))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (neg.f64 (cos.f64 ky)) (neg.f64 (cos.f64 ky)) (fabs.f64 (sin.f64 ky)) (fabs.f64 (sin.f64 ky)))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (neg.f64 (cos.f64 ky)) (neg.f64 (cos.f64 ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (neg.f64 (cos.f64 ky)) (neg.f64 (cos.f64 ky)) #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (neg.f64 (cos.f64 ky)) (neg.f64 (cos.f64 ky)) (sin.f64 ky) (sin.f64 ky))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (sin.f64 (+.f64 ky ky)) (cos.f64 (neg.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (cos.f64 (+.f64 ky ky)) (sin.f64 (neg.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (cos.f64 ky) (cos.f64 (neg.f64 (neg.f64 ky))) (sin.f64 ky) (sin.f64 (neg.f64 (neg.f64 ky))))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (cos.f64 ky) (cos.f64 ky) (sin.f64 (fabs.f64 ky)) (sin.f64 (fabs.f64 ky)))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (cos.f64 ky) (cos.f64 ky) (neg.f64 (sin.f64 ky)) (neg.f64 (sin.f64 ky)))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (cos.f64 ky) (cos.f64 ky) (fabs.f64 (sin.f64 ky)) (fabs.f64 (sin.f64 ky)))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (cos.f64 ky) (cos.f64 ky) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (cos.f64 ky) (cos.f64 ky) #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (cos.f64 ky) (cos.f64 ky) (sin.f64 ky) (sin.f64 ky))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (sin.f64 ky) (cos.f64 (-.f64 (neg.f64 ky) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (cos.f64 ky) (sin.f64 (-.f64 (neg.f64 ky) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))
(*.f64 (sin.f64 (fabs.f64 ky)) (sin.f64 (fabs.f64 ky)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) #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 (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 (neg.f64 (sin.f64 ky)) (neg.f64 (sin.f64 ky)))
(*.f64 (fabs.f64 (sin.f64 ky)) (fabs.f64 (sin.f64 ky)))
(*.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 ky ky))))
(*.f64 (sin.f64 ky) (sin.f64 ky))
(pow.f64 (sin.f64 ky) #s(literal 2 binary64))
(/.f64 (+.f64 (neg.f64 (cos.f64 (+.f64 ky ky))) (cos.f64 (-.f64 (+.f64 ky (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 ky (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 ky (PI.f64)) (+.f64 ky (PI.f64)))) (cos.f64 (+.f64 (+.f64 ky (PI.f64)) (+.f64 ky (PI.f64))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 ky (PI.f64)) (neg.f64 ky))) (cos.f64 (+.f64 (+.f64 ky (PI.f64)) (neg.f64 ky)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (neg.f64 ky) (+.f64 ky (PI.f64)))) (cos.f64 (+.f64 (neg.f64 ky) (+.f64 ky (PI.f64))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (neg.f64 ky) (neg.f64 ky))) (cos.f64 (+.f64 ky ky))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 ky (PI.f64)) (+.f64 ky (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (sin.f64 (+.f64 (+.f64 ky (PI.f64)) (+.f64 ky (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (neg.f64 (cos.f64 (+.f64 ky ky))) (sin.f64 (+.f64 (neg.f64 ky) (+.f64 ky (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (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 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 3 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))) (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))))))
(/.f64 (-.f64 (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)) (pow.f64 (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) #s(literal 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 (pow.f64 (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (cos.f64 (+.f64 ky ky))))))
(134-z0z1z2z3z4 (neg.f64 (sin.f64 ky)) (cos.f64 ky) (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (sin.f64 ky) (sin.f64 (*.f64 (PI.f64) #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) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 ky (PI.f64))))))
(-.f64 #s(literal 1/2 binary64) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))))
(-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))
(sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)))
(fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))
(fabs.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))
(exp.f64 (*.f64 (log.f64 (sin.f64 ky)) #s(literal 2 binary64)))
(+.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))
#s(literal 3 binary64)
(*.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (sin.f64 ky)) (sin.f64 ky))
(*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) (sin.f64 ky)) (*.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) (sin.f64 ky)))
(*.f64 (*.f64 (sin.f64 ky) (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (*.f64 (sin.f64 ky) (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))))
(*.f64 (pow.f64 (sin.f64 ky) #s(literal 3 binary64)) (pow.f64 (sin.f64 ky) #s(literal 3 binary64)))
(*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (sin.f64 ky)) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (sin.f64 ky)))
(*.f64 (*.f64 (sin.f64 ky) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (*.f64 (sin.f64 ky) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))
(*.f64 (neg.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64))) (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))
(*.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (/.f64 #s(literal 3 binary64) #s(literal 2 binary64))) (pow.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (/.f64 #s(literal 3 binary64) #s(literal 2 binary64))))
(*.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) (neg.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64))))
(*.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (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)) (pow.f64 (sin.f64 ky) #s(literal 4 binary64)))
(*.f64 (sin.f64 ky) (*.f64 (sin.f64 ky) (pow.f64 (sin.f64 ky) #s(literal 4 binary64))))
(pow.f64 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (sin.f64 ky)) #s(literal 2 binary64))
(pow.f64 (*.f64 (sin.f64 ky) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) #s(literal 2 binary64))
(pow.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) #s(literal 3 binary64))
(neg.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))))
(neg.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) (pow.f64 (sin.f64 ky) #s(literal 4 binary64))))
(neg.f64 (pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 3 binary64)))
(exp.f64 (*.f64 (log.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) #s(literal 3 binary64)))
(+.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) #s(literal 1/2 binary64)) (*.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))))
(+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1 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)) (pow.f64 (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) #s(literal 2 binary64))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 ky) #s(literal 4 binary64))) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))) (pow.f64 (sin.f64 ky) #s(literal 4 binary64))))
(+.f64 (*.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1 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))) (*.f64 (pow.f64 (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))
#s(literal -1 binary64)
(sin.f64 kx)
#s(literal 6 binary64)
(*.f64 (pow.f64 (sin.f64 kx) #s(literal 6 binary64)) #s(literal 1 binary64))
(*.f64 (pow.f64 (sin.f64 kx) (/.f64 #s(literal 6 binary64) #s(literal 2 binary64))) (pow.f64 (sin.f64 kx) (/.f64 #s(literal 6 binary64) #s(literal 2 binary64))))
(*.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 kx) #s(literal 6 binary64)))
(*.f64 (neg.f64 (pow.f64 (sin.f64 kx) #s(literal 6 binary64))) #s(literal -1 binary64))
(*.f64 #s(literal -1 binary64) (neg.f64 (pow.f64 (sin.f64 kx) #s(literal 6 binary64))))
(pow.f64 (sin.f64 kx) #s(literal 6 binary64))
(neg.f64 (neg.f64 (pow.f64 (sin.f64 kx) #s(literal 6 binary64))))
(exp.f64 (*.f64 (log.f64 (sin.f64 kx)) #s(literal 6 binary64)))
(*.f64 (pow.f64 (sin.f64 kx) #s(literal 6 binary64)) #s(literal -1 binary64))
(*.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 kx) #s(literal 6 binary64)))
(neg.f64 (pow.f64 (sin.f64 kx) #s(literal 6 binary64)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 6 binary64)) (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 (-.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) (/.f64 (neg.f64 (pow.f64 (sin.f64 kx) #s(literal 6 binary64))) (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 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) #s(literal 3 binary64)))
(/.f64 (-.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 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 6 binary64)) (pow.f64 (sin.f64 kx) #s(literal 6 binary64)))) (-.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 (sin.f64 kx) #s(literal 6 binary64))))
(/.f64 (+.f64 (pow.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) #s(literal 3 binary64)) #s(literal 3 binary64)) (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 6 binary64)) #s(literal 3 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 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (-.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 6 binary64)) (pow.f64 (sin.f64 kx) #s(literal 6 binary64))) (*.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 (sin.f64 kx) #s(literal 6 binary64))))))
(/.f64 (-.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 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (*.f64 (neg.f64 (pow.f64 (sin.f64 kx) #s(literal 6 binary64))) (neg.f64 (pow.f64 (sin.f64 kx) #s(literal 6 binary64))))) (+.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (neg.f64 (pow.f64 (sin.f64 kx) #s(literal 6 binary64)))))
(/.f64 (-.f64 (pow.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) #s(literal 3 binary64)) #s(literal 3 binary64)) (pow.f64 (neg.f64 (pow.f64 (sin.f64 kx) #s(literal 6 binary64))) #s(literal 3 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 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 (neg.f64 (pow.f64 (sin.f64 kx) #s(literal 6 binary64))) (neg.f64 (pow.f64 (sin.f64 kx) #s(literal 6 binary64)))) (*.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (neg.f64 (pow.f64 (sin.f64 kx) #s(literal 6 binary64)))))))
(neg.f64 (-.f64 (neg.f64 (pow.f64 (sin.f64 kx) #s(literal 6 binary64))) (pow.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) #s(literal 3 binary64))))
(-.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (neg.f64 (pow.f64 (sin.f64 kx) #s(literal 6 binary64))))
(+.f64 (pow.f64 (sin.f64 kx) #s(literal 6 binary64)) (pow.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) #s(literal 3 binary64)))
(+.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 (sin.f64 kx) #s(literal 6 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 (neg.f64 (neg.f64 (sin.f64 kx))) (neg.f64 (neg.f64 (sin.f64 kx))))
(*.f64 (neg.f64 (neg.f64 (sin.f64 kx))) (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 (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 (fabs.f64 (sin.f64 kx)) (fabs.f64 (sin.f64 kx)))
(*.f64 (sin.f64 kx) (neg.f64 (neg.f64 (sin.f64 kx))))
(*.f64 (sin.f64 kx) (sin.f64 kx))
(*.f64 (neg.f64 (sin.f64 kx)) (neg.f64 (sin.f64 kx)))
(pow.f64 (sin.f64 kx) #s(literal 2 binary64))
(pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) kx)) (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) kx)))) (cos.f64 (-.f64 (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) kx)) (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) kx))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) kx)) (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) kx)))) (cos.f64 (-.f64 (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) kx)) (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) kx))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) kx)) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) kx))) (cos.f64 (-.f64 (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) kx)) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) kx)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) kx)) (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) kx)))) (cos.f64 (-.f64 (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) kx)) (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) kx))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) kx)) (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) kx)))) (cos.f64 (-.f64 (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) kx)) (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) kx))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) kx)) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) kx))) (cos.f64 (-.f64 (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) kx)) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) kx)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) kx) (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) kx)))) (cos.f64 (-.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) kx) (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) kx))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) kx) (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) kx)))) (cos.f64 (-.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) kx) (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) kx))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) kx) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) kx) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) kx) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) kx) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) kx) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 kx))) (cos.f64 (+.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) kx) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 kx)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) kx) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (PI.f64) kx))) (cos.f64 (+.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) kx) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (PI.f64) kx)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (neg.f64 kx) (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) kx) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (neg.f64 kx) (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) kx) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (PI.f64) kx) (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) kx) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (+.f64 (PI.f64) kx) (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) kx) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) kx) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) kx)))) (sin.f64 (+.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) kx) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) kx))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) kx) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) kx)))) (sin.f64 (+.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) kx) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) kx))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) kx) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) kx))) (sin.f64 (+.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) kx) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) kx)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (neg.f64 kx) (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) kx)))) (sin.f64 (+.f64 (neg.f64 kx) (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) kx))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (neg.f64 kx) (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) kx)))) (sin.f64 (+.f64 (neg.f64 kx) (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) kx))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (PI.f64) kx) (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) kx)))) (sin.f64 (+.f64 (+.f64 (PI.f64) kx) (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) kx))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (PI.f64) kx) (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) kx)))) (sin.f64 (+.f64 (+.f64 (PI.f64) kx) (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) 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 #s(literal 2 binary64) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) kx))) (sin.f64 (+.f64 (neg.f64 kx) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) kx)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (neg.f64 kx) (+.f64 (PI.f64) kx))) (cos.f64 (+.f64 (neg.f64 kx) (+.f64 (PI.f64) kx)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (PI.f64) kx) (neg.f64 kx))) (cos.f64 (+.f64 (+.f64 (PI.f64) kx) (neg.f64 kx)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (PI.f64) kx) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) kx))) (sin.f64 (+.f64 (+.f64 (PI.f64) kx) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) kx)))) #s(literal 2 binary64))
(134-z0z1z2z3z4 (neg.f64 (sin.f64 kx)) (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 kx) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (sin.f64 kx))
(134-z0z1z2z3z4 (neg.f64 (sin.f64 kx)) (cos.f64 kx) (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (sin.f64 kx) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(134-z0z1z2z3z4 (neg.f64 (sin.f64 kx)) (sin.f64 kx) (cos.f64 (neg.f64 (PI.f64))) (cos.f64 kx) (sin.f64 (neg.f64 (PI.f64))))
(neg.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))
(neg.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))
(-.f64 #s(literal 1 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 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) 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)))
(sqrt.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64)))
(fabs.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))
(fabs.f64 (neg.f64 (-.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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) kx))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (fabs.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) 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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) kx)))))
(*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) (sin.f64 kx)) (neg.f64 (sin.f64 kx)))
(*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (sin.f64 ky)) (sin.f64 ky))
(*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) (neg.f64 (sin.f64 kx))) (sin.f64 kx))
(*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (sin.f64 kx)) (sin.f64 kx))
(*.f64 (neg.f64 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (neg.f64 (sin.f64 kx)))) (sin.f64 kx))
(*.f64 (*.f64 (sin.f64 kx) (sin.f64 ky)) (*.f64 (sin.f64 kx) (sin.f64 ky)))
(*.f64 (*.f64 (sin.f64 ky) (sin.f64 kx)) (*.f64 (sin.f64 ky) (sin.f64 kx)))
(*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (neg.f64 (sin.f64 kx))) (neg.f64 (sin.f64 kx)))
(*.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 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 ky ky))) #s(literal 1/2 binary64)))
(*.f64 (sin.f64 kx) (*.f64 (sin.f64 kx) (*.f64 (-.f64 #s(literal 1 binary64) (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 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))
(*.f64 (neg.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 ky ky)))))
(*.f64 (sin.f64 ky) (*.f64 (sin.f64 ky) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))
(pow.f64 (*.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal 2 binary64))
(pow.f64 (*.f64 (sin.f64 ky) (sin.f64 kx)) #s(literal 2 binary64))
(134-z0z1z2z3z4 (*.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) (sin.f64 kx)) (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 kx) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (sin.f64 kx))
(134-z0z1z2z3z4 (*.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) (sin.f64 kx)) (cos.f64 kx) (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (sin.f64 kx) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(134-z0z1z2z3z4 (*.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) (sin.f64 kx)) (sin.f64 kx) (cos.f64 (neg.f64 (PI.f64))) (cos.f64 kx) (sin.f64 (neg.f64 (PI.f64))))
(134-z0z1z2z3z4 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (neg.f64 (sin.f64 kx))) (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 kx) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (sin.f64 kx))
(134-z0z1z2z3z4 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (neg.f64 (sin.f64 kx))) (cos.f64 kx) (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (sin.f64 kx) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(134-z0z1z2z3z4 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (neg.f64 (sin.f64 kx))) (sin.f64 kx) (cos.f64 (neg.f64 (PI.f64))) (cos.f64 kx) (sin.f64 (neg.f64 (PI.f64))))
(neg.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 (cos.f64 (+.f64 kx kx)) #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 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #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) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))
(*.f64 (*.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (sin.f64 ky)) (sin.f64 ky))
(*.f64 (*.f64 #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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))
(*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (sin.f64 kx)) (neg.f64 (sin.f64 kx)))
(*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (neg.f64 (sin.f64 kx))) (sin.f64 kx))
(*.f64 (*.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 ky ky))) #s(literal 1/2 binary64))) #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 (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 (-.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) (*.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 (sin.f64 kx) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (neg.f64 (sin.f64 kx))))
(*.f64 #s(literal -1 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 ky ky))) #s(literal 1/2 binary64))))
(*.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 kx kx)) #s(literal 1/2 binary64)))))
(*.f64 (neg.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 ky ky))) #s(literal 1/2 binary64)))
(*.f64 (neg.f64 (sin.f64 kx)) (*.f64 (sin.f64 kx) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))
(*.f64 (sin.f64 ky) (*.f64 (sin.f64 ky) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))
(134-z0z1z2z3z4 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (sin.f64 kx)) (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 kx) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (sin.f64 kx))
(134-z0z1z2z3z4 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (sin.f64 kx)) (cos.f64 kx) (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (sin.f64 kx) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(134-z0z1z2z3z4 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (sin.f64 kx)) (sin.f64 kx) (cos.f64 (neg.f64 (PI.f64))) (cos.f64 kx) (sin.f64 (neg.f64 (PI.f64))))
(neg.f64 (*.f64 (*.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 ky ky))) #s(literal 1/2 binary64))) #s(literal 1 binary64)))
(neg.f64 (*.f64 #s(literal 1 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 ky ky))) #s(literal 1/2 binary64)))))
(neg.f64 (*.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 ky ky))) #s(literal 1/2 binary64))))
(+.f64 (*.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64)) (*.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))
#s(literal 4 binary64)
(*.f64 (pow.f64 (sin.f64 kx) (/.f64 #s(literal 4 binary64) #s(literal 2 binary64))) (pow.f64 (sin.f64 kx) (/.f64 #s(literal 4 binary64) #s(literal 2 binary64))))
(pow.f64 (sin.f64 kx) #s(literal 4 binary64))
(exp.f64 (*.f64 (log.f64 (sin.f64 kx)) #s(literal 4 binary64)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1 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)) (sin.f64 ky)) (sin.f64 ky))
(*.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (pow.f64 (*.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 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 (pow.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (/.f64 #s(literal 2 binary64) #s(literal 2 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 ky ky)))))
(*.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 (sin.f64 ky) (*.f64 (sin.f64 ky) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))
(pow.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64))
(pow.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) #s(literal 2 binary64))
(pow.f64 (sin.f64 ky) #s(literal 4 binary64))
(/.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (*.f64 (pow.f64 (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) #s(literal 2 binary64)))) (-.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (pow.f64 (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) #s(literal 2 binary64))))
(/.f64 (+.f64 (pow.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (pow.f64 (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) #s(literal 2 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (-.f64 (*.f64 (pow.f64 (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (*.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (pow.f64 (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) #s(literal 2 binary64))))))
(neg.f64 (neg.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64))))
(-.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (neg.f64 (pow.f64 (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) #s(literal 2 binary64))))
(-.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) #s(literal 2 binary64))))
(fabs.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)))
(exp.f64 (*.f64 (log.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) #s(literal 2 binary64)))
(+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) #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) (cos.f64 (+.f64 ky ky)))))
(+.f64 (*.f64 #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) (cos.f64 (+.f64 ky ky))) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))
(+.f64 (+.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))))) (pow.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 2 binary64)))
(+.f64 (pow.f64 (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))
(+.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (pow.f64 (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) #s(literal 2 binary64)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 (sin.f64 ky) #s(literal 4 binary64)))) (pow.f64 (sin.f64 ky) #s(literal 4 binary64)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64))) (pow.f64 (sin.f64 kx) #s(literal 4 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 4 binary64)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 4 binary64)))
(/.f64 (-.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 ky) #s(literal 4 binary64))) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 binary64)))) (-.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 binary64))))
(/.f64 (-.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 binary64))) (*.f64 (neg.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64))) (neg.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64))))) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (neg.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)))))
(/.f64 (+.f64 (pow.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) #s(literal 3 binary64)) (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 ky) #s(literal 4 binary64))) (-.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 binary64))) (*.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 binary64))))))
(/.f64 (-.f64 (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) #s(literal 3 binary64)) (pow.f64 (neg.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64))) #s(literal 3 binary64))) (+.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 binary64))) (+.f64 (*.f64 (neg.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64))) (neg.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)))) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (neg.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)))))))
(/.f64 (-.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 binary64))) (*.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 ky) #s(literal 4 binary64)))) (-.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 (sin.f64 ky) #s(literal 4 binary64))))
(/.f64 (+.f64 (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) #s(literal 3 binary64)) (pow.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 binary64))) (-.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 ky) #s(literal 4 binary64))) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 (sin.f64 ky) #s(literal 4 binary64))))))
(neg.f64 (neg.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 binary64)))))
(-.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (neg.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64))))
(-.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (neg.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64))))
(+.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (pow.f64 (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) #s(literal 2 binary64)))
(+.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (+.f64 (pow.f64 (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 binary64))))
(+.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 binary64)))
(+.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 (sin.f64 ky) #s(literal 4 binary64)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 4 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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 4 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 (cos.f64 (+.f64 kx kx)) #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 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (+.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 binary64))))) (+.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 binary64))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 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 (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 ky ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 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 (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 ky ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))
(/.f64 (-.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 4 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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 4 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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))) (*.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 ky) #s(literal 4 binary64)))) (-.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 4 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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))) (pow.f64 (sin.f64 ky) #s(literal 4 binary64))))
(/.f64 (-.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 binary64))) (+.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 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 (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 ky ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))) (-.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))
(/.f64 (-.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 (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 ky ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))) (*.f64 (neg.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 binary64)))) (neg.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (neg.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 binary64))))))
(/.f64 (+.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 4 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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))) #s(literal 3 binary64)) (pow.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 4 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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 4 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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))) (-.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 ky) #s(literal 4 binary64))) (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 4 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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))) (pow.f64 (sin.f64 ky) #s(literal 4 binary64))))))
(/.f64 (+.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #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 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal 3 binary64))) (+.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 binary64))) (+.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #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 (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 ky ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))) (*.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))))
(/.f64 (-.f64 (pow.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (neg.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #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 #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 ky ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))) (+.f64 (*.f64 (neg.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 binary64)))) (neg.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (neg.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #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 #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 ky ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))) (*.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 binary64))) (+.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (+.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 binary64)))))
(/.f64 (+.f64 (pow.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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #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 #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 ky ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))) (-.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 binary64))) (+.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (+.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 binary64)))))))
(neg.f64 (-.f64 (neg.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))
(-.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 4 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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))) (neg.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64))))
(-.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))
(-.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 binary64))) (*.f64 #s(literal 1 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 ky ky))) #s(literal 1/2 binary64)))))
(-.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 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 ky ky))) #s(literal 1/2 binary64))))
(-.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (-.f64 (neg.f64 (pow.f64 (sin.f64 ky) #s(literal 4 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 (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 ky ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (neg.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 binary64)))))
(+.f64 (+.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 4 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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (pow.f64 (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) #s(literal 2 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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (pow.f64 (sin.f64 ky) #s(literal 4 binary64))) (pow.f64 (sin.f64 kx) #s(literal 4 binary64)))
(+.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 4 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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))) (pow.f64 (sin.f64 ky) #s(literal 4 binary64)))
(+.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))
(+.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 4 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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))
(+.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (+.f64 (pow.f64 (sin.f64 ky) #s(literal 4 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 (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 ky ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (+.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 binary64))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (/.f64 (pow.f64 (sin.f64 kx) #s(literal 6 binary64)) (-.f64 (neg.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))) (/.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (+.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))))) (/.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (+.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))))
(*.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 6 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 (neg.f64 (pow.f64 (sin.f64 kx) #s(literal 6 binary64))) (pow.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 (neg.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))))
(*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 6 binary64)) (pow.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))))
(/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 6 binary64)) (pow.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) #s(literal 3 binary64))) #s(literal 1 binary64)) (+.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))
(/.f64 (-.f64 (*.f64 (/.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (+.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))) (+.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))) (neg.f64 (pow.f64 (sin.f64 kx) #s(literal 6 binary64)))) (+.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))
(/.f64 (-.f64 (*.f64 (/.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (+.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))) (/.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (+.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))) (*.f64 (/.f64 (pow.f64 (sin.f64 kx) #s(literal 6 binary64)) (-.f64 (neg.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 6 binary64)) (-.f64 (neg.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 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 (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)) (+.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 6 binary64)) (-.f64 (neg.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (+.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))) #s(literal 3 binary64)) (pow.f64 (/.f64 (pow.f64 (sin.f64 kx) #s(literal 6 binary64)) (-.f64 (neg.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (+.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))) (/.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (+.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))) (+.f64 (*.f64 (/.f64 (pow.f64 (sin.f64 kx) #s(literal 6 binary64)) (-.f64 (neg.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 6 binary64)) (-.f64 (neg.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 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 (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)) (+.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 6 binary64)) (-.f64 (neg.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))))))
(/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (+.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))) (*.f64 (+.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))) (neg.f64 (pow.f64 (sin.f64 kx) #s(literal 6 binary64))))) (*.f64 (+.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))) (+.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))))
(/.f64 (-.f64 (neg.f64 (pow.f64 (sin.f64 kx) #s(literal 6 binary64))) (pow.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (-.f64 (neg.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (neg.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))) (-.f64 (neg.f64 (pow.f64 (sin.f64 kx) #s(literal 6 binary64))) (pow.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 6 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 (pow.f64 (sin.f64 kx) #s(literal 6 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 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))) (*.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (sin.f64 ky)) (sin.f64 ky) (pow.f64 (sin.f64 kx) #s(literal 6 binary64)) #s(literal -1 binary64))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))) (*.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (sin.f64 ky)) (sin.f64 ky) #s(literal -1 binary64) (pow.f64 (sin.f64 kx) #s(literal 6 binary64)))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 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 (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 ky ky)))) (sin.f64 ky)) (*.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) (sin.f64 ky)) (pow.f64 (sin.f64 kx) #s(literal 6 binary64)) #s(literal -1 binary64))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 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 (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 ky ky)))) (sin.f64 ky)) (*.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) (sin.f64 ky)) #s(literal -1 binary64) (pow.f64 (sin.f64 kx) #s(literal 6 binary64)))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))) (*.f64 (sin.f64 ky) (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (*.f64 (sin.f64 ky) (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (pow.f64 (sin.f64 kx) #s(literal 6 binary64)) #s(literal -1 binary64))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))) (*.f64 (sin.f64 ky) (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) (*.f64 (sin.f64 ky) (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal -1 binary64) (pow.f64 (sin.f64 kx) #s(literal 6 binary64)))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))) (pow.f64 (sin.f64 ky) #s(literal 3 binary64)) (pow.f64 (sin.f64 ky) #s(literal 3 binary64)) (pow.f64 (sin.f64 kx) #s(literal 6 binary64)) #s(literal -1 binary64))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))) (pow.f64 (sin.f64 ky) #s(literal 3 binary64)) (pow.f64 (sin.f64 ky) #s(literal 3 binary64)) #s(literal -1 binary64) (pow.f64 (sin.f64 kx) #s(literal 6 binary64)))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 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 (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)) (sin.f64 ky)) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (sin.f64 ky)) (pow.f64 (sin.f64 kx) #s(literal 6 binary64)) #s(literal -1 binary64))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 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 (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)) (sin.f64 ky)) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (sin.f64 ky)) #s(literal -1 binary64) (pow.f64 (sin.f64 kx) #s(literal 6 binary64)))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))) (*.f64 (sin.f64 ky) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (*.f64 (sin.f64 ky) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (pow.f64 (sin.f64 kx) #s(literal 6 binary64)) #s(literal -1 binary64))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))) (*.f64 (sin.f64 ky) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (*.f64 (sin.f64 ky) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) #s(literal -1 binary64) (pow.f64 (sin.f64 kx) #s(literal 6 binary64)))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))) (neg.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64))) (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) (pow.f64 (sin.f64 kx) #s(literal 6 binary64)) #s(literal -1 binary64))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))) (neg.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64))) (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal -1 binary64) (pow.f64 (sin.f64 kx) #s(literal 6 binary64)))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 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 (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)))) (neg.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64))) (pow.f64 (sin.f64 kx) #s(literal 6 binary64)) #s(literal -1 binary64))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 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 (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)))) (neg.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64))) #s(literal -1 binary64) (pow.f64 (sin.f64 kx) #s(literal 6 binary64)))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))) (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 6 binary64)) #s(literal -1 binary64))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))) (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) #s(literal -1 binary64) (pow.f64 (sin.f64 kx) #s(literal 6 binary64)))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 6 binary64)) #s(literal -1 binary64))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) #s(literal -1 binary64) (pow.f64 (sin.f64 kx) #s(literal 6 binary64)))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))) (sin.f64 ky) (*.f64 (sin.f64 ky) (pow.f64 (sin.f64 ky) #s(literal 4 binary64))) (pow.f64 (sin.f64 kx) #s(literal 6 binary64)) #s(literal -1 binary64))
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))) (sin.f64 ky) (*.f64 (sin.f64 ky) (pow.f64 (sin.f64 ky) #s(literal 4 binary64))) #s(literal -1 binary64) (pow.f64 (sin.f64 kx) #s(literal 6 binary64)))
(neg.f64 (*.f64 (-.f64 (neg.f64 (pow.f64 (sin.f64 kx) #s(literal 6 binary64))) (pow.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))))
(neg.f64 (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 6 binary64)) (pow.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (-.f64 (neg.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))))
(neg.f64 (/.f64 (-.f64 (neg.f64 (pow.f64 (sin.f64 kx) #s(literal 6 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 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))))
(neg.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 kx) #s(literal 6 binary64)) (-.f64 (neg.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))) (/.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (+.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 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 (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)) (+.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 6 binary64)) (-.f64 (neg.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 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 (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)) (+.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))) (neg.f64 (/.f64 (pow.f64 (sin.f64 kx) #s(literal 6 binary64)) (-.f64 (neg.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 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 (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)) (+.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 6 binary64)) (+.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))))
#s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 6 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 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))))
(*.f64 (pow.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 6 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 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))) (pow.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 6 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 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))))
(pow.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 6 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 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))) #s(literal 1/2 binary64))
(sqrt.f64 (*.f64 (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 6 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 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 6 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 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))))))
(sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 6 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 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))))
(fabs.f64 (neg.f64 (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 6 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 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))))))
(fabs.f64 (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 6 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 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))))))
(exp.f64 (*.f64 (log.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 6 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 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))))) #s(literal 1/2 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 6 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 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))))) (sin.f64 ky))
(*.f64 (neg.f64 (sin.f64 ky)) (/.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 6 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 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))))))))
(*.f64 (sin.f64 ky) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 6 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 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))))))
(/.f64 (neg.f64 (neg.f64 (sin.f64 ky))) (neg.f64 (neg.f64 (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 6 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 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))))))))
(/.f64 (neg.f64 (sin.f64 ky)) (neg.f64 (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 6 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 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 6 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 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))))) (neg.f64 (sin.f64 ky))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 6 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 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))))) (sin.f64 ky)))
(/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 6 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 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))))))
(neg.f64 (/.f64 (sin.f64 ky) (neg.f64 (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 6 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 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))))))))
(neg.f64 (/.f64 (neg.f64 (sin.f64 ky)) (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 6 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 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))))))
th
(sin.f64 th)
(*.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 6 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 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))))))
(*.f64 (sin.f64 th) (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 6 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 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))))))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 6 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 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))))) (sin.f64 th))
(*.f64 (sin.f64 ky) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 6 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 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))))) (sin.f64 th)))
(*.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 6 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 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))))))
(/.f64 (*.f64 (sin.f64 th) (neg.f64 (sin.f64 ky))) (neg.f64 (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 6 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 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))))))
(/.f64 (*.f64 (neg.f64 (sin.f64 ky)) (sin.f64 th)) (neg.f64 (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 6 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 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))))))
(/.f64 (neg.f64 (*.f64 (sin.f64 th) (sin.f64 ky))) (neg.f64 (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 6 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 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))))))
(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 6 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 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 6 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 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))))) (*.f64 (sin.f64 th) (sin.f64 ky))))
(*.f64 th ky)
(*.f64 ky th)
#s(approx (* ky (sin th)) (*.f64 th ky))
(*.f64 (/.f64 #s(literal 1 binary64) kx) #s(approx (* ky (sin th)) (*.f64 th ky)))
(*.f64 (neg.f64 #s(approx (* ky (sin th)) (*.f64 th ky))) (/.f64 #s(literal 1 binary64) (neg.f64 kx)))
(*.f64 #s(approx (* ky (sin th)) (*.f64 th ky)) (/.f64 #s(literal 1 binary64) kx))
(/.f64 (*.f64 #s(approx (* ky (sin th)) (*.f64 th ky)) #s(literal 1 binary64)) kx)
(/.f64 (neg.f64 (neg.f64 #s(approx (* ky (sin th)) (*.f64 th ky)))) (neg.f64 (neg.f64 kx)))
(/.f64 (neg.f64 #s(approx (* ky (sin th)) (*.f64 th ky))) (neg.f64 kx))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 kx) (neg.f64 #s(approx (* ky (sin th)) (*.f64 th ky)))))
(/.f64 #s(literal 1 binary64) (/.f64 kx #s(approx (* ky (sin th)) (*.f64 th ky))))
(/.f64 #s(approx (* ky (sin th)) (*.f64 th ky)) kx)
(neg.f64 (/.f64 #s(approx (* ky (sin th)) (*.f64 th ky)) (neg.f64 kx)))
(neg.f64 (/.f64 (neg.f64 #s(approx (* ky (sin th)) (*.f64 th ky))) kx))
#s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 #s(approx (* ky (sin th)) (*.f64 th ky)) kx))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 #s(approx (* ky (sin th)) (*.f64 th ky)) kx)))
#s(literal 1 binary64)
(*.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))))
(*.f64 (sqrt.f64 (sin.f64 kx)) (sqrt.f64 (sin.f64 kx)))
(*.f64 (pow.f64 (sin.f64 kx) #s(literal 1/2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 1/2 binary64)))
(pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))
(sin.f64 (acos.f64 (fabs.f64 (cos.f64 kx))))
(sin.f64 (acos.f64 (neg.f64 (cos.f64 kx))))
(sin.f64 (acos.f64 (cos.f64 kx)))
(sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))
(fabs.f64 (neg.f64 (neg.f64 (sin.f64 kx))))
(fabs.f64 (neg.f64 (fabs.f64 (sin.f64 kx))))
(fabs.f64 (fabs.f64 (sin.f64 kx)))
(fabs.f64 (sin.f64 kx))
(fabs.f64 (neg.f64 (sin.f64 kx)))
(cos.f64 (asin.f64 (fabs.f64 (cos.f64 kx))))
(cos.f64 (asin.f64 (neg.f64 (cos.f64 kx))))
(cos.f64 (asin.f64 (cos.f64 kx)))
(exp.f64 (*.f64 (log.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64)))
(*.f64 (sin.f64 th) ky)
(*.f64 ky (sin.f64 th))
(*.f64 (/.f64 (fabs.f64 (sin.f64 kx)) (sin.f64 th)) (/.f64 #s(literal 1 binary64) ky))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 th) ky)) (fabs.f64 (sin.f64 kx)))
(*.f64 (neg.f64 (fabs.f64 (sin.f64 kx))) (/.f64 #s(literal 1 binary64) (*.f64 (neg.f64 ky) (sin.f64 th))))
(*.f64 (fabs.f64 (sin.f64 kx)) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 th) ky)))
(/.f64 (*.f64 (fabs.f64 (sin.f64 kx)) #s(literal 1 binary64)) (*.f64 (sin.f64 th) ky))
(/.f64 (/.f64 (fabs.f64 (sin.f64 kx)) ky) (sin.f64 th))
(/.f64 (neg.f64 (/.f64 (fabs.f64 (sin.f64 kx)) (sin.f64 th))) (neg.f64 ky))
(/.f64 (neg.f64 (neg.f64 (fabs.f64 (sin.f64 kx)))) (neg.f64 (*.f64 (neg.f64 ky) (sin.f64 th))))
(/.f64 (/.f64 (fabs.f64 (sin.f64 kx)) (sin.f64 th)) ky)
(/.f64 (neg.f64 (fabs.f64 (sin.f64 kx))) (*.f64 (neg.f64 ky) (sin.f64 th)))
(/.f64 (fabs.f64 (sin.f64 kx)) (*.f64 (sin.f64 th) ky))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 (sin.f64 kx))))
(neg.f64 (/.f64 (neg.f64 (fabs.f64 (sin.f64 kx))) (*.f64 (sin.f64 th) ky)))
(*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))) (sin.f64 th)) ky)
(*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))) ky) (sin.f64 th))
(*.f64 (*.f64 #s(literal 1 binary64) (*.f64 (sin.f64 th) ky)) (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))))
(*.f64 (*.f64 #s(literal 1 binary64) ky) (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx))))
(*.f64 (/.f64 #s(literal 1 binary64) (neg.f64 (fabs.f64 (sin.f64 kx)))) (*.f64 (neg.f64 ky) (sin.f64 th)))
(*.f64 (pow.f64 (/.f64 (fabs.f64 (sin.f64 kx)) (*.f64 (sin.f64 th) ky)) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 (fabs.f64 (sin.f64 kx)) (*.f64 (sin.f64 th) ky)) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64))))
(*.f64 (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx))) ky)
(*.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 th) ky)) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))) (*.f64 (sin.f64 th) ky))
(*.f64 (*.f64 (neg.f64 ky) (sin.f64 th)) (/.f64 #s(literal 1 binary64) (neg.f64 (fabs.f64 (sin.f64 kx)))))
(*.f64 (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 (sin.f64 kx))) #s(literal 1 binary64))
(*.f64 (*.f64 (sin.f64 th) ky) (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))))
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 (sin.f64 kx))))
(*.f64 (sin.f64 th) (*.f64 ky (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx)))))
(*.f64 (sin.f64 th) (/.f64 ky (fabs.f64 (sin.f64 kx))))
(*.f64 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (fabs.f64 (sin.f64 kx))) (*.f64 (sin.f64 th) ky))))
(*.f64 ky (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx))))
(pow.f64 (/.f64 (fabs.f64 (sin.f64 kx)) (*.f64 (sin.f64 th) ky)) #s(literal -1 binary64))
(/.f64 (*.f64 (*.f64 (sin.f64 th) ky) #s(literal 1 binary64)) (fabs.f64 (sin.f64 kx)))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (neg.f64 ky) (sin.f64 th))) (neg.f64 (fabs.f64 (sin.f64 kx))))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (sin.f64 th) ky)) (fabs.f64 (sin.f64 kx)))
(/.f64 (neg.f64 (*.f64 (neg.f64 ky) (sin.f64 th))) (neg.f64 (neg.f64 (fabs.f64 (sin.f64 kx)))))
(/.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 th) ky)))
(/.f64 (*.f64 (neg.f64 ky) (sin.f64 th)) (neg.f64 (fabs.f64 (sin.f64 kx))))
(/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 (sin.f64 kx)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (neg.f64 (fabs.f64 (sin.f64 kx))) (*.f64 (sin.f64 th) ky)) #s(literal -1 binary64)))
(/.f64 #s(literal 1 binary64) (pow.f64 (/.f64 (fabs.f64 (sin.f64 kx)) (*.f64 (sin.f64 th) ky)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (fabs.f64 (sin.f64 kx)) (*.f64 (sin.f64 th) ky)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (fabs.f64 (sin.f64 kx)) (*.f64 (sin.f64 th) ky)))
(/.f64 #s(literal -1 binary64) (/.f64 (neg.f64 (fabs.f64 (sin.f64 kx))) (*.f64 (sin.f64 th) ky)))
(/.f64 ky (/.f64 (fabs.f64 (sin.f64 kx)) (sin.f64 th)))
(neg.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 (sin.f64 kx)))))
(neg.f64 (/.f64 (*.f64 (sin.f64 th) ky) (neg.f64 (fabs.f64 (sin.f64 kx)))))
(neg.f64 (/.f64 (*.f64 (neg.f64 ky) (sin.f64 th)) (fabs.f64 (sin.f64 kx))))
(neg.f64 (/.f64 #s(literal -1 binary64) (/.f64 (fabs.f64 (sin.f64 kx)) (*.f64 (sin.f64 th) ky))))
(neg.f64 (/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (fabs.f64 (sin.f64 kx))) (*.f64 (sin.f64 th) ky))))
(exp.f64 (*.f64 (log.f64 (/.f64 (fabs.f64 (sin.f64 kx)) (*.f64 (sin.f64 th) ky))) #s(literal -1 binary64)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 (sin.f64 kx))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (neg.f64 ky) ky)) ky)
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 ky ky)) ky)
(*.f64 #s(literal 2 binary64) ky)
(*.f64 ky #s(literal 2 binary64))
(/.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 (*.f64 ky #s(literal 1 binary64)) (*.f64 ky #s(literal 1 binary64)))
(+.f64 (*.f64 #s(literal 1 binary64) ky) (*.f64 #s(literal 1 binary64) 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)))) (pow.f64 (sin.f64 ky) #s(literal 4 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 (pow.f64 (sin.f64 ky) #s(literal 4 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 (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 ky (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 ky)))
(sin.f64 (+.f64 (+.f64 ky (*.f64 (PI.f64) #s(literal 1/2 binary64))) ky))
(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 (cos.f64 (*.f64 ky #s(literal 1 binary64))) (cos.f64 (*.f64 ky #s(literal 1 binary64)))) (*.f64 (sin.f64 (*.f64 ky #s(literal 1 binary64))) (sin.f64 (*.f64 ky #s(literal 1 binary64)))))
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1 binary64) ky)) (cos.f64 (*.f64 #s(literal 1 binary64) ky))) (*.f64 (sin.f64 (*.f64 #s(literal 1 binary64) ky)) (sin.f64 (*.f64 #s(literal 1 binary64) 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 (+.f64 ky ky)) (cos.f64 (neg.f64 (*.f64 (PI.f64) #s(literal 1/2 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 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #s(literal 1/2 binary64)) (*.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 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #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)) (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 (fabs.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 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/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 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) (+.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 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))
(*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (cos.f64 (*.f64 ky #s(literal 1 binary64))) (cos.f64 (*.f64 ky #s(literal 1 binary64))) (sin.f64 (*.f64 ky #s(literal 1 binary64))) (sin.f64 (*.f64 ky #s(literal 1 binary64))))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1 binary64) ky)) (cos.f64 (*.f64 #s(literal 1 binary64) ky)) (sin.f64 (*.f64 #s(literal 1 binary64) ky)) (sin.f64 (*.f64 #s(literal 1 binary64) ky)))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (fabs.f64 (cos.f64 ky)) (fabs.f64 (cos.f64 ky)) (sin.f64 (fabs.f64 ky)) (sin.f64 (fabs.f64 ky)))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (fabs.f64 (cos.f64 ky)) (fabs.f64 (cos.f64 ky)) (neg.f64 (sin.f64 ky)) (neg.f64 (sin.f64 ky)))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (fabs.f64 (cos.f64 ky)) (fabs.f64 (cos.f64 ky)) (fabs.f64 (sin.f64 ky)) (fabs.f64 (sin.f64 ky)))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (fabs.f64 (cos.f64 ky)) (fabs.f64 (cos.f64 ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (fabs.f64 (cos.f64 ky)) (fabs.f64 (cos.f64 ky)) #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (fabs.f64 (cos.f64 ky)) (fabs.f64 (cos.f64 ky)) (sin.f64 ky) (sin.f64 ky))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (neg.f64 (cos.f64 ky)) (neg.f64 (cos.f64 ky)) (sin.f64 (fabs.f64 ky)) (sin.f64 (fabs.f64 ky)))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (neg.f64 (cos.f64 ky)) (neg.f64 (cos.f64 ky)) (neg.f64 (sin.f64 ky)) (neg.f64 (sin.f64 ky)))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (neg.f64 (cos.f64 ky)) (neg.f64 (cos.f64 ky)) (fabs.f64 (sin.f64 ky)) (fabs.f64 (sin.f64 ky)))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (neg.f64 (cos.f64 ky)) (neg.f64 (cos.f64 ky)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (neg.f64 (cos.f64 ky)) (neg.f64 (cos.f64 ky)) #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (neg.f64 (cos.f64 ky)) (neg.f64 (cos.f64 ky)) (sin.f64 ky) (sin.f64 ky))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (sin.f64 (+.f64 ky ky)) (cos.f64 (neg.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (cos.f64 (+.f64 ky ky)) (sin.f64 (neg.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (cos.f64 ky) (cos.f64 (neg.f64 (neg.f64 ky))) (sin.f64 ky) (sin.f64 (neg.f64 (neg.f64 ky))))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (cos.f64 ky) (cos.f64 ky) (sin.f64 (fabs.f64 ky)) (sin.f64 (fabs.f64 ky)))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (cos.f64 ky) (cos.f64 ky) (neg.f64 (sin.f64 ky)) (neg.f64 (sin.f64 ky)))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (cos.f64 ky) (cos.f64 ky) (fabs.f64 (sin.f64 ky)) (fabs.f64 (sin.f64 ky)))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (cos.f64 ky) (cos.f64 ky) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (cos.f64 ky) (cos.f64 ky) #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (cos.f64 ky) (cos.f64 ky) (sin.f64 ky) (sin.f64 ky))
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (sin.f64 ky) (cos.f64 (-.f64 (neg.f64 ky) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (cos.f64 ky) (sin.f64 (-.f64 (neg.f64 ky) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))
(*.f64 (sin.f64 (fabs.f64 ky)) (sin.f64 (fabs.f64 ky)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) #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 (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 (neg.f64 (sin.f64 ky)) (neg.f64 (sin.f64 ky)))
(*.f64 (fabs.f64 (sin.f64 ky)) (fabs.f64 (sin.f64 ky)))
(*.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 ky ky))))
(*.f64 (sin.f64 ky) (sin.f64 ky))
(pow.f64 (sin.f64 ky) #s(literal 2 binary64))
(/.f64 (+.f64 (neg.f64 (cos.f64 (+.f64 ky ky))) (cos.f64 (-.f64 (+.f64 ky (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 ky (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 ky (PI.f64)) (+.f64 ky (PI.f64)))) (cos.f64 (+.f64 (+.f64 ky (PI.f64)) (+.f64 ky (PI.f64))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 ky (PI.f64)) (neg.f64 ky))) (cos.f64 (+.f64 (+.f64 ky (PI.f64)) (neg.f64 ky)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (neg.f64 ky) (+.f64 ky (PI.f64)))) (cos.f64 (+.f64 (neg.f64 ky) (+.f64 ky (PI.f64))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (neg.f64 ky) (neg.f64 ky))) (cos.f64 (+.f64 ky ky))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 ky (PI.f64)) (+.f64 ky (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (sin.f64 (+.f64 (+.f64 ky (PI.f64)) (+.f64 ky (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (neg.f64 (cos.f64 (+.f64 ky ky))) (sin.f64 (+.f64 (neg.f64 ky) (+.f64 ky (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (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 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 3 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))) (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))))))
(/.f64 (-.f64 (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)) (pow.f64 (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) #s(literal 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 (pow.f64 (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (cos.f64 (+.f64 ky ky))))))
(134-z0z1z2z3z4 (neg.f64 (sin.f64 ky)) (cos.f64 ky) (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (sin.f64 ky) (sin.f64 (*.f64 (PI.f64) #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) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 ky (PI.f64))))))
(-.f64 #s(literal 1/2 binary64) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)))))
(-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))
(sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)))
(fabs.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))
(fabs.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))
(exp.f64 (*.f64 (log.f64 (sin.f64 ky)) #s(literal 2 binary64)))
(+.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))
(*.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))) (pow.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))))
(*.f64 (sqrt.f64 (sin.f64 ky)) (sqrt.f64 (sin.f64 ky)))
(*.f64 (pow.f64 (sin.f64 ky) #s(literal 1/2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 1/2 binary64)))
(pow.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))
(sqrt.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))
(fabs.f64 (neg.f64 (fabs.f64 (sin.f64 ky))))
(fabs.f64 (fabs.f64 (sin.f64 ky)))
(fabs.f64 (sin.f64 ky))
(exp.f64 (*.f64 (log.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (fabs.f64 (sin.f64 ky)) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64))) (pow.f64 (fabs.f64 (sin.f64 ky)) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64))))
(*.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 ky))) #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 ky))))
(*.f64 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (neg.f64 (fabs.f64 (sin.f64 ky)))))
(pow.f64 (fabs.f64 (sin.f64 ky)) #s(literal -1 binary64))
(pow.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) #s(literal -1/2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (fabs.f64 (sin.f64 ky))) #s(literal -1 binary64)))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (fabs.f64 (sin.f64 ky)))))
(/.f64 #s(literal 1 binary64) (pow.f64 (fabs.f64 (sin.f64 ky)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (fabs.f64 (sin.f64 ky)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 ky)))
(/.f64 #s(literal -1 binary64) (neg.f64 (fabs.f64 (sin.f64 ky))))
(neg.f64 (*.f64 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 ky)))))
(neg.f64 (/.f64 #s(literal -1 binary64) (fabs.f64 (sin.f64 ky))))
(neg.f64 (/.f64 #s(literal 1 binary64) (neg.f64 (fabs.f64 (sin.f64 ky)))))
(exp.f64 (*.f64 (log.f64 (fabs.f64 (sin.f64 ky))) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 ky))) (sin.f64 ky))
(*.f64 #s(literal 1 binary64) (/.f64 (sin.f64 ky) (fabs.f64 (sin.f64 ky))))
(*.f64 (sin.f64 ky) (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 ky))))
(/.f64 (*.f64 #s(literal -1 binary64) (sin.f64 ky)) (neg.f64 (fabs.f64 (sin.f64 ky))))
(/.f64 (*.f64 (sin.f64 ky) #s(literal -1 binary64)) (neg.f64 (fabs.f64 (sin.f64 ky))))
(/.f64 (neg.f64 (sin.f64 ky)) (neg.f64 (fabs.f64 (sin.f64 ky))))
(/.f64 #s(literal 1 binary64) (/.f64 (fabs.f64 (sin.f64 ky)) (sin.f64 ky)))
(/.f64 (sin.f64 ky) (fabs.f64 (sin.f64 ky)))
(*.f64 (*.f64 (sin.f64 th) (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 ky)))) (sin.f64 ky))
(*.f64 (*.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 ky))))
(*.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 ky))))
(*.f64 (/.f64 (sin.f64 ky) (fabs.f64 (sin.f64 ky))) (sin.f64 th))
(*.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 ky))) (*.f64 (sin.f64 th) (sin.f64 ky)))
(*.f64 (sin.f64 th) (/.f64 (sin.f64 ky) (fabs.f64 (sin.f64 ky))))
(*.f64 (sin.f64 ky) (*.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 ky))) (sin.f64 th)))
(/.f64 (*.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) #s(literal 1 binary64)) (fabs.f64 (sin.f64 ky)))
(/.f64 (*.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) #s(literal -1 binary64)) (neg.f64 (fabs.f64 (sin.f64 ky))))
(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (fabs.f64 (sin.f64 ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 (sin.f64 ky) (fabs.f64 (sin.f64 ky))) (sin.f64 th)))
#s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))
(*.f64 (pow.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))) (pow.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))))
(pow.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))
(sqrt.f64 (*.f64 (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))) (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))))
(sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))
(fabs.f64 (neg.f64 (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))))
(fabs.f64 (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))
(exp.f64 (*.f64 (log.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))) #s(literal 1/2 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))) (sin.f64 ky))
(*.f64 (neg.f64 (sin.f64 ky)) (/.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))))
(*.f64 (sin.f64 ky) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))))
(/.f64 (neg.f64 (neg.f64 (sin.f64 ky))) (neg.f64 (neg.f64 (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))))
(/.f64 (neg.f64 (sin.f64 ky)) (neg.f64 (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))) (neg.f64 (sin.f64 ky))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))) (sin.f64 ky)))
(/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))
(neg.f64 (/.f64 (sin.f64 ky) (neg.f64 (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))))
(neg.f64 (/.f64 (neg.f64 (sin.f64 ky)) (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))))
(*.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))) (sin.f64 th))
(*.f64 (sin.f64 th) (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))))
(*.f64 (sin.f64 ky) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))) (sin.f64 th)))
(*.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))))
(/.f64 (*.f64 (sin.f64 th) (neg.f64 (sin.f64 ky))) (neg.f64 (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))))
(/.f64 (*.f64 (neg.f64 (sin.f64 ky)) (sin.f64 th)) (neg.f64 (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))))
(/.f64 (neg.f64 (*.f64 (sin.f64 th) (sin.f64 ky))) (neg.f64 (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))))
(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))) (*.f64 (sin.f64 th) (sin.f64 ky))))

eval3.3s (17.2%)

Memory
-389.7MiB live, 1 842.3MiB allocated; 3.9s collecting garbage
Samples
2.8s13 946×0valid
59.0ms902×0invalid
Compiler

Compiled 94 512 to 7 048 computations (92.5% saved)

Precisions
Click to see histograms. Total time spent on operations: 296.0ms
ival-mult!: 213.0ms (72.0% of total)
ival-sub!: 60.0ms (20.3% of total)
adjust: 23.0ms (7.8% of total)

prune89.0ms (0.5%)

Memory
-4.6MiB live, 134.0MiB allocated; 12ms collecting garbage
Pruning

71 alts after pruning (65 fresh and 6 done)

PrunedKeptTotal
New81927846
Fresh163854
Picked505
Done-363
Total83771908
Accuracy
100.0%
Counts
908 → 71
Alt Table
Click to see full alt table
StatusAccuracyProgram
77.1%
(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))))
77.2%
(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (+.f64 (134-z0z1z2z3z4 #s(literal 1/2 binary64) (cos.f64 ky) (cos.f64 ky) (-.f64 #s(literal 1 binary64) (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))))))
77.3%
(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))))
31.7%
(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))
76.8%
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 th) (sin.f64 ky))))
77.2%
(*.f64 (/.f64 (sin.f64 ky) (/.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (sqrt.f64 #s(literal 2 binary64)))) (sin.f64 th))
76.6%
(*.f64 (/.f64 (sin.f64 ky) (/.f64 (sqrt.f64 #s(literal 1 binary64)) (sqrt.f64 (/.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))) (sin.f64 th))
76.9%
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))) (sin.f64 th))
33.4%
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(approx (pow (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))) -1) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))) (sin.f64 th))
77.2%
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))) (sin.f64 th))
93.8%
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
86.9%
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))) (sin.f64 th))
45.3%
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (pow.f64 ky #s(literal 2 binary64)))))) (sin.f64 th))
41.5%
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 th))
80.5%
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (/.f64 (-.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 3 binary64)) (*.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 kx) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 (*.f64 (sin.f64 ky) (sin.f64 kx)) #s(literal 2 binary64))) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 2 binary64)))))))) (sin.f64 th))
31.8%
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))) (sin.f64 th))
31.9%
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))) (sin.f64 th))
17.5%
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) kx)))))))) (sin.f64 th))
77.2%
(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) (sin.f64 ky))) (sin.f64 th))
77.0%
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))) (*.f64 (sin.f64 th) (sin.f64 ky)))
77.1%
(*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))) (sin.f64 ky)) (sin.f64 th))
31.7%
(*.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))))
77.2%
(*.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))))
31.9%
(*.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))))
31.9%
(*.f64 (sin.f64 ky) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))) (sin.f64 th)))
42.7%
(*.f64 (sin.f64 ky) (neg.f64 #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (/.f64 (neg.f64 th) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))))))
77.3%
(*.f64 (neg.f64 (sin.f64 ky)) (*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (cos.f64 (+.f64 ky ky)) #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))))))) (sin.f64 th)))
42.7%
(*.f64 (neg.f64 (sin.f64 ky)) #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) (neg.f64 th)))))
42.6%
(*.f64 (neg.f64 (sin.f64 ky)) #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (*.f64 th (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))))))
18.5%
(*.f64 (neg.f64 (sin.f64 ky)) #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (*.f64 #s(literal -1 binary64) (/.f64 th (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(approx (* 1/2 (cos (* 2 kx))) #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))))
18.1%
(*.f64 (neg.f64 (sin.f64 ky)) #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (*.f64 #s(literal -1 binary64) (/.f64 th (sqrt.f64 #s(approx (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))))
18.5%
(*.f64 (neg.f64 (sin.f64 ky)) #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (*.f64 #s(literal -1 binary64) #s(approx (/ th (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))) (/.f64 th (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))))
27.5%
(*.f64 #s(approx (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (/.f64 ky (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))) (sin.f64 th))
16.2%
(*.f64 #s(approx (neg (sin ky)) (*.f64 #s(literal -1 binary64) ky)) #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (*.f64 #s(literal -1 binary64) (/.f64 th (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))))
51.8%
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (fabs.f64 (sin.f64 ky))))
33.1%
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) (sqrt.f64 #s(literal 1/2 binary64)))))
42.5%
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 (*.f64 th (sin.f64 ky)) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))
18.3%
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 #s(approx (* (sin ky) (sin th)) (*.f64 th (sin.f64 ky))) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
33.1%
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 th) (sin.f64 ky)))))
33.4%
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (sin.f64 ky)))
44.2%
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 (/.f64 (sin.f64 ky) (fabs.f64 (sin.f64 ky))) (sin.f64 th)))
51.8%
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 ky))) (*.f64 (sin.f64 th) (sin.f64 ky))))
44.0%
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 (*.f64 (sin.f64 th) (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 ky)))) (sin.f64 ky)))
44.1%
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 (sin.f64 th) (*.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 ky))) (sin.f64 ky))))
43.4%
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 (sin.f64 th) (*.f64 (sin.f64 ky) (exp.f64 (*.f64 (log.f64 (fabs.f64 (sin.f64 ky))) #s(literal -1 binary64))))))
15.0%
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 (sin.f64 th) (*.f64 (sin.f64 ky) #s(approx (/ 1 (sqrt (- 1/2 (* (cos (+ ky ky)) 1/2)))) (/.f64 #s(literal 1 binary64) ky)))))
26.5%
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) #s(approx (/ (* (sin ky) (sin th)) (sqrt (* 1/2 (- 1 (cos (* 2 ky)))))) (sin.f64 th)))
38.4%
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 (sin.f64 kx))))
27.3%
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (/.f64 (sqrt.f64 (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx)))) (sqrt.f64 #s(literal 2 binary64)))))
27.3%
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))
17.6%
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (sqrt.f64 #s(approx (pow (sin kx) 2) (pow.f64 kx #s(literal 2 binary64))))))
40.1%
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (fabs.f64 (sin.f64 kx)) (sin.f64 th)) ky)))
40.0%
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (fabs.f64 (sin.f64 kx)) ky) (sin.f64 th))))
38.2%
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(literal 1 binary64) (/.f64 (fabs.f64 (sin.f64 kx)) (*.f64 (sin.f64 th) ky))))
37.6%
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 th) ky)) (fabs.f64 (sin.f64 kx)))))
20.6%
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(literal 1 binary64) #s(approx (/ (fabs (sin kx)) (* (sin th) ky)) (/.f64 (fabs.f64 (sin.f64 kx)) (*.f64 ky th)))))
38.3%
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))) (*.f64 (sin.f64 th) ky)))
40.5%
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))) (sin.f64 th)) ky))
40.6%
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (sin.f64 th) (/.f64 ky (fabs.f64 (sin.f64 kx)))))
21.2%
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (*.f64 ky (sin.f64 th)) kx)))
14.5%
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (*.f64 ky #s(approx (sin th) (*.f64 th (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 th #s(literal 2 binary64))))))) kx)))
14.6%
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 #s(approx (* ky (sin th)) (*.f64 th (+.f64 ky (*.f64 #s(literal -1/6 binary64) (*.f64 ky (pow.f64 th #s(literal 2 binary64))))))) kx)))
15.2%
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 #s(approx (* ky (sin th)) (*.f64 ky th)) kx)))
15.1%
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 #s(literal 1 binary64) (/.f64 kx #s(approx (* ky (sin th)) (*.f64 th ky))))))
23.4%
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (*.f64 (/.f64 (sin.f64 th) kx) ky)))
15.2%
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (*.f64 (/.f64 #s(literal 1 binary64) kx) #s(approx (* ky (sin th)) (*.f64 th ky)))))
23.4%
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (*.f64 (sin.f64 th) (/.f64 ky kx))))
23.3%
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (*.f64 (sin.f64 th) (*.f64 ky (/.f64 #s(literal 1 binary64) kx)))))
16.6%
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (*.f64 th (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 ky (pow.f64 th #s(literal 2 binary64))) kx)) (/.f64 ky kx))))))
20.8%
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ 1 (/ (fabs (sin kx)) (* (sin th) ky))) (/.f64 (*.f64 ky th) (fabs.f64 (sin.f64 kx)))))
42.5%
#s(approx (* (neg (sin ky)) (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th))) (/.f64 (*.f64 th (sin.f64 ky)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))
Samples
13.0ms256×0valid
Compiler

Compiled 2 930 to 1 876 computations (36.0% saved)

Precisions
Click to see histograms. Total time spent on operations: 4.0ms
ival-mult!: 3.0ms (69.2% of total)
ival-sub!: 1.0ms (23.1% of total)
adjust: 0.0ms (0.0% of total)

regimes1.7s (8.8%)

Memory
16.0MiB live, 2 355.6MiB allocated; 492ms collecting garbage
Counts
3 → 1
4 → 2
7 → 2
15 → 3
33 → 2
39 → 3
68 → 3
71 → 5
72 → 5
76 → 5
85 → 5
87 → 4
91 → 4
98 → 4
113 → 4
114 → 3
118 → 2
129 → 2
Calls
Call 1
Inputs
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 #s(approx (* ky (sin th)) (*.f64 ky th)) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (*.f64 (/.f64 #s(literal 1 binary64) kx) #s(approx (* ky (sin th)) (*.f64 th ky)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 #s(literal 1 binary64) (/.f64 kx #s(approx (* ky (sin th)) (*.f64 th ky))))))
Outputs
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 #s(approx (* ky (sin th)) (*.f64 ky th)) kx)))
Call 2
Inputs
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 #s(approx (* ky (sin th)) (*.f64 ky th)) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (*.f64 (/.f64 #s(literal 1 binary64) kx) #s(approx (* ky (sin th)) (*.f64 th ky)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 #s(literal 1 binary64) (/.f64 kx #s(approx (* ky (sin th)) (*.f64 th ky))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) #s(approx (/ (* (sin ky) (sin th)) (sqrt (* 1/2 (- 1 (cos (* 2 ky)))))) (sin.f64 th)))
Outputs
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 #s(approx (* ky (sin th)) (*.f64 ky th)) kx)))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) #s(approx (/ (* (sin ky) (sin th)) (sqrt (* 1/2 (- 1 (cos (* 2 ky)))))) (sin.f64 th)))
Call 3
Inputs
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 #s(approx (* ky (sin th)) (*.f64 ky th)) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (*.f64 (/.f64 #s(literal 1 binary64) kx) #s(approx (* ky (sin th)) (*.f64 th ky)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 #s(literal 1 binary64) (/.f64 kx #s(approx (* ky (sin th)) (*.f64 th ky))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) #s(approx (/ (* (sin ky) (sin th)) (sqrt (* 1/2 (- 1 (cos (* 2 ky)))))) (sin.f64 th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (*.f64 (sin.f64 th) (/.f64 ky kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (*.f64 (/.f64 (sin.f64 th) kx) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (*.f64 ky (sin.f64 th)) kx)))
Outputs
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (*.f64 (sin.f64 th) (/.f64 ky kx))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) #s(approx (/ (* (sin ky) (sin th)) (sqrt (* 1/2 (- 1 (cos (* 2 ky)))))) (sin.f64 th)))
Call 4
Inputs
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 #s(approx (* ky (sin th)) (*.f64 ky th)) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (*.f64 (/.f64 #s(literal 1 binary64) kx) #s(approx (* ky (sin th)) (*.f64 th ky)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 #s(literal 1 binary64) (/.f64 kx #s(approx (* ky (sin th)) (*.f64 th ky))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) #s(approx (/ (* (sin ky) (sin th)) (sqrt (* 1/2 (- 1 (cos (* 2 ky)))))) (sin.f64 th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (*.f64 (sin.f64 th) (/.f64 ky kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (*.f64 (/.f64 (sin.f64 th) kx) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (*.f64 ky (sin.f64 th)) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ 1 (/ (fabs (sin kx)) (* (sin th) ky))) (/.f64 (*.f64 ky th) (fabs.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (*.f64 (sin.f64 th) (*.f64 ky (/.f64 #s(literal 1 binary64) kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 #s(literal 1 binary64) (/.f64 kx (*.f64 (sin.f64 th) ky)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(literal 1 binary64) #s(approx (/ (fabs (sin kx)) (* (sin th) ky)) (/.f64 (fabs.f64 (sin.f64 kx)) (*.f64 ky th)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 #s(approx (* ky (sin th)) (*.f64 th (+.f64 ky (*.f64 #s(literal -1/6 binary64) (*.f64 ky (pow.f64 th #s(literal 2 binary64))))))) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 #s(approx (* ky (sin th)) (*.f64 th (+.f64 ky (*.f64 #s(literal -1/6 binary64) (*.f64 ky (pow.f64 th #s(literal 2 binary64))))))) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (*.f64 ky #s(approx (sin th) (*.f64 th (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 th #s(literal 2 binary64))))))) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (*.f64 th (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 ky (pow.f64 th #s(literal 2 binary64))) kx)) (/.f64 ky kx))))))
Outputs
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ 1 (/ (fabs (sin kx)) (* (sin th) ky))) (/.f64 (*.f64 ky th) (fabs.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (*.f64 (sin.f64 th) (/.f64 ky kx))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) #s(approx (/ (* (sin ky) (sin th)) (sqrt (* 1/2 (- 1 (cos (* 2 ky)))))) (sin.f64 th)))
Call 5
Inputs
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 #s(approx (* ky (sin th)) (*.f64 ky th)) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (*.f64 (/.f64 #s(literal 1 binary64) kx) #s(approx (* ky (sin th)) (*.f64 th ky)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 #s(literal 1 binary64) (/.f64 kx #s(approx (* ky (sin th)) (*.f64 th ky))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) #s(approx (/ (* (sin ky) (sin th)) (sqrt (* 1/2 (- 1 (cos (* 2 ky)))))) (sin.f64 th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (*.f64 (sin.f64 th) (/.f64 ky kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (*.f64 (/.f64 (sin.f64 th) kx) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (*.f64 ky (sin.f64 th)) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ 1 (/ (fabs (sin kx)) (* (sin th) ky))) (/.f64 (*.f64 ky th) (fabs.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (*.f64 (sin.f64 th) (*.f64 ky (/.f64 #s(literal 1 binary64) kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 #s(literal 1 binary64) (/.f64 kx (*.f64 (sin.f64 th) ky)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(literal 1 binary64) #s(approx (/ (fabs (sin kx)) (* (sin th) ky)) (/.f64 (fabs.f64 (sin.f64 kx)) (*.f64 ky th)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 #s(approx (* ky (sin th)) (*.f64 th (+.f64 ky (*.f64 #s(literal -1/6 binary64) (*.f64 ky (pow.f64 th #s(literal 2 binary64))))))) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 #s(approx (* ky (sin th)) (*.f64 th (+.f64 ky (*.f64 #s(literal -1/6 binary64) (*.f64 ky (pow.f64 th #s(literal 2 binary64))))))) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (*.f64 ky #s(approx (sin th) (*.f64 th (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 th #s(literal 2 binary64))))))) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (*.f64 th (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 ky (pow.f64 th #s(literal 2 binary64))) kx)) (/.f64 ky kx))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (sin.f64 th) (/.f64 ky (fabs.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (sin.f64 th) (/.f64 ky (fabs.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx))) ky))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 (sin.f64 kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 (sin.f64 kx))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 (sin.f64 th) (*.f64 (sin.f64 ky) #s(approx (/ 1 (sqrt (- 1/2 (* (cos (+ ky ky)) 1/2)))) (/.f64 #s(literal 1 binary64) ky)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (sin.f64 th) (*.f64 ky (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))) (sin.f64 th)) ky))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))) (*.f64 (sin.f64 th) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))) (*.f64 (sin.f64 th) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(approx (* ky (sin th)) (*.f64 ky th)) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (sqrt.f64 #s(approx (pow (sin kx) 2) (pow.f64 kx #s(literal 2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(literal 1 binary64) (/.f64 (fabs.f64 (sin.f64 kx)) (*.f64 (sin.f64 th) ky))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 th) ky)) (fabs.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (fabs.f64 (sin.f64 kx)) ky) (sin.f64 th))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (fabs.f64 (sin.f64 kx)) (sin.f64 th)) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (sqrt.f64 (neg.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))))))
Outputs
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (sin.f64 th) (/.f64 ky (fabs.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) #s(approx (/ (* (sin ky) (sin th)) (sqrt (* 1/2 (- 1 (cos (* 2 ky)))))) (sin.f64 th)))
Call 6
Inputs
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 #s(approx (* ky (sin th)) (*.f64 ky th)) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (*.f64 (/.f64 #s(literal 1 binary64) kx) #s(approx (* ky (sin th)) (*.f64 th ky)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 #s(literal 1 binary64) (/.f64 kx #s(approx (* ky (sin th)) (*.f64 th ky))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) #s(approx (/ (* (sin ky) (sin th)) (sqrt (* 1/2 (- 1 (cos (* 2 ky)))))) (sin.f64 th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (*.f64 (sin.f64 th) (/.f64 ky kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (*.f64 (/.f64 (sin.f64 th) kx) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (*.f64 ky (sin.f64 th)) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ 1 (/ (fabs (sin kx)) (* (sin th) ky))) (/.f64 (*.f64 ky th) (fabs.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (*.f64 (sin.f64 th) (*.f64 ky (/.f64 #s(literal 1 binary64) kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 #s(literal 1 binary64) (/.f64 kx (*.f64 (sin.f64 th) ky)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(literal 1 binary64) #s(approx (/ (fabs (sin kx)) (* (sin th) ky)) (/.f64 (fabs.f64 (sin.f64 kx)) (*.f64 ky th)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 #s(approx (* ky (sin th)) (*.f64 th (+.f64 ky (*.f64 #s(literal -1/6 binary64) (*.f64 ky (pow.f64 th #s(literal 2 binary64))))))) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 #s(approx (* ky (sin th)) (*.f64 th (+.f64 ky (*.f64 #s(literal -1/6 binary64) (*.f64 ky (pow.f64 th #s(literal 2 binary64))))))) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (*.f64 ky #s(approx (sin th) (*.f64 th (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 th #s(literal 2 binary64))))))) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (*.f64 th (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 ky (pow.f64 th #s(literal 2 binary64))) kx)) (/.f64 ky kx))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (sin.f64 th) (/.f64 ky (fabs.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (sin.f64 th) (/.f64 ky (fabs.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx))) ky))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 (sin.f64 kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 (sin.f64 kx))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 (sin.f64 th) (*.f64 (sin.f64 ky) #s(approx (/ 1 (sqrt (- 1/2 (* (cos (+ ky ky)) 1/2)))) (/.f64 #s(literal 1 binary64) ky)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (sin.f64 th) (*.f64 ky (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))) (sin.f64 th)) ky))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))) (*.f64 (sin.f64 th) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))) (*.f64 (sin.f64 th) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(approx (* ky (sin th)) (*.f64 ky th)) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (sqrt.f64 #s(approx (pow (sin kx) 2) (pow.f64 kx #s(literal 2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(literal 1 binary64) (/.f64 (fabs.f64 (sin.f64 kx)) (*.f64 (sin.f64 th) ky))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 th) ky)) (fabs.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (fabs.f64 (sin.f64 kx)) ky) (sin.f64 th))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (fabs.f64 (sin.f64 kx)) (sin.f64 th)) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (sqrt.f64 (neg.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 #s(approx (* (sin ky) (sin th)) (*.f64 th (sin.f64 ky))) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
(*.f64 #s(approx (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (/.f64 ky (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))) (sin.f64 th))
(*.f64 (neg.f64 (sin.f64 ky)) #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (*.f64 #s(literal -1 binary64) #s(approx (/ th (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))) (/.f64 th (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))))
(*.f64 (neg.f64 (sin.f64 ky)) #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (*.f64 #s(literal -1 binary64) (/.f64 th (sqrt.f64 #s(approx (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))))
(*.f64 (neg.f64 (sin.f64 ky)) #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (*.f64 #s(literal -1 binary64) (/.f64 th (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(approx (* 1/2 (cos (* 2 kx))) #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))))
(*.f64 #s(approx (neg (sin ky)) (*.f64 #s(literal -1 binary64) ky)) #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (*.f64 #s(literal -1 binary64) (/.f64 th (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))))
Outputs
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 #s(approx (* (sin ky) (sin th)) (*.f64 th (sin.f64 ky))) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (sin.f64 th) (/.f64 ky (fabs.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) #s(approx (/ (* (sin ky) (sin th)) (sqrt (* 1/2 (- 1 (cos (* 2 ky)))))) (sin.f64 th)))
Call 7
Inputs
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 #s(approx (* ky (sin th)) (*.f64 ky th)) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (*.f64 (/.f64 #s(literal 1 binary64) kx) #s(approx (* ky (sin th)) (*.f64 th ky)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 #s(literal 1 binary64) (/.f64 kx #s(approx (* ky (sin th)) (*.f64 th ky))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) #s(approx (/ (* (sin ky) (sin th)) (sqrt (* 1/2 (- 1 (cos (* 2 ky)))))) (sin.f64 th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (*.f64 (sin.f64 th) (/.f64 ky kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (*.f64 (/.f64 (sin.f64 th) kx) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (*.f64 ky (sin.f64 th)) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ 1 (/ (fabs (sin kx)) (* (sin th) ky))) (/.f64 (*.f64 ky th) (fabs.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (*.f64 (sin.f64 th) (*.f64 ky (/.f64 #s(literal 1 binary64) kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 #s(literal 1 binary64) (/.f64 kx (*.f64 (sin.f64 th) ky)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(literal 1 binary64) #s(approx (/ (fabs (sin kx)) (* (sin th) ky)) (/.f64 (fabs.f64 (sin.f64 kx)) (*.f64 ky th)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 #s(approx (* ky (sin th)) (*.f64 th (+.f64 ky (*.f64 #s(literal -1/6 binary64) (*.f64 ky (pow.f64 th #s(literal 2 binary64))))))) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 #s(approx (* ky (sin th)) (*.f64 th (+.f64 ky (*.f64 #s(literal -1/6 binary64) (*.f64 ky (pow.f64 th #s(literal 2 binary64))))))) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (*.f64 ky #s(approx (sin th) (*.f64 th (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 th #s(literal 2 binary64))))))) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (*.f64 th (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 ky (pow.f64 th #s(literal 2 binary64))) kx)) (/.f64 ky kx))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (sin.f64 th) (/.f64 ky (fabs.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (sin.f64 th) (/.f64 ky (fabs.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx))) ky))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 (sin.f64 kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 (sin.f64 kx))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 (sin.f64 th) (*.f64 (sin.f64 ky) #s(approx (/ 1 (sqrt (- 1/2 (* (cos (+ ky ky)) 1/2)))) (/.f64 #s(literal 1 binary64) ky)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (sin.f64 th) (*.f64 ky (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))) (sin.f64 th)) ky))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))) (*.f64 (sin.f64 th) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))) (*.f64 (sin.f64 th) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(approx (* ky (sin th)) (*.f64 ky th)) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (sqrt.f64 #s(approx (pow (sin kx) 2) (pow.f64 kx #s(literal 2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(literal 1 binary64) (/.f64 (fabs.f64 (sin.f64 kx)) (*.f64 (sin.f64 th) ky))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 th) ky)) (fabs.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (fabs.f64 (sin.f64 kx)) ky) (sin.f64 th))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (fabs.f64 (sin.f64 kx)) (sin.f64 th)) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (sqrt.f64 (neg.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 #s(approx (* (sin ky) (sin th)) (*.f64 th (sin.f64 ky))) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
(*.f64 #s(approx (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (/.f64 ky (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))) (sin.f64 th))
(*.f64 (neg.f64 (sin.f64 ky)) #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (*.f64 #s(literal -1 binary64) #s(approx (/ th (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))) (/.f64 th (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))))
(*.f64 (neg.f64 (sin.f64 ky)) #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (*.f64 #s(literal -1 binary64) (/.f64 th (sqrt.f64 #s(approx (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))))
(*.f64 (neg.f64 (sin.f64 ky)) #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (*.f64 #s(literal -1 binary64) (/.f64 th (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(approx (* 1/2 (cos (* 2 kx))) #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))))
(*.f64 #s(approx (neg (sin ky)) (*.f64 #s(literal -1 binary64) ky)) #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (*.f64 #s(literal -1 binary64) (/.f64 th (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 (/.f64 (sin.f64 ky) (fabs.f64 (sin.f64 ky))) (sin.f64 th)))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (fabs.f64 (sin.f64 ky))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 (sin.f64 th) (*.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 ky))) (sin.f64 ky))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 (*.f64 (sin.f64 th) (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 ky)))) (sin.f64 ky)))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 ky))) (*.f64 (sin.f64 th) (sin.f64 ky))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 (sin.f64 th) (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (sin.f64 ky)))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) #s(approx (- 1 (cos (* 2 ky))) (*.f64 #s(literal 2 binary64) (pow.f64 ky #s(literal 2 binary64))))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))
(*.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))) (sin.f64 th))
(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))) (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (*.f64 (sqrt.f64 (sin.f64 kx)) (sqrt.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 (sin.f64 th) (*.f64 (sin.f64 ky) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (*.f64 (sin.f64 th) (sin.f64 ky))))
(*.f64 (sin.f64 ky) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))) (sin.f64 th)))
(*.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (*.f64 (sqrt.f64 (neg.f64 (sin.f64 kx))) (sqrt.f64 (neg.f64 (sin.f64 kx))))))
(*.f64 (neg.f64 (sin.f64 ky)) #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))
(*.f64 (neg.f64 (sin.f64 ky)) #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))))
(*.f64 (neg.f64 (sin.f64 ky)) (*.f64 #s(approx (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))) (sin.f64 th)))
(*.f64 (neg.f64 (sin.f64 ky)) (*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (sin.f64 th)))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) (sqrt.f64 #s(literal 1/2 binary64)))))
Outputs
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 (/.f64 (sin.f64 ky) (fabs.f64 (sin.f64 ky))) (sin.f64 th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (sin.f64 th) (/.f64 ky (fabs.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 (/.f64 (sin.f64 ky) (fabs.f64 (sin.f64 ky))) (sin.f64 th)))
Call 8
Inputs
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 #s(approx (* ky (sin th)) (*.f64 ky th)) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (*.f64 (/.f64 #s(literal 1 binary64) kx) #s(approx (* ky (sin th)) (*.f64 th ky)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 #s(literal 1 binary64) (/.f64 kx #s(approx (* ky (sin th)) (*.f64 th ky))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) #s(approx (/ (* (sin ky) (sin th)) (sqrt (* 1/2 (- 1 (cos (* 2 ky)))))) (sin.f64 th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (*.f64 (sin.f64 th) (/.f64 ky kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (*.f64 (/.f64 (sin.f64 th) kx) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (*.f64 ky (sin.f64 th)) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ 1 (/ (fabs (sin kx)) (* (sin th) ky))) (/.f64 (*.f64 ky th) (fabs.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (*.f64 (sin.f64 th) (*.f64 ky (/.f64 #s(literal 1 binary64) kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 #s(literal 1 binary64) (/.f64 kx (*.f64 (sin.f64 th) ky)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(literal 1 binary64) #s(approx (/ (fabs (sin kx)) (* (sin th) ky)) (/.f64 (fabs.f64 (sin.f64 kx)) (*.f64 ky th)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 #s(approx (* ky (sin th)) (*.f64 th (+.f64 ky (*.f64 #s(literal -1/6 binary64) (*.f64 ky (pow.f64 th #s(literal 2 binary64))))))) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 #s(approx (* ky (sin th)) (*.f64 th (+.f64 ky (*.f64 #s(literal -1/6 binary64) (*.f64 ky (pow.f64 th #s(literal 2 binary64))))))) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (*.f64 ky #s(approx (sin th) (*.f64 th (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 th #s(literal 2 binary64))))))) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (*.f64 th (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 ky (pow.f64 th #s(literal 2 binary64))) kx)) (/.f64 ky kx))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (sin.f64 th) (/.f64 ky (fabs.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (sin.f64 th) (/.f64 ky (fabs.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx))) ky))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 (sin.f64 kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 (sin.f64 kx))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 (sin.f64 th) (*.f64 (sin.f64 ky) #s(approx (/ 1 (sqrt (- 1/2 (* (cos (+ ky ky)) 1/2)))) (/.f64 #s(literal 1 binary64) ky)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (sin.f64 th) (*.f64 ky (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))) (sin.f64 th)) ky))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))) (*.f64 (sin.f64 th) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))) (*.f64 (sin.f64 th) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(approx (* ky (sin th)) (*.f64 ky th)) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (sqrt.f64 #s(approx (pow (sin kx) 2) (pow.f64 kx #s(literal 2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(literal 1 binary64) (/.f64 (fabs.f64 (sin.f64 kx)) (*.f64 (sin.f64 th) ky))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 th) ky)) (fabs.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (fabs.f64 (sin.f64 kx)) ky) (sin.f64 th))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (fabs.f64 (sin.f64 kx)) (sin.f64 th)) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (sqrt.f64 (neg.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 #s(approx (* (sin ky) (sin th)) (*.f64 th (sin.f64 ky))) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
(*.f64 #s(approx (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (/.f64 ky (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))) (sin.f64 th))
(*.f64 (neg.f64 (sin.f64 ky)) #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (*.f64 #s(literal -1 binary64) #s(approx (/ th (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))) (/.f64 th (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))))
(*.f64 (neg.f64 (sin.f64 ky)) #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (*.f64 #s(literal -1 binary64) (/.f64 th (sqrt.f64 #s(approx (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))))
(*.f64 (neg.f64 (sin.f64 ky)) #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (*.f64 #s(literal -1 binary64) (/.f64 th (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(approx (* 1/2 (cos (* 2 kx))) #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))))
(*.f64 #s(approx (neg (sin ky)) (*.f64 #s(literal -1 binary64) ky)) #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (*.f64 #s(literal -1 binary64) (/.f64 th (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 (/.f64 (sin.f64 ky) (fabs.f64 (sin.f64 ky))) (sin.f64 th)))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (fabs.f64 (sin.f64 ky))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 (sin.f64 th) (*.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 ky))) (sin.f64 ky))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 (*.f64 (sin.f64 th) (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 ky)))) (sin.f64 ky)))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 ky))) (*.f64 (sin.f64 th) (sin.f64 ky))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 (sin.f64 th) (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (sin.f64 ky)))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) #s(approx (- 1 (cos (* 2 ky))) (*.f64 #s(literal 2 binary64) (pow.f64 ky #s(literal 2 binary64))))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))
(*.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))) (sin.f64 th))
(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))) (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (*.f64 (sqrt.f64 (sin.f64 kx)) (sqrt.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 (sin.f64 th) (*.f64 (sin.f64 ky) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (*.f64 (sin.f64 th) (sin.f64 ky))))
(*.f64 (sin.f64 ky) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))) (sin.f64 th)))
(*.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (*.f64 (sqrt.f64 (neg.f64 (sin.f64 kx))) (sqrt.f64 (neg.f64 (sin.f64 kx))))))
(*.f64 (neg.f64 (sin.f64 ky)) #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))
(*.f64 (neg.f64 (sin.f64 ky)) #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))))
(*.f64 (neg.f64 (sin.f64 ky)) (*.f64 #s(approx (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))) (sin.f64 th)))
(*.f64 (neg.f64 (sin.f64 ky)) (*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (sin.f64 th)))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) (sqrt.f64 #s(literal 1/2 binary64)))))
(*.f64 (sin.f64 ky) (neg.f64 #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (/.f64 (neg.f64 th) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))))))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) kx)))))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 th) (sin.f64 ky)))))
Outputs
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 (/.f64 (sin.f64 ky) (fabs.f64 (sin.f64 ky))) (sin.f64 th)))
(*.f64 (sin.f64 ky) (neg.f64 #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (/.f64 (neg.f64 th) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (sin.f64 th) (/.f64 ky (fabs.f64 (sin.f64 kx)))))
(*.f64 (sin.f64 ky) (neg.f64 #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (/.f64 (neg.f64 th) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) #s(approx (/ (* (sin ky) (sin th)) (sqrt (* 1/2 (- 1 (cos (* 2 ky)))))) (sin.f64 th)))
Call 9
Inputs
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 #s(approx (* ky (sin th)) (*.f64 ky th)) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (*.f64 (/.f64 #s(literal 1 binary64) kx) #s(approx (* ky (sin th)) (*.f64 th ky)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 #s(literal 1 binary64) (/.f64 kx #s(approx (* ky (sin th)) (*.f64 th ky))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) #s(approx (/ (* (sin ky) (sin th)) (sqrt (* 1/2 (- 1 (cos (* 2 ky)))))) (sin.f64 th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (*.f64 (sin.f64 th) (/.f64 ky kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (*.f64 (/.f64 (sin.f64 th) kx) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (*.f64 ky (sin.f64 th)) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ 1 (/ (fabs (sin kx)) (* (sin th) ky))) (/.f64 (*.f64 ky th) (fabs.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (*.f64 (sin.f64 th) (*.f64 ky (/.f64 #s(literal 1 binary64) kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 #s(literal 1 binary64) (/.f64 kx (*.f64 (sin.f64 th) ky)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(literal 1 binary64) #s(approx (/ (fabs (sin kx)) (* (sin th) ky)) (/.f64 (fabs.f64 (sin.f64 kx)) (*.f64 ky th)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 #s(approx (* ky (sin th)) (*.f64 th (+.f64 ky (*.f64 #s(literal -1/6 binary64) (*.f64 ky (pow.f64 th #s(literal 2 binary64))))))) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 #s(approx (* ky (sin th)) (*.f64 th (+.f64 ky (*.f64 #s(literal -1/6 binary64) (*.f64 ky (pow.f64 th #s(literal 2 binary64))))))) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (*.f64 ky #s(approx (sin th) (*.f64 th (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 th #s(literal 2 binary64))))))) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (*.f64 th (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 ky (pow.f64 th #s(literal 2 binary64))) kx)) (/.f64 ky kx))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (sin.f64 th) (/.f64 ky (fabs.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (sin.f64 th) (/.f64 ky (fabs.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx))) ky))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 (sin.f64 kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 (sin.f64 kx))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 (sin.f64 th) (*.f64 (sin.f64 ky) #s(approx (/ 1 (sqrt (- 1/2 (* (cos (+ ky ky)) 1/2)))) (/.f64 #s(literal 1 binary64) ky)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (sin.f64 th) (*.f64 ky (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))) (sin.f64 th)) ky))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))) (*.f64 (sin.f64 th) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))) (*.f64 (sin.f64 th) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(approx (* ky (sin th)) (*.f64 ky th)) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (sqrt.f64 #s(approx (pow (sin kx) 2) (pow.f64 kx #s(literal 2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(literal 1 binary64) (/.f64 (fabs.f64 (sin.f64 kx)) (*.f64 (sin.f64 th) ky))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 th) ky)) (fabs.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (fabs.f64 (sin.f64 kx)) ky) (sin.f64 th))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (fabs.f64 (sin.f64 kx)) (sin.f64 th)) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (sqrt.f64 (neg.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 #s(approx (* (sin ky) (sin th)) (*.f64 th (sin.f64 ky))) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
(*.f64 #s(approx (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (/.f64 ky (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))) (sin.f64 th))
(*.f64 (neg.f64 (sin.f64 ky)) #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (*.f64 #s(literal -1 binary64) #s(approx (/ th (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))) (/.f64 th (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))))
(*.f64 (neg.f64 (sin.f64 ky)) #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (*.f64 #s(literal -1 binary64) (/.f64 th (sqrt.f64 #s(approx (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))))
(*.f64 (neg.f64 (sin.f64 ky)) #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (*.f64 #s(literal -1 binary64) (/.f64 th (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(approx (* 1/2 (cos (* 2 kx))) #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))))
(*.f64 #s(approx (neg (sin ky)) (*.f64 #s(literal -1 binary64) ky)) #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (*.f64 #s(literal -1 binary64) (/.f64 th (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 (/.f64 (sin.f64 ky) (fabs.f64 (sin.f64 ky))) (sin.f64 th)))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (fabs.f64 (sin.f64 ky))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 (sin.f64 th) (*.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 ky))) (sin.f64 ky))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 (*.f64 (sin.f64 th) (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 ky)))) (sin.f64 ky)))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 ky))) (*.f64 (sin.f64 th) (sin.f64 ky))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 (sin.f64 th) (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (sin.f64 ky)))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) #s(approx (- 1 (cos (* 2 ky))) (*.f64 #s(literal 2 binary64) (pow.f64 ky #s(literal 2 binary64))))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))
(*.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))) (sin.f64 th))
(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))) (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (*.f64 (sqrt.f64 (sin.f64 kx)) (sqrt.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 (sin.f64 th) (*.f64 (sin.f64 ky) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (*.f64 (sin.f64 th) (sin.f64 ky))))
(*.f64 (sin.f64 ky) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))) (sin.f64 th)))
(*.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (*.f64 (sqrt.f64 (neg.f64 (sin.f64 kx))) (sqrt.f64 (neg.f64 (sin.f64 kx))))))
(*.f64 (neg.f64 (sin.f64 ky)) #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))
(*.f64 (neg.f64 (sin.f64 ky)) #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))))
(*.f64 (neg.f64 (sin.f64 ky)) (*.f64 #s(approx (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))) (sin.f64 th)))
(*.f64 (neg.f64 (sin.f64 ky)) (*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (sin.f64 th)))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) (sqrt.f64 #s(literal 1/2 binary64)))))
(*.f64 (sin.f64 ky) (neg.f64 #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (/.f64 (neg.f64 th) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))))))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) kx)))))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 th) (sin.f64 ky)))))
(*.f64 (neg.f64 (sin.f64 ky)) #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (*.f64 th (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))))))
Outputs
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 (/.f64 (sin.f64 ky) (fabs.f64 (sin.f64 ky))) (sin.f64 th)))
(*.f64 (sin.f64 ky) (neg.f64 #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (/.f64 (neg.f64 th) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (sin.f64 th) (/.f64 ky (fabs.f64 (sin.f64 kx)))))
(*.f64 (neg.f64 (sin.f64 ky)) #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (*.f64 th (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) #s(approx (/ (* (sin ky) (sin th)) (sqrt (* 1/2 (- 1 (cos (* 2 ky)))))) (sin.f64 th)))
Call 10
Inputs
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 #s(approx (* ky (sin th)) (*.f64 ky th)) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (*.f64 (/.f64 #s(literal 1 binary64) kx) #s(approx (* ky (sin th)) (*.f64 th ky)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 #s(literal 1 binary64) (/.f64 kx #s(approx (* ky (sin th)) (*.f64 th ky))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) #s(approx (/ (* (sin ky) (sin th)) (sqrt (* 1/2 (- 1 (cos (* 2 ky)))))) (sin.f64 th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (*.f64 (sin.f64 th) (/.f64 ky kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (*.f64 (/.f64 (sin.f64 th) kx) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (*.f64 ky (sin.f64 th)) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ 1 (/ (fabs (sin kx)) (* (sin th) ky))) (/.f64 (*.f64 ky th) (fabs.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (*.f64 (sin.f64 th) (*.f64 ky (/.f64 #s(literal 1 binary64) kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 #s(literal 1 binary64) (/.f64 kx (*.f64 (sin.f64 th) ky)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(literal 1 binary64) #s(approx (/ (fabs (sin kx)) (* (sin th) ky)) (/.f64 (fabs.f64 (sin.f64 kx)) (*.f64 ky th)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 #s(approx (* ky (sin th)) (*.f64 th (+.f64 ky (*.f64 #s(literal -1/6 binary64) (*.f64 ky (pow.f64 th #s(literal 2 binary64))))))) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 #s(approx (* ky (sin th)) (*.f64 th (+.f64 ky (*.f64 #s(literal -1/6 binary64) (*.f64 ky (pow.f64 th #s(literal 2 binary64))))))) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (*.f64 ky #s(approx (sin th) (*.f64 th (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 th #s(literal 2 binary64))))))) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (*.f64 th (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 ky (pow.f64 th #s(literal 2 binary64))) kx)) (/.f64 ky kx))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (sin.f64 th) (/.f64 ky (fabs.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (sin.f64 th) (/.f64 ky (fabs.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx))) ky))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 (sin.f64 kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 (sin.f64 kx))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 (sin.f64 th) (*.f64 (sin.f64 ky) #s(approx (/ 1 (sqrt (- 1/2 (* (cos (+ ky ky)) 1/2)))) (/.f64 #s(literal 1 binary64) ky)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (sin.f64 th) (*.f64 ky (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))) (sin.f64 th)) ky))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))) (*.f64 (sin.f64 th) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))) (*.f64 (sin.f64 th) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(approx (* ky (sin th)) (*.f64 ky th)) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (sqrt.f64 #s(approx (pow (sin kx) 2) (pow.f64 kx #s(literal 2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(literal 1 binary64) (/.f64 (fabs.f64 (sin.f64 kx)) (*.f64 (sin.f64 th) ky))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 th) ky)) (fabs.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (fabs.f64 (sin.f64 kx)) ky) (sin.f64 th))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (fabs.f64 (sin.f64 kx)) (sin.f64 th)) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (sqrt.f64 (neg.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 #s(approx (* (sin ky) (sin th)) (*.f64 th (sin.f64 ky))) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
(*.f64 #s(approx (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (/.f64 ky (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))) (sin.f64 th))
(*.f64 (neg.f64 (sin.f64 ky)) #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (*.f64 #s(literal -1 binary64) #s(approx (/ th (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))) (/.f64 th (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))))
(*.f64 (neg.f64 (sin.f64 ky)) #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (*.f64 #s(literal -1 binary64) (/.f64 th (sqrt.f64 #s(approx (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))))
(*.f64 (neg.f64 (sin.f64 ky)) #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (*.f64 #s(literal -1 binary64) (/.f64 th (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(approx (* 1/2 (cos (* 2 kx))) #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))))
(*.f64 #s(approx (neg (sin ky)) (*.f64 #s(literal -1 binary64) ky)) #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (*.f64 #s(literal -1 binary64) (/.f64 th (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 (/.f64 (sin.f64 ky) (fabs.f64 (sin.f64 ky))) (sin.f64 th)))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (fabs.f64 (sin.f64 ky))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 (sin.f64 th) (*.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 ky))) (sin.f64 ky))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 (*.f64 (sin.f64 th) (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 ky)))) (sin.f64 ky)))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 ky))) (*.f64 (sin.f64 th) (sin.f64 ky))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 (sin.f64 th) (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (sin.f64 ky)))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) #s(approx (- 1 (cos (* 2 ky))) (*.f64 #s(literal 2 binary64) (pow.f64 ky #s(literal 2 binary64))))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))
(*.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))) (sin.f64 th))
(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))) (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (*.f64 (sqrt.f64 (sin.f64 kx)) (sqrt.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 (sin.f64 th) (*.f64 (sin.f64 ky) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (*.f64 (sin.f64 th) (sin.f64 ky))))
(*.f64 (sin.f64 ky) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))) (sin.f64 th)))
(*.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (*.f64 (sqrt.f64 (neg.f64 (sin.f64 kx))) (sqrt.f64 (neg.f64 (sin.f64 kx))))))
(*.f64 (neg.f64 (sin.f64 ky)) #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))
(*.f64 (neg.f64 (sin.f64 ky)) #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))))
(*.f64 (neg.f64 (sin.f64 ky)) (*.f64 #s(approx (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))) (sin.f64 th)))
(*.f64 (neg.f64 (sin.f64 ky)) (*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (sin.f64 th)))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) (sqrt.f64 #s(literal 1/2 binary64)))))
(*.f64 (sin.f64 ky) (neg.f64 #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (/.f64 (neg.f64 th) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))))))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) kx)))))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 th) (sin.f64 ky)))))
(*.f64 (neg.f64 (sin.f64 ky)) #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (*.f64 th (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))))))
#s(approx (* (neg (sin ky)) (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th))) (/.f64 (*.f64 th (sin.f64 ky)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 (*.f64 th (sin.f64 ky)) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 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 (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 (*.f64 th (sin.f64 ky)) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 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 (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (/.f64 (sqrt.f64 (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx)))) (sqrt.f64 #s(literal 2 binary64)))))
Outputs
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 (/.f64 (sin.f64 ky) (fabs.f64 (sin.f64 ky))) (sin.f64 th)))
#s(approx (* (neg (sin ky)) (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th))) (/.f64 (*.f64 th (sin.f64 ky)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (sin.f64 th) (/.f64 ky (fabs.f64 (sin.f64 kx)))))
(*.f64 (neg.f64 (sin.f64 ky)) #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (*.f64 th (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) #s(approx (/ (* (sin ky) (sin th)) (sqrt (* 1/2 (- 1 (cos (* 2 ky)))))) (sin.f64 th)))
Call 11
Inputs
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 #s(approx (* ky (sin th)) (*.f64 ky th)) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (*.f64 (/.f64 #s(literal 1 binary64) kx) #s(approx (* ky (sin th)) (*.f64 th ky)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 #s(literal 1 binary64) (/.f64 kx #s(approx (* ky (sin th)) (*.f64 th ky))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) #s(approx (/ (* (sin ky) (sin th)) (sqrt (* 1/2 (- 1 (cos (* 2 ky)))))) (sin.f64 th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (*.f64 (sin.f64 th) (/.f64 ky kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (*.f64 (/.f64 (sin.f64 th) kx) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (*.f64 ky (sin.f64 th)) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ 1 (/ (fabs (sin kx)) (* (sin th) ky))) (/.f64 (*.f64 ky th) (fabs.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (*.f64 (sin.f64 th) (*.f64 ky (/.f64 #s(literal 1 binary64) kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 #s(literal 1 binary64) (/.f64 kx (*.f64 (sin.f64 th) ky)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(literal 1 binary64) #s(approx (/ (fabs (sin kx)) (* (sin th) ky)) (/.f64 (fabs.f64 (sin.f64 kx)) (*.f64 ky th)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 #s(approx (* ky (sin th)) (*.f64 th (+.f64 ky (*.f64 #s(literal -1/6 binary64) (*.f64 ky (pow.f64 th #s(literal 2 binary64))))))) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 #s(approx (* ky (sin th)) (*.f64 th (+.f64 ky (*.f64 #s(literal -1/6 binary64) (*.f64 ky (pow.f64 th #s(literal 2 binary64))))))) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (*.f64 ky #s(approx (sin th) (*.f64 th (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 th #s(literal 2 binary64))))))) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (*.f64 th (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 ky (pow.f64 th #s(literal 2 binary64))) kx)) (/.f64 ky kx))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (sin.f64 th) (/.f64 ky (fabs.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (sin.f64 th) (/.f64 ky (fabs.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx))) ky))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 (sin.f64 kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 (sin.f64 kx))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 (sin.f64 th) (*.f64 (sin.f64 ky) #s(approx (/ 1 (sqrt (- 1/2 (* (cos (+ ky ky)) 1/2)))) (/.f64 #s(literal 1 binary64) ky)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (sin.f64 th) (*.f64 ky (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))) (sin.f64 th)) ky))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))) (*.f64 (sin.f64 th) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))) (*.f64 (sin.f64 th) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(approx (* ky (sin th)) (*.f64 ky th)) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (sqrt.f64 #s(approx (pow (sin kx) 2) (pow.f64 kx #s(literal 2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(literal 1 binary64) (/.f64 (fabs.f64 (sin.f64 kx)) (*.f64 (sin.f64 th) ky))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 th) ky)) (fabs.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (fabs.f64 (sin.f64 kx)) ky) (sin.f64 th))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (fabs.f64 (sin.f64 kx)) (sin.f64 th)) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (sqrt.f64 (neg.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 #s(approx (* (sin ky) (sin th)) (*.f64 th (sin.f64 ky))) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
(*.f64 #s(approx (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (/.f64 ky (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))) (sin.f64 th))
(*.f64 (neg.f64 (sin.f64 ky)) #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (*.f64 #s(literal -1 binary64) #s(approx (/ th (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))) (/.f64 th (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))))
(*.f64 (neg.f64 (sin.f64 ky)) #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (*.f64 #s(literal -1 binary64) (/.f64 th (sqrt.f64 #s(approx (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))))
(*.f64 (neg.f64 (sin.f64 ky)) #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (*.f64 #s(literal -1 binary64) (/.f64 th (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(approx (* 1/2 (cos (* 2 kx))) #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))))
(*.f64 #s(approx (neg (sin ky)) (*.f64 #s(literal -1 binary64) ky)) #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (*.f64 #s(literal -1 binary64) (/.f64 th (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 (/.f64 (sin.f64 ky) (fabs.f64 (sin.f64 ky))) (sin.f64 th)))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (fabs.f64 (sin.f64 ky))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 (sin.f64 th) (*.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 ky))) (sin.f64 ky))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 (*.f64 (sin.f64 th) (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 ky)))) (sin.f64 ky)))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 ky))) (*.f64 (sin.f64 th) (sin.f64 ky))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 (sin.f64 th) (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (sin.f64 ky)))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) #s(approx (- 1 (cos (* 2 ky))) (*.f64 #s(literal 2 binary64) (pow.f64 ky #s(literal 2 binary64))))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))
(*.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))) (sin.f64 th))
(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))) (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (*.f64 (sqrt.f64 (sin.f64 kx)) (sqrt.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 (sin.f64 th) (*.f64 (sin.f64 ky) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (*.f64 (sin.f64 th) (sin.f64 ky))))
(*.f64 (sin.f64 ky) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))) (sin.f64 th)))
(*.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (*.f64 (sqrt.f64 (neg.f64 (sin.f64 kx))) (sqrt.f64 (neg.f64 (sin.f64 kx))))))
(*.f64 (neg.f64 (sin.f64 ky)) #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))
(*.f64 (neg.f64 (sin.f64 ky)) #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))))
(*.f64 (neg.f64 (sin.f64 ky)) (*.f64 #s(approx (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))) (sin.f64 th)))
(*.f64 (neg.f64 (sin.f64 ky)) (*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (sin.f64 th)))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) (sqrt.f64 #s(literal 1/2 binary64)))))
(*.f64 (sin.f64 ky) (neg.f64 #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (/.f64 (neg.f64 th) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))))))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) kx)))))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 th) (sin.f64 ky)))))
(*.f64 (neg.f64 (sin.f64 ky)) #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (*.f64 th (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))))))
#s(approx (* (neg (sin ky)) (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th))) (/.f64 (*.f64 th (sin.f64 ky)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 (*.f64 th (sin.f64 ky)) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 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 (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 (*.f64 th (sin.f64 ky)) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 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 (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (/.f64 (sqrt.f64 (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx)))) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (neg.f64 (sin.f64 ky)) #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) (neg.f64 th)))))
(*.f64 (neg.f64 (sin.f64 ky)) #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (*.f64 #s(literal -1 binary64) (/.f64 th (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))))
(*.f64 #s(approx (neg (sin ky)) (*.f64 #s(literal -1 binary64) ky)) (*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.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)))))) (sin.f64 th)))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(approx (pow (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))) -1) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (- 1/2 (* (cos (+ ky ky)) 1/2))))) (sin th)) (/.f64 (*.f64 th (sin.f64 ky)) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
Outputs
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 (/.f64 (sin.f64 ky) (fabs.f64 (sin.f64 ky))) (sin.f64 th)))
(*.f64 (neg.f64 (sin.f64 ky)) #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) (neg.f64 th)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (sin.f64 th) (/.f64 ky (fabs.f64 (sin.f64 kx)))))
(*.f64 (neg.f64 (sin.f64 ky)) #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (*.f64 th (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) #s(approx (/ (* (sin ky) (sin th)) (sqrt (* 1/2 (- 1 (cos (* 2 ky)))))) (sin.f64 th)))
Call 12
Inputs
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 #s(approx (* ky (sin th)) (*.f64 ky th)) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (*.f64 (/.f64 #s(literal 1 binary64) kx) #s(approx (* ky (sin th)) (*.f64 th ky)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 #s(literal 1 binary64) (/.f64 kx #s(approx (* ky (sin th)) (*.f64 th ky))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) #s(approx (/ (* (sin ky) (sin th)) (sqrt (* 1/2 (- 1 (cos (* 2 ky)))))) (sin.f64 th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (*.f64 (sin.f64 th) (/.f64 ky kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (*.f64 (/.f64 (sin.f64 th) kx) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (*.f64 ky (sin.f64 th)) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ 1 (/ (fabs (sin kx)) (* (sin th) ky))) (/.f64 (*.f64 ky th) (fabs.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (*.f64 (sin.f64 th) (*.f64 ky (/.f64 #s(literal 1 binary64) kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 #s(literal 1 binary64) (/.f64 kx (*.f64 (sin.f64 th) ky)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(literal 1 binary64) #s(approx (/ (fabs (sin kx)) (* (sin th) ky)) (/.f64 (fabs.f64 (sin.f64 kx)) (*.f64 ky th)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 #s(approx (* ky (sin th)) (*.f64 th (+.f64 ky (*.f64 #s(literal -1/6 binary64) (*.f64 ky (pow.f64 th #s(literal 2 binary64))))))) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 #s(approx (* ky (sin th)) (*.f64 th (+.f64 ky (*.f64 #s(literal -1/6 binary64) (*.f64 ky (pow.f64 th #s(literal 2 binary64))))))) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (*.f64 ky #s(approx (sin th) (*.f64 th (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 th #s(literal 2 binary64))))))) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (*.f64 th (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 ky (pow.f64 th #s(literal 2 binary64))) kx)) (/.f64 ky kx))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (sin.f64 th) (/.f64 ky (fabs.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (sin.f64 th) (/.f64 ky (fabs.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx))) ky))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 (sin.f64 kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 (sin.f64 kx))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 (sin.f64 th) (*.f64 (sin.f64 ky) #s(approx (/ 1 (sqrt (- 1/2 (* (cos (+ ky ky)) 1/2)))) (/.f64 #s(literal 1 binary64) ky)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (sin.f64 th) (*.f64 ky (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))) (sin.f64 th)) ky))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))) (*.f64 (sin.f64 th) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))) (*.f64 (sin.f64 th) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(approx (* ky (sin th)) (*.f64 ky th)) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (sqrt.f64 #s(approx (pow (sin kx) 2) (pow.f64 kx #s(literal 2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(literal 1 binary64) (/.f64 (fabs.f64 (sin.f64 kx)) (*.f64 (sin.f64 th) ky))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 th) ky)) (fabs.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (fabs.f64 (sin.f64 kx)) ky) (sin.f64 th))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (fabs.f64 (sin.f64 kx)) (sin.f64 th)) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (sqrt.f64 (neg.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 #s(approx (* (sin ky) (sin th)) (*.f64 th (sin.f64 ky))) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
(*.f64 #s(approx (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (/.f64 ky (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))) (sin.f64 th))
(*.f64 (neg.f64 (sin.f64 ky)) #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (*.f64 #s(literal -1 binary64) #s(approx (/ th (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))) (/.f64 th (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))))
(*.f64 (neg.f64 (sin.f64 ky)) #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (*.f64 #s(literal -1 binary64) (/.f64 th (sqrt.f64 #s(approx (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))))
(*.f64 (neg.f64 (sin.f64 ky)) #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (*.f64 #s(literal -1 binary64) (/.f64 th (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(approx (* 1/2 (cos (* 2 kx))) #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))))
(*.f64 #s(approx (neg (sin ky)) (*.f64 #s(literal -1 binary64) ky)) #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (*.f64 #s(literal -1 binary64) (/.f64 th (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 (/.f64 (sin.f64 ky) (fabs.f64 (sin.f64 ky))) (sin.f64 th)))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (fabs.f64 (sin.f64 ky))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 (sin.f64 th) (*.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 ky))) (sin.f64 ky))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 (*.f64 (sin.f64 th) (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 ky)))) (sin.f64 ky)))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 ky))) (*.f64 (sin.f64 th) (sin.f64 ky))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 (sin.f64 th) (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (sin.f64 ky)))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) #s(approx (- 1 (cos (* 2 ky))) (*.f64 #s(literal 2 binary64) (pow.f64 ky #s(literal 2 binary64))))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))
(*.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))) (sin.f64 th))
(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))) (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (*.f64 (sqrt.f64 (sin.f64 kx)) (sqrt.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 (sin.f64 th) (*.f64 (sin.f64 ky) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (*.f64 (sin.f64 th) (sin.f64 ky))))
(*.f64 (sin.f64 ky) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))) (sin.f64 th)))
(*.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (*.f64 (sqrt.f64 (neg.f64 (sin.f64 kx))) (sqrt.f64 (neg.f64 (sin.f64 kx))))))
(*.f64 (neg.f64 (sin.f64 ky)) #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))
(*.f64 (neg.f64 (sin.f64 ky)) #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))))
(*.f64 (neg.f64 (sin.f64 ky)) (*.f64 #s(approx (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))) (sin.f64 th)))
(*.f64 (neg.f64 (sin.f64 ky)) (*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (sin.f64 th)))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) (sqrt.f64 #s(literal 1/2 binary64)))))
(*.f64 (sin.f64 ky) (neg.f64 #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (/.f64 (neg.f64 th) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))))))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) kx)))))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 th) (sin.f64 ky)))))
(*.f64 (neg.f64 (sin.f64 ky)) #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (*.f64 th (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))))))
#s(approx (* (neg (sin ky)) (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th))) (/.f64 (*.f64 th (sin.f64 ky)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 (*.f64 th (sin.f64 ky)) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 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 (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 (*.f64 th (sin.f64 ky)) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 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 (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (/.f64 (sqrt.f64 (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx)))) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (neg.f64 (sin.f64 ky)) #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) (neg.f64 th)))))
(*.f64 (neg.f64 (sin.f64 ky)) #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (*.f64 #s(literal -1 binary64) (/.f64 th (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))))
(*.f64 #s(approx (neg (sin ky)) (*.f64 #s(literal -1 binary64) ky)) (*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.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)))))) (sin.f64 th)))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(approx (pow (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))) -1) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (- 1/2 (* (cos (+ ky ky)) 1/2))))) (sin th)) (/.f64 (*.f64 th (sin.f64 ky)) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
(*.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))) (sin.f64 th))
Outputs
(*.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (sin.f64 th) (/.f64 ky (fabs.f64 (sin.f64 kx)))))
(*.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) #s(approx (/ (* (sin ky) (sin th)) (sqrt (* 1/2 (- 1 (cos (* 2 ky)))))) (sin.f64 th)))
Call 13
Inputs
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 #s(approx (* ky (sin th)) (*.f64 ky th)) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (*.f64 (/.f64 #s(literal 1 binary64) kx) #s(approx (* ky (sin th)) (*.f64 th ky)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 #s(literal 1 binary64) (/.f64 kx #s(approx (* ky (sin th)) (*.f64 th ky))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) #s(approx (/ (* (sin ky) (sin th)) (sqrt (* 1/2 (- 1 (cos (* 2 ky)))))) (sin.f64 th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (*.f64 (sin.f64 th) (/.f64 ky kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (*.f64 (/.f64 (sin.f64 th) kx) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (*.f64 ky (sin.f64 th)) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ 1 (/ (fabs (sin kx)) (* (sin th) ky))) (/.f64 (*.f64 ky th) (fabs.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (*.f64 (sin.f64 th) (*.f64 ky (/.f64 #s(literal 1 binary64) kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 #s(literal 1 binary64) (/.f64 kx (*.f64 (sin.f64 th) ky)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(literal 1 binary64) #s(approx (/ (fabs (sin kx)) (* (sin th) ky)) (/.f64 (fabs.f64 (sin.f64 kx)) (*.f64 ky th)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 #s(approx (* ky (sin th)) (*.f64 th (+.f64 ky (*.f64 #s(literal -1/6 binary64) (*.f64 ky (pow.f64 th #s(literal 2 binary64))))))) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 #s(approx (* ky (sin th)) (*.f64 th (+.f64 ky (*.f64 #s(literal -1/6 binary64) (*.f64 ky (pow.f64 th #s(literal 2 binary64))))))) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (*.f64 ky #s(approx (sin th) (*.f64 th (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 th #s(literal 2 binary64))))))) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (*.f64 th (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 ky (pow.f64 th #s(literal 2 binary64))) kx)) (/.f64 ky kx))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (sin.f64 th) (/.f64 ky (fabs.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (sin.f64 th) (/.f64 ky (fabs.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx))) ky))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 (sin.f64 kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 (sin.f64 kx))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 (sin.f64 th) (*.f64 (sin.f64 ky) #s(approx (/ 1 (sqrt (- 1/2 (* (cos (+ ky ky)) 1/2)))) (/.f64 #s(literal 1 binary64) ky)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (sin.f64 th) (*.f64 ky (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))) (sin.f64 th)) ky))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))) (*.f64 (sin.f64 th) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))) (*.f64 (sin.f64 th) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(approx (* ky (sin th)) (*.f64 ky th)) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (sqrt.f64 #s(approx (pow (sin kx) 2) (pow.f64 kx #s(literal 2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(literal 1 binary64) (/.f64 (fabs.f64 (sin.f64 kx)) (*.f64 (sin.f64 th) ky))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 th) ky)) (fabs.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (fabs.f64 (sin.f64 kx)) ky) (sin.f64 th))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (fabs.f64 (sin.f64 kx)) (sin.f64 th)) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (sqrt.f64 (neg.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 #s(approx (* (sin ky) (sin th)) (*.f64 th (sin.f64 ky))) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
(*.f64 #s(approx (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (/.f64 ky (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))) (sin.f64 th))
(*.f64 (neg.f64 (sin.f64 ky)) #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (*.f64 #s(literal -1 binary64) #s(approx (/ th (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))) (/.f64 th (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))))
(*.f64 (neg.f64 (sin.f64 ky)) #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (*.f64 #s(literal -1 binary64) (/.f64 th (sqrt.f64 #s(approx (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))))
(*.f64 (neg.f64 (sin.f64 ky)) #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (*.f64 #s(literal -1 binary64) (/.f64 th (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(approx (* 1/2 (cos (* 2 kx))) #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))))
(*.f64 #s(approx (neg (sin ky)) (*.f64 #s(literal -1 binary64) ky)) #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (*.f64 #s(literal -1 binary64) (/.f64 th (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 (/.f64 (sin.f64 ky) (fabs.f64 (sin.f64 ky))) (sin.f64 th)))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (fabs.f64 (sin.f64 ky))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 (sin.f64 th) (*.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 ky))) (sin.f64 ky))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 (*.f64 (sin.f64 th) (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 ky)))) (sin.f64 ky)))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 ky))) (*.f64 (sin.f64 th) (sin.f64 ky))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 (sin.f64 th) (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (sin.f64 ky)))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) #s(approx (- 1 (cos (* 2 ky))) (*.f64 #s(literal 2 binary64) (pow.f64 ky #s(literal 2 binary64))))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))
(*.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))) (sin.f64 th))
(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))) (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (*.f64 (sqrt.f64 (sin.f64 kx)) (sqrt.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 (sin.f64 th) (*.f64 (sin.f64 ky) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (*.f64 (sin.f64 th) (sin.f64 ky))))
(*.f64 (sin.f64 ky) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))) (sin.f64 th)))
(*.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (*.f64 (sqrt.f64 (neg.f64 (sin.f64 kx))) (sqrt.f64 (neg.f64 (sin.f64 kx))))))
(*.f64 (neg.f64 (sin.f64 ky)) #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))
(*.f64 (neg.f64 (sin.f64 ky)) #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))))
(*.f64 (neg.f64 (sin.f64 ky)) (*.f64 #s(approx (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))) (sin.f64 th)))
(*.f64 (neg.f64 (sin.f64 ky)) (*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (sin.f64 th)))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) (sqrt.f64 #s(literal 1/2 binary64)))))
(*.f64 (sin.f64 ky) (neg.f64 #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (/.f64 (neg.f64 th) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))))))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) kx)))))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 th) (sin.f64 ky)))))
(*.f64 (neg.f64 (sin.f64 ky)) #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (*.f64 th (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))))))
#s(approx (* (neg (sin ky)) (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th))) (/.f64 (*.f64 th (sin.f64 ky)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 (*.f64 th (sin.f64 ky)) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 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 (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 (*.f64 th (sin.f64 ky)) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 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 (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (/.f64 (sqrt.f64 (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx)))) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (neg.f64 (sin.f64 ky)) #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) (neg.f64 th)))))
(*.f64 (neg.f64 (sin.f64 ky)) #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (*.f64 #s(literal -1 binary64) (/.f64 th (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))))
(*.f64 #s(approx (neg (sin ky)) (*.f64 #s(literal -1 binary64) ky)) (*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.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)))))) (sin.f64 th)))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(approx (pow (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))) -1) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (- 1/2 (* (cos (+ ky ky)) 1/2))))) (sin th)) (/.f64 (*.f64 th (sin.f64 ky)) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
(*.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))) (sin.f64 th))
(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))))
(*.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))) (sin.f64 th))
(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))
Outputs
(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (sin.f64 th) (/.f64 ky (fabs.f64 (sin.f64 kx)))))
(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) #s(approx (/ (* (sin ky) (sin th)) (sqrt (* 1/2 (- 1 (cos (* 2 ky)))))) (sin.f64 th)))
Call 14
Inputs
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 #s(approx (* ky (sin th)) (*.f64 ky th)) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (*.f64 (/.f64 #s(literal 1 binary64) kx) #s(approx (* ky (sin th)) (*.f64 th ky)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 #s(literal 1 binary64) (/.f64 kx #s(approx (* ky (sin th)) (*.f64 th ky))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) #s(approx (/ (* (sin ky) (sin th)) (sqrt (* 1/2 (- 1 (cos (* 2 ky)))))) (sin.f64 th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (*.f64 (sin.f64 th) (/.f64 ky kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (*.f64 (/.f64 (sin.f64 th) kx) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (*.f64 ky (sin.f64 th)) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ 1 (/ (fabs (sin kx)) (* (sin th) ky))) (/.f64 (*.f64 ky th) (fabs.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (*.f64 (sin.f64 th) (*.f64 ky (/.f64 #s(literal 1 binary64) kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 #s(literal 1 binary64) (/.f64 kx (*.f64 (sin.f64 th) ky)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(literal 1 binary64) #s(approx (/ (fabs (sin kx)) (* (sin th) ky)) (/.f64 (fabs.f64 (sin.f64 kx)) (*.f64 ky th)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 #s(approx (* ky (sin th)) (*.f64 th (+.f64 ky (*.f64 #s(literal -1/6 binary64) (*.f64 ky (pow.f64 th #s(literal 2 binary64))))))) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 #s(approx (* ky (sin th)) (*.f64 th (+.f64 ky (*.f64 #s(literal -1/6 binary64) (*.f64 ky (pow.f64 th #s(literal 2 binary64))))))) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (*.f64 ky #s(approx (sin th) (*.f64 th (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 th #s(literal 2 binary64))))))) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (*.f64 th (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 ky (pow.f64 th #s(literal 2 binary64))) kx)) (/.f64 ky kx))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (sin.f64 th) (/.f64 ky (fabs.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (sin.f64 th) (/.f64 ky (fabs.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx))) ky))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 (sin.f64 kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 (sin.f64 kx))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 (sin.f64 th) (*.f64 (sin.f64 ky) #s(approx (/ 1 (sqrt (- 1/2 (* (cos (+ ky ky)) 1/2)))) (/.f64 #s(literal 1 binary64) ky)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (sin.f64 th) (*.f64 ky (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))) (sin.f64 th)) ky))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))) (*.f64 (sin.f64 th) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))) (*.f64 (sin.f64 th) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(approx (* ky (sin th)) (*.f64 ky th)) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (sqrt.f64 #s(approx (pow (sin kx) 2) (pow.f64 kx #s(literal 2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(literal 1 binary64) (/.f64 (fabs.f64 (sin.f64 kx)) (*.f64 (sin.f64 th) ky))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 th) ky)) (fabs.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (fabs.f64 (sin.f64 kx)) ky) (sin.f64 th))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (fabs.f64 (sin.f64 kx)) (sin.f64 th)) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (sqrt.f64 (neg.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 #s(approx (* (sin ky) (sin th)) (*.f64 th (sin.f64 ky))) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
(*.f64 #s(approx (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (/.f64 ky (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))) (sin.f64 th))
(*.f64 (neg.f64 (sin.f64 ky)) #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (*.f64 #s(literal -1 binary64) #s(approx (/ th (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))) (/.f64 th (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))))
(*.f64 (neg.f64 (sin.f64 ky)) #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (*.f64 #s(literal -1 binary64) (/.f64 th (sqrt.f64 #s(approx (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))))
(*.f64 (neg.f64 (sin.f64 ky)) #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (*.f64 #s(literal -1 binary64) (/.f64 th (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(approx (* 1/2 (cos (* 2 kx))) #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))))
(*.f64 #s(approx (neg (sin ky)) (*.f64 #s(literal -1 binary64) ky)) #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (*.f64 #s(literal -1 binary64) (/.f64 th (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 (/.f64 (sin.f64 ky) (fabs.f64 (sin.f64 ky))) (sin.f64 th)))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (fabs.f64 (sin.f64 ky))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 (sin.f64 th) (*.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 ky))) (sin.f64 ky))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 (*.f64 (sin.f64 th) (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 ky)))) (sin.f64 ky)))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 ky))) (*.f64 (sin.f64 th) (sin.f64 ky))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 (sin.f64 th) (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (sin.f64 ky)))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) #s(approx (- 1 (cos (* 2 ky))) (*.f64 #s(literal 2 binary64) (pow.f64 ky #s(literal 2 binary64))))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))
(*.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))) (sin.f64 th))
(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))) (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (*.f64 (sqrt.f64 (sin.f64 kx)) (sqrt.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 (sin.f64 th) (*.f64 (sin.f64 ky) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (*.f64 (sin.f64 th) (sin.f64 ky))))
(*.f64 (sin.f64 ky) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))) (sin.f64 th)))
(*.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (*.f64 (sqrt.f64 (neg.f64 (sin.f64 kx))) (sqrt.f64 (neg.f64 (sin.f64 kx))))))
(*.f64 (neg.f64 (sin.f64 ky)) #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))
(*.f64 (neg.f64 (sin.f64 ky)) #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))))
(*.f64 (neg.f64 (sin.f64 ky)) (*.f64 #s(approx (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))) (sin.f64 th)))
(*.f64 (neg.f64 (sin.f64 ky)) (*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (sin.f64 th)))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) (sqrt.f64 #s(literal 1/2 binary64)))))
(*.f64 (sin.f64 ky) (neg.f64 #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (/.f64 (neg.f64 th) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))))))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) kx)))))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 th) (sin.f64 ky)))))
(*.f64 (neg.f64 (sin.f64 ky)) #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (*.f64 th (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))))))
#s(approx (* (neg (sin ky)) (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th))) (/.f64 (*.f64 th (sin.f64 ky)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 (*.f64 th (sin.f64 ky)) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 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 (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 (*.f64 th (sin.f64 ky)) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 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 (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (/.f64 (sqrt.f64 (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx)))) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (neg.f64 (sin.f64 ky)) #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) (neg.f64 th)))))
(*.f64 (neg.f64 (sin.f64 ky)) #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (*.f64 #s(literal -1 binary64) (/.f64 th (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))))
(*.f64 #s(approx (neg (sin ky)) (*.f64 #s(literal -1 binary64) ky)) (*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.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)))))) (sin.f64 th)))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(approx (pow (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))) -1) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (- 1/2 (* (cos (+ ky ky)) 1/2))))) (sin th)) (/.f64 (*.f64 th (sin.f64 ky)) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
(*.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))) (sin.f64 th))
(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))))
(*.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))) (sin.f64 th))
(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))
(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))))
(*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))) (sin.f64 ky)) (sin.f64 th))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))) (*.f64 (sin.f64 th) (sin.f64 ky)))
(*.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))))
(*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))) (sin.f64 ky)) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 th) (sqrt.f64 (-.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)))))) (sin.f64 ky))
Outputs
(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (sin.f64 th) (/.f64 ky (fabs.f64 (sin.f64 kx)))))
(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) #s(approx (/ (* (sin ky) (sin th)) (sqrt (* 1/2 (- 1 (cos (* 2 ky)))))) (sin.f64 th)))
Call 15
Inputs
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 #s(approx (* ky (sin th)) (*.f64 ky th)) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (*.f64 (/.f64 #s(literal 1 binary64) kx) #s(approx (* ky (sin th)) (*.f64 th ky)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 #s(literal 1 binary64) (/.f64 kx #s(approx (* ky (sin th)) (*.f64 th ky))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) #s(approx (/ (* (sin ky) (sin th)) (sqrt (* 1/2 (- 1 (cos (* 2 ky)))))) (sin.f64 th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (*.f64 (sin.f64 th) (/.f64 ky kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (*.f64 (/.f64 (sin.f64 th) kx) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (*.f64 ky (sin.f64 th)) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ 1 (/ (fabs (sin kx)) (* (sin th) ky))) (/.f64 (*.f64 ky th) (fabs.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (*.f64 (sin.f64 th) (*.f64 ky (/.f64 #s(literal 1 binary64) kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 #s(literal 1 binary64) (/.f64 kx (*.f64 (sin.f64 th) ky)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(literal 1 binary64) #s(approx (/ (fabs (sin kx)) (* (sin th) ky)) (/.f64 (fabs.f64 (sin.f64 kx)) (*.f64 ky th)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 #s(approx (* ky (sin th)) (*.f64 th (+.f64 ky (*.f64 #s(literal -1/6 binary64) (*.f64 ky (pow.f64 th #s(literal 2 binary64))))))) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 #s(approx (* ky (sin th)) (*.f64 th (+.f64 ky (*.f64 #s(literal -1/6 binary64) (*.f64 ky (pow.f64 th #s(literal 2 binary64))))))) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (*.f64 ky #s(approx (sin th) (*.f64 th (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 th #s(literal 2 binary64))))))) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (*.f64 th (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 ky (pow.f64 th #s(literal 2 binary64))) kx)) (/.f64 ky kx))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (sin.f64 th) (/.f64 ky (fabs.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (sin.f64 th) (/.f64 ky (fabs.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx))) ky))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 (sin.f64 kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 (sin.f64 kx))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 (sin.f64 th) (*.f64 (sin.f64 ky) #s(approx (/ 1 (sqrt (- 1/2 (* (cos (+ ky ky)) 1/2)))) (/.f64 #s(literal 1 binary64) ky)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (sin.f64 th) (*.f64 ky (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))) (sin.f64 th)) ky))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))) (*.f64 (sin.f64 th) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))) (*.f64 (sin.f64 th) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(approx (* ky (sin th)) (*.f64 ky th)) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (sqrt.f64 #s(approx (pow (sin kx) 2) (pow.f64 kx #s(literal 2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(literal 1 binary64) (/.f64 (fabs.f64 (sin.f64 kx)) (*.f64 (sin.f64 th) ky))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 th) ky)) (fabs.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (fabs.f64 (sin.f64 kx)) ky) (sin.f64 th))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (fabs.f64 (sin.f64 kx)) (sin.f64 th)) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (sqrt.f64 (neg.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 #s(approx (* (sin ky) (sin th)) (*.f64 th (sin.f64 ky))) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
(*.f64 #s(approx (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (/.f64 ky (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))) (sin.f64 th))
(*.f64 (neg.f64 (sin.f64 ky)) #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (*.f64 #s(literal -1 binary64) #s(approx (/ th (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))) (/.f64 th (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))))
(*.f64 (neg.f64 (sin.f64 ky)) #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (*.f64 #s(literal -1 binary64) (/.f64 th (sqrt.f64 #s(approx (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))))
(*.f64 (neg.f64 (sin.f64 ky)) #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (*.f64 #s(literal -1 binary64) (/.f64 th (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(approx (* 1/2 (cos (* 2 kx))) #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))))
(*.f64 #s(approx (neg (sin ky)) (*.f64 #s(literal -1 binary64) ky)) #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (*.f64 #s(literal -1 binary64) (/.f64 th (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 (/.f64 (sin.f64 ky) (fabs.f64 (sin.f64 ky))) (sin.f64 th)))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (fabs.f64 (sin.f64 ky))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 (sin.f64 th) (*.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 ky))) (sin.f64 ky))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 (*.f64 (sin.f64 th) (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 ky)))) (sin.f64 ky)))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 ky))) (*.f64 (sin.f64 th) (sin.f64 ky))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 (sin.f64 th) (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (sin.f64 ky)))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) #s(approx (- 1 (cos (* 2 ky))) (*.f64 #s(literal 2 binary64) (pow.f64 ky #s(literal 2 binary64))))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))
(*.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))) (sin.f64 th))
(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))) (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (*.f64 (sqrt.f64 (sin.f64 kx)) (sqrt.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 (sin.f64 th) (*.f64 (sin.f64 ky) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (*.f64 (sin.f64 th) (sin.f64 ky))))
(*.f64 (sin.f64 ky) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))) (sin.f64 th)))
(*.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (*.f64 (sqrt.f64 (neg.f64 (sin.f64 kx))) (sqrt.f64 (neg.f64 (sin.f64 kx))))))
(*.f64 (neg.f64 (sin.f64 ky)) #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))
(*.f64 (neg.f64 (sin.f64 ky)) #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))))
(*.f64 (neg.f64 (sin.f64 ky)) (*.f64 #s(approx (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))) (sin.f64 th)))
(*.f64 (neg.f64 (sin.f64 ky)) (*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (sin.f64 th)))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) (sqrt.f64 #s(literal 1/2 binary64)))))
(*.f64 (sin.f64 ky) (neg.f64 #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (/.f64 (neg.f64 th) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))))))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) kx)))))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 th) (sin.f64 ky)))))
(*.f64 (neg.f64 (sin.f64 ky)) #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (*.f64 th (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))))))
#s(approx (* (neg (sin ky)) (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th))) (/.f64 (*.f64 th (sin.f64 ky)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 (*.f64 th (sin.f64 ky)) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 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 (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 (*.f64 th (sin.f64 ky)) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 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 (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (/.f64 (sqrt.f64 (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx)))) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (neg.f64 (sin.f64 ky)) #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) (neg.f64 th)))))
(*.f64 (neg.f64 (sin.f64 ky)) #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (*.f64 #s(literal -1 binary64) (/.f64 th (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))))
(*.f64 #s(approx (neg (sin ky)) (*.f64 #s(literal -1 binary64) ky)) (*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.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)))))) (sin.f64 th)))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(approx (pow (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))) -1) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (- 1/2 (* (cos (+ ky ky)) 1/2))))) (sin th)) (/.f64 (*.f64 th (sin.f64 ky)) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
(*.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))) (sin.f64 th))
(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))))
(*.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))) (sin.f64 th))
(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))
(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))))
(*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))) (sin.f64 ky)) (sin.f64 th))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))) (*.f64 (sin.f64 th) (sin.f64 ky)))
(*.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))))
(*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))) (sin.f64 ky)) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 th) (sqrt.f64 (-.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)))))) (sin.f64 ky))
(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (-.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 (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) (sin.f64 ky))) (sin.f64 th))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 th) (sin.f64 ky))))
(*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.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)))))) (sin.f64 ky)) (sin.f64 th))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.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 (sin.f64 th) (sin.f64 ky)))
(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))) (sin.f64 ky))) (sin.f64 th))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))) (*.f64 (sin.f64 th) (sin.f64 ky))))
(*.f64 (neg.f64 (sin.f64 ky)) (*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.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)))))) (sin.f64 th)))
(*.f64 (neg.f64 (sin.f64 ky)) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))) (neg.f64 (sin.f64 th)))))
(*.f64 (/.f64 (sin.f64 ky) (/.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (sqrt.f64 #s(literal 2 binary64)))) (sin.f64 th))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.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 (sin.f64 th) (sin.f64 ky))))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) (/.f64 (sqrt.f64 #s(literal 1 binary64)) (sqrt.f64 (/.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 (sin.f64 th) (*.f64 (sin.f64 ky) (exp.f64 (*.f64 (log.f64 (fabs.f64 (sin.f64 ky))) #s(literal -1 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 th (sin.f64 ky)) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
Outputs
(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (-.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))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (sin.f64 th) (/.f64 ky (fabs.f64 (sin.f64 kx)))))
(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) #s(approx (/ (* (sin ky) (sin th)) (sqrt (* 1/2 (- 1 (cos (* 2 ky)))))) (sin.f64 th)))
Call 16
Inputs
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 #s(approx (* ky (sin th)) (*.f64 ky th)) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (*.f64 (/.f64 #s(literal 1 binary64) kx) #s(approx (* ky (sin th)) (*.f64 th ky)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 #s(literal 1 binary64) (/.f64 kx #s(approx (* ky (sin th)) (*.f64 th ky))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) #s(approx (/ (* (sin ky) (sin th)) (sqrt (* 1/2 (- 1 (cos (* 2 ky)))))) (sin.f64 th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (*.f64 (sin.f64 th) (/.f64 ky kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (*.f64 (/.f64 (sin.f64 th) kx) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (*.f64 ky (sin.f64 th)) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ 1 (/ (fabs (sin kx)) (* (sin th) ky))) (/.f64 (*.f64 ky th) (fabs.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (*.f64 (sin.f64 th) (*.f64 ky (/.f64 #s(literal 1 binary64) kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 #s(literal 1 binary64) (/.f64 kx (*.f64 (sin.f64 th) ky)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(literal 1 binary64) #s(approx (/ (fabs (sin kx)) (* (sin th) ky)) (/.f64 (fabs.f64 (sin.f64 kx)) (*.f64 ky th)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 #s(approx (* ky (sin th)) (*.f64 th (+.f64 ky (*.f64 #s(literal -1/6 binary64) (*.f64 ky (pow.f64 th #s(literal 2 binary64))))))) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 #s(approx (* ky (sin th)) (*.f64 th (+.f64 ky (*.f64 #s(literal -1/6 binary64) (*.f64 ky (pow.f64 th #s(literal 2 binary64))))))) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (*.f64 ky #s(approx (sin th) (*.f64 th (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 th #s(literal 2 binary64))))))) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (*.f64 th (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 ky (pow.f64 th #s(literal 2 binary64))) kx)) (/.f64 ky kx))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (sin.f64 th) (/.f64 ky (fabs.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (sin.f64 th) (/.f64 ky (fabs.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx))) ky))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 (sin.f64 kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 (sin.f64 kx))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 (sin.f64 th) (*.f64 (sin.f64 ky) #s(approx (/ 1 (sqrt (- 1/2 (* (cos (+ ky ky)) 1/2)))) (/.f64 #s(literal 1 binary64) ky)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (sin.f64 th) (*.f64 ky (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))) (sin.f64 th)) ky))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))) (*.f64 (sin.f64 th) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))) (*.f64 (sin.f64 th) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(approx (* ky (sin th)) (*.f64 ky th)) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (sqrt.f64 #s(approx (pow (sin kx) 2) (pow.f64 kx #s(literal 2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(literal 1 binary64) (/.f64 (fabs.f64 (sin.f64 kx)) (*.f64 (sin.f64 th) ky))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 th) ky)) (fabs.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (fabs.f64 (sin.f64 kx)) ky) (sin.f64 th))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (fabs.f64 (sin.f64 kx)) (sin.f64 th)) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (sqrt.f64 (neg.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 #s(approx (* (sin ky) (sin th)) (*.f64 th (sin.f64 ky))) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
(*.f64 #s(approx (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (/.f64 ky (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))) (sin.f64 th))
(*.f64 (neg.f64 (sin.f64 ky)) #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (*.f64 #s(literal -1 binary64) #s(approx (/ th (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))) (/.f64 th (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))))
(*.f64 (neg.f64 (sin.f64 ky)) #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (*.f64 #s(literal -1 binary64) (/.f64 th (sqrt.f64 #s(approx (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))))
(*.f64 (neg.f64 (sin.f64 ky)) #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (*.f64 #s(literal -1 binary64) (/.f64 th (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(approx (* 1/2 (cos (* 2 kx))) #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))))
(*.f64 #s(approx (neg (sin ky)) (*.f64 #s(literal -1 binary64) ky)) #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (*.f64 #s(literal -1 binary64) (/.f64 th (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 (/.f64 (sin.f64 ky) (fabs.f64 (sin.f64 ky))) (sin.f64 th)))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (fabs.f64 (sin.f64 ky))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 (sin.f64 th) (*.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 ky))) (sin.f64 ky))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 (*.f64 (sin.f64 th) (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 ky)))) (sin.f64 ky)))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 ky))) (*.f64 (sin.f64 th) (sin.f64 ky))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 (sin.f64 th) (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (sin.f64 ky)))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) #s(approx (- 1 (cos (* 2 ky))) (*.f64 #s(literal 2 binary64) (pow.f64 ky #s(literal 2 binary64))))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))
(*.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))) (sin.f64 th))
(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))) (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (*.f64 (sqrt.f64 (sin.f64 kx)) (sqrt.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 (sin.f64 th) (*.f64 (sin.f64 ky) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (*.f64 (sin.f64 th) (sin.f64 ky))))
(*.f64 (sin.f64 ky) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))) (sin.f64 th)))
(*.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (*.f64 (sqrt.f64 (neg.f64 (sin.f64 kx))) (sqrt.f64 (neg.f64 (sin.f64 kx))))))
(*.f64 (neg.f64 (sin.f64 ky)) #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))
(*.f64 (neg.f64 (sin.f64 ky)) #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))))
(*.f64 (neg.f64 (sin.f64 ky)) (*.f64 #s(approx (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))) (sin.f64 th)))
(*.f64 (neg.f64 (sin.f64 ky)) (*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (sin.f64 th)))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) (sqrt.f64 #s(literal 1/2 binary64)))))
(*.f64 (sin.f64 ky) (neg.f64 #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (/.f64 (neg.f64 th) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))))))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) kx)))))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 th) (sin.f64 ky)))))
(*.f64 (neg.f64 (sin.f64 ky)) #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (*.f64 th (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))))))
#s(approx (* (neg (sin ky)) (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th))) (/.f64 (*.f64 th (sin.f64 ky)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 (*.f64 th (sin.f64 ky)) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 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 (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 (*.f64 th (sin.f64 ky)) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 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 (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (/.f64 (sqrt.f64 (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx)))) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (neg.f64 (sin.f64 ky)) #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) (neg.f64 th)))))
(*.f64 (neg.f64 (sin.f64 ky)) #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (*.f64 #s(literal -1 binary64) (/.f64 th (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))))
(*.f64 #s(approx (neg (sin ky)) (*.f64 #s(literal -1 binary64) ky)) (*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.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)))))) (sin.f64 th)))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(approx (pow (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))) -1) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (- 1/2 (* (cos (+ ky ky)) 1/2))))) (sin th)) (/.f64 (*.f64 th (sin.f64 ky)) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
(*.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))) (sin.f64 th))
(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))))
(*.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))) (sin.f64 th))
(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))
(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))))
(*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))) (sin.f64 ky)) (sin.f64 th))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))) (*.f64 (sin.f64 th) (sin.f64 ky)))
(*.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))))
(*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))) (sin.f64 ky)) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 th) (sqrt.f64 (-.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)))))) (sin.f64 ky))
(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (-.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 (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) (sin.f64 ky))) (sin.f64 th))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 th) (sin.f64 ky))))
(*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.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)))))) (sin.f64 ky)) (sin.f64 th))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.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 (sin.f64 th) (sin.f64 ky)))
(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))) (sin.f64 ky))) (sin.f64 th))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))) (*.f64 (sin.f64 th) (sin.f64 ky))))
(*.f64 (neg.f64 (sin.f64 ky)) (*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.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)))))) (sin.f64 th)))
(*.f64 (neg.f64 (sin.f64 ky)) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))) (neg.f64 (sin.f64 th)))))
(*.f64 (/.f64 (sin.f64 ky) (/.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (sqrt.f64 #s(literal 2 binary64)))) (sin.f64 th))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.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 (sin.f64 th) (sin.f64 ky))))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) (/.f64 (sqrt.f64 #s(literal 1 binary64)) (sqrt.f64 (/.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 (sin.f64 th) (*.f64 (sin.f64 ky) (exp.f64 (*.f64 (log.f64 (fabs.f64 (sin.f64 ky))) #s(literal -1 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 th (sin.f64 ky)) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (pow.f64 ky #s(literal 2 binary64)))))) (sin.f64 th))
Outputs
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (sin.f64 th) (/.f64 ky (fabs.f64 (sin.f64 kx)))))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (pow.f64 ky #s(literal 2 binary64)))))) (sin.f64 th))
(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (-.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))))))
Call 17
Inputs
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 #s(approx (* ky (sin th)) (*.f64 ky th)) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (*.f64 (/.f64 #s(literal 1 binary64) kx) #s(approx (* ky (sin th)) (*.f64 th ky)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 #s(literal 1 binary64) (/.f64 kx #s(approx (* ky (sin th)) (*.f64 th ky))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) #s(approx (/ (* (sin ky) (sin th)) (sqrt (* 1/2 (- 1 (cos (* 2 ky)))))) (sin.f64 th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (*.f64 (sin.f64 th) (/.f64 ky kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (*.f64 (/.f64 (sin.f64 th) kx) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (*.f64 ky (sin.f64 th)) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ 1 (/ (fabs (sin kx)) (* (sin th) ky))) (/.f64 (*.f64 ky th) (fabs.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (*.f64 (sin.f64 th) (*.f64 ky (/.f64 #s(literal 1 binary64) kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 #s(literal 1 binary64) (/.f64 kx (*.f64 (sin.f64 th) ky)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(literal 1 binary64) #s(approx (/ (fabs (sin kx)) (* (sin th) ky)) (/.f64 (fabs.f64 (sin.f64 kx)) (*.f64 ky th)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 #s(approx (* ky (sin th)) (*.f64 th (+.f64 ky (*.f64 #s(literal -1/6 binary64) (*.f64 ky (pow.f64 th #s(literal 2 binary64))))))) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 #s(approx (* ky (sin th)) (*.f64 th (+.f64 ky (*.f64 #s(literal -1/6 binary64) (*.f64 ky (pow.f64 th #s(literal 2 binary64))))))) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (*.f64 ky #s(approx (sin th) (*.f64 th (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 th #s(literal 2 binary64))))))) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (*.f64 th (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 ky (pow.f64 th #s(literal 2 binary64))) kx)) (/.f64 ky kx))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (sin.f64 th) (/.f64 ky (fabs.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (sin.f64 th) (/.f64 ky (fabs.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx))) ky))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 (sin.f64 kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 (sin.f64 kx))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 (sin.f64 th) (*.f64 (sin.f64 ky) #s(approx (/ 1 (sqrt (- 1/2 (* (cos (+ ky ky)) 1/2)))) (/.f64 #s(literal 1 binary64) ky)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (sin.f64 th) (*.f64 ky (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))) (sin.f64 th)) ky))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))) (*.f64 (sin.f64 th) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))) (*.f64 (sin.f64 th) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(approx (* ky (sin th)) (*.f64 ky th)) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (sqrt.f64 #s(approx (pow (sin kx) 2) (pow.f64 kx #s(literal 2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(literal 1 binary64) (/.f64 (fabs.f64 (sin.f64 kx)) (*.f64 (sin.f64 th) ky))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 th) ky)) (fabs.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (fabs.f64 (sin.f64 kx)) ky) (sin.f64 th))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (fabs.f64 (sin.f64 kx)) (sin.f64 th)) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (sqrt.f64 (neg.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 #s(approx (* (sin ky) (sin th)) (*.f64 th (sin.f64 ky))) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
(*.f64 #s(approx (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (/.f64 ky (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))) (sin.f64 th))
(*.f64 (neg.f64 (sin.f64 ky)) #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (*.f64 #s(literal -1 binary64) #s(approx (/ th (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))) (/.f64 th (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))))
(*.f64 (neg.f64 (sin.f64 ky)) #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (*.f64 #s(literal -1 binary64) (/.f64 th (sqrt.f64 #s(approx (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))))
(*.f64 (neg.f64 (sin.f64 ky)) #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (*.f64 #s(literal -1 binary64) (/.f64 th (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(approx (* 1/2 (cos (* 2 kx))) #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))))
(*.f64 #s(approx (neg (sin ky)) (*.f64 #s(literal -1 binary64) ky)) #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (*.f64 #s(literal -1 binary64) (/.f64 th (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 (/.f64 (sin.f64 ky) (fabs.f64 (sin.f64 ky))) (sin.f64 th)))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (fabs.f64 (sin.f64 ky))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 (sin.f64 th) (*.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 ky))) (sin.f64 ky))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 (*.f64 (sin.f64 th) (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 ky)))) (sin.f64 ky)))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 ky))) (*.f64 (sin.f64 th) (sin.f64 ky))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 (sin.f64 th) (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (sin.f64 ky)))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) #s(approx (- 1 (cos (* 2 ky))) (*.f64 #s(literal 2 binary64) (pow.f64 ky #s(literal 2 binary64))))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))
(*.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))) (sin.f64 th))
(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))) (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (*.f64 (sqrt.f64 (sin.f64 kx)) (sqrt.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 (sin.f64 th) (*.f64 (sin.f64 ky) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (*.f64 (sin.f64 th) (sin.f64 ky))))
(*.f64 (sin.f64 ky) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))) (sin.f64 th)))
(*.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (*.f64 (sqrt.f64 (neg.f64 (sin.f64 kx))) (sqrt.f64 (neg.f64 (sin.f64 kx))))))
(*.f64 (neg.f64 (sin.f64 ky)) #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))
(*.f64 (neg.f64 (sin.f64 ky)) #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))))
(*.f64 (neg.f64 (sin.f64 ky)) (*.f64 #s(approx (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))) (sin.f64 th)))
(*.f64 (neg.f64 (sin.f64 ky)) (*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (sin.f64 th)))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) (sqrt.f64 #s(literal 1/2 binary64)))))
(*.f64 (sin.f64 ky) (neg.f64 #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (/.f64 (neg.f64 th) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))))))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) kx)))))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 th) (sin.f64 ky)))))
(*.f64 (neg.f64 (sin.f64 ky)) #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (*.f64 th (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))))))
#s(approx (* (neg (sin ky)) (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th))) (/.f64 (*.f64 th (sin.f64 ky)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 (*.f64 th (sin.f64 ky)) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 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 (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 (*.f64 th (sin.f64 ky)) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 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 (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (/.f64 (sqrt.f64 (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx)))) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (neg.f64 (sin.f64 ky)) #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) (neg.f64 th)))))
(*.f64 (neg.f64 (sin.f64 ky)) #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (*.f64 #s(literal -1 binary64) (/.f64 th (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))))
(*.f64 #s(approx (neg (sin ky)) (*.f64 #s(literal -1 binary64) ky)) (*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.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)))))) (sin.f64 th)))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(approx (pow (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))) -1) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (- 1/2 (* (cos (+ ky ky)) 1/2))))) (sin th)) (/.f64 (*.f64 th (sin.f64 ky)) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
(*.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))) (sin.f64 th))
(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))))
(*.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))) (sin.f64 th))
(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))
(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))))
(*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))) (sin.f64 ky)) (sin.f64 th))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))) (*.f64 (sin.f64 th) (sin.f64 ky)))
(*.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))))
(*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))) (sin.f64 ky)) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 th) (sqrt.f64 (-.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)))))) (sin.f64 ky))
(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (-.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 (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) (sin.f64 ky))) (sin.f64 th))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 th) (sin.f64 ky))))
(*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.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)))))) (sin.f64 ky)) (sin.f64 th))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.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 (sin.f64 th) (sin.f64 ky)))
(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))) (sin.f64 ky))) (sin.f64 th))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))) (*.f64 (sin.f64 th) (sin.f64 ky))))
(*.f64 (neg.f64 (sin.f64 ky)) (*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.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)))))) (sin.f64 th)))
(*.f64 (neg.f64 (sin.f64 ky)) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))) (neg.f64 (sin.f64 th)))))
(*.f64 (/.f64 (sin.f64 ky) (/.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (sqrt.f64 #s(literal 2 binary64)))) (sin.f64 th))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.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 (sin.f64 th) (sin.f64 ky))))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) (/.f64 (sqrt.f64 #s(literal 1 binary64)) (sqrt.f64 (/.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 (sin.f64 th) (*.f64 (sin.f64 ky) (exp.f64 (*.f64 (log.f64 (fabs.f64 (sin.f64 ky))) #s(literal -1 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 th (sin.f64 ky)) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (pow.f64 ky #s(literal 2 binary64)))))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.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)))) #s(literal -1 binary64))))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (*.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 (-.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))))) (sin.f64 th))
(*.f64 (neg.f64 (sin.f64 ky)) (*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (cos.f64 (+.f64 ky ky)) #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))))))) (sin.f64 th)))
Outputs
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) #s(approx (/ (* (sin ky) (sin th)) (sqrt (* 1/2 (- 1 (cos (* 2 ky)))))) (sin.f64 th)))
Call 18
Inputs
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 #s(approx (* ky (sin th)) (*.f64 ky th)) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (*.f64 (/.f64 #s(literal 1 binary64) kx) #s(approx (* ky (sin th)) (*.f64 th ky)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 #s(literal 1 binary64) (/.f64 kx #s(approx (* ky (sin th)) (*.f64 th ky))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) #s(approx (/ (* (sin ky) (sin th)) (sqrt (* 1/2 (- 1 (cos (* 2 ky)))))) (sin.f64 th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (*.f64 (sin.f64 th) (/.f64 ky kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (*.f64 (/.f64 (sin.f64 th) kx) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (*.f64 ky (sin.f64 th)) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ 1 (/ (fabs (sin kx)) (* (sin th) ky))) (/.f64 (*.f64 ky th) (fabs.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (*.f64 (sin.f64 th) (*.f64 ky (/.f64 #s(literal 1 binary64) kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 #s(literal 1 binary64) (/.f64 kx (*.f64 (sin.f64 th) ky)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(literal 1 binary64) #s(approx (/ (fabs (sin kx)) (* (sin th) ky)) (/.f64 (fabs.f64 (sin.f64 kx)) (*.f64 ky th)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 #s(approx (* ky (sin th)) (*.f64 th (+.f64 ky (*.f64 #s(literal -1/6 binary64) (*.f64 ky (pow.f64 th #s(literal 2 binary64))))))) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 #s(approx (* ky (sin th)) (*.f64 th (+.f64 ky (*.f64 #s(literal -1/6 binary64) (*.f64 ky (pow.f64 th #s(literal 2 binary64))))))) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) (/.f64 (*.f64 ky #s(approx (sin th) (*.f64 th (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 th #s(literal 2 binary64))))))) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (/ (* ky (sin th)) (sqrt (pow (sin kx) 2))) #s(approx (/ (* ky (sin th)) kx) (*.f64 th (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 ky (pow.f64 th #s(literal 2 binary64))) kx)) (/.f64 ky kx))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (sin.f64 th) (/.f64 ky (fabs.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (sin.f64 th) (/.f64 ky (fabs.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx))) ky))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 (sin.f64 kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 (sin.f64 kx))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 (sin.f64 th) (*.f64 (sin.f64 ky) #s(approx (/ 1 (sqrt (- 1/2 (* (cos (+ ky ky)) 1/2)))) (/.f64 #s(literal 1 binary64) ky)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (sin.f64 th) (*.f64 ky (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))) (sin.f64 th)) ky))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))) (*.f64 (sin.f64 th) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))) (*.f64 (sin.f64 th) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(approx (* ky (sin th)) (*.f64 ky th)) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (sqrt.f64 #s(approx (pow (sin kx) 2) (pow.f64 kx #s(literal 2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(literal 1 binary64) (/.f64 (fabs.f64 (sin.f64 kx)) (*.f64 (sin.f64 th) ky))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 th) ky)) (fabs.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (fabs.f64 (sin.f64 kx)) ky) (sin.f64 th))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (fabs.f64 (sin.f64 kx)) (sin.f64 th)) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (sqrt.f64 (neg.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 #s(approx (* (sin ky) (sin th)) (*.f64 th (sin.f64 ky))) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
(*.f64 #s(approx (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (/.f64 ky (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))) (sin.f64 th))
(*.f64 (neg.f64 (sin.f64 ky)) #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (*.f64 #s(literal -1 binary64) #s(approx (/ th (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))) (/.f64 th (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))))
(*.f64 (neg.f64 (sin.f64 ky)) #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (*.f64 #s(literal -1 binary64) (/.f64 th (sqrt.f64 #s(approx (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))))
(*.f64 (neg.f64 (sin.f64 ky)) #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (*.f64 #s(literal -1 binary64) (/.f64 th (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(approx (* 1/2 (cos (* 2 kx))) #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))))
(*.f64 #s(approx (neg (sin ky)) (*.f64 #s(literal -1 binary64) ky)) #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (*.f64 #s(literal -1 binary64) (/.f64 th (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 (/.f64 (sin.f64 ky) (fabs.f64 (sin.f64 ky))) (sin.f64 th)))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (fabs.f64 (sin.f64 ky))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 (sin.f64 th) (*.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 ky))) (sin.f64 ky))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 (*.f64 (sin.f64 th) (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 ky)))) (sin.f64 ky)))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 ky))) (*.f64 (sin.f64 th) (sin.f64 ky))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 (sin.f64 th) (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (sin.f64 ky)))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) #s(approx (- 1 (cos (* 2 ky))) (*.f64 #s(literal 2 binary64) (pow.f64 ky #s(literal 2 binary64))))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))
(*.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))) (sin.f64 th))
(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))) (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (*.f64 (sqrt.f64 (sin.f64 kx)) (sqrt.f64 (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 (sin.f64 th) (*.f64 (sin.f64 ky) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (*.f64 (sin.f64 th) (sin.f64 ky))))
(*.f64 (sin.f64 ky) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))) (sin.f64 th)))
(*.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (*.f64 (sqrt.f64 (neg.f64 (sin.f64 kx))) (sqrt.f64 (neg.f64 (sin.f64 kx))))))
(*.f64 (neg.f64 (sin.f64 ky)) #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))
(*.f64 (neg.f64 (sin.f64 ky)) #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))))
(*.f64 (neg.f64 (sin.f64 ky)) (*.f64 #s(approx (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))) (sin.f64 th)))
(*.f64 (neg.f64 (sin.f64 ky)) (*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (sin.f64 th)))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) (sqrt.f64 #s(literal 1/2 binary64)))))
(*.f64 (sin.f64 ky) (neg.f64 #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (/.f64 (neg.f64 th) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))))))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) kx)))))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 th) (sin.f64 ky)))))
(*.f64 (neg.f64 (sin.f64 ky)) #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (*.f64 th (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))))))
#s(approx (* (neg (sin ky)) (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th))) (/.f64 (*.f64 th (sin.f64 ky)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 (*.f64 th (sin.f64 ky)) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 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 (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (/.f64 (*.f64 th (sin.f64 ky)) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 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 (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (/.f64 (sqrt.f64 (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx)))) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (neg.f64 (sin.f64 ky)) #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) (neg.f64 th)))))
(*.f64 (neg.f64 (sin.f64 ky)) #s(approx (* (/ -1 (sqrt (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))))) (sin th)) (*.f64 #s(literal -1 binary64) (/.f64 th (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))))
(*.f64 #s(approx (neg (sin ky)) (*.f64 #s(literal -1 binary64) ky)) (*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.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)))))) (sin.f64 th)))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(approx (pow (- 1/2 (+ (* (cos (+ ky ky)) 1/2) (- (* (cos (+ kx kx)) 1/2) 1/2))) -1) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (- 1/2 (* (cos (+ ky ky)) 1/2))))) (sin th)) (/.f64 (*.f64 th (sin.f64 ky)) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
(*.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))) (sin.f64 th))
(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))))
(*.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))) (sin.f64 th))
(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))
(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64)))))
(*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))) (sin.f64 ky)) (sin.f64 th))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))) (*.f64 (sin.f64 th) (sin.f64 ky)))
(*.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))))
(*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64))))) (sin.f64 ky)) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 th) (sqrt.f64 (-.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)))))) (sin.f64 ky))
(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (-.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 (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) (sin.f64 ky))) (sin.f64 th))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 th) (sin.f64 ky))))
(*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.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)))))) (sin.f64 ky)) (sin.f64 th))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.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 (sin.f64 th) (sin.f64 ky)))
(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))) (sin.f64 ky))) (sin.f64 th))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))) (*.f64 (sin.f64 th) (sin.f64 ky))))
(*.f64 (neg.f64 (sin.f64 ky)) (*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.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)))))) (sin.f64 th)))
(*.f64 (neg.f64 (sin.f64 ky)) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))) (neg.f64 (sin.f64 th)))))
(*.f64 (/.f64 (sin.f64 ky) (/.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (sqrt.f64 #s(literal 2 binary64)))) (sin.f64 th))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.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 (sin.f64 th) (sin.f64 ky))))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) (/.f64 (sqrt.f64 #s(literal 1 binary64)) (sqrt.f64 (/.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx)))) #s(literal 1 binary64)))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (- 1/2 (- (* (cos (+ kx kx)) 1/2) (* (- 1 (cos (+ ky ky))) 1/2))))) (sin th)) (*.f64 (sin.f64 th) (*.f64 (sin.f64 ky) (exp.f64 (*.f64 (log.f64 (fabs.f64 (sin.f64 ky))) #s(literal -1 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 th (sin.f64 ky)) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (pow.f64 ky #s(literal 2 binary64)))))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.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)))) #s(literal -1 binary64))))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (*.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 (-.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))))) (sin.f64 th))
(*.f64 (neg.f64 (sin.f64 ky)) (*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (cos.f64 (+.f64 ky ky)) #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))))))) (sin.f64 th)))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 (neg.f64 (+.f64 (PI.f64) ky))) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 (neg.f64 (+.f64 (PI.f64) ky))) #s(literal 2 binary64))))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 (+.f64 (neg.f64 ky) (PI.f64))) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 (+.f64 (neg.f64 ky) (PI.f64))) #s(literal 2 binary64))))) (sin.f64 th))
(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (+.f64 (134-z0z1z2z3z4 #s(literal 1/2 binary64) (cos.f64 ky) (cos.f64 ky) (-.f64 #s(literal 1 binary64) (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 (neg.f64 (sin.f64 ky)) (*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (+.f64 (134-z0z1z2z3z4 #s(literal 1/2 binary64) (cos.f64 ky) (cos.f64 ky) (-.f64 #s(literal 1 binary64) (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)))))) (sin.f64 th)))
(*.f64 (/.f64 (sin.f64 ky) (*.f64 (sqrt.f64 (sqrt.f64 (-.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)))))) (sqrt.f64 (sqrt.f64 (-.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)))))))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (134-z0z1z2z3z4 (neg.f64 (sin.f64 ky)) (sin.f64 ky) #s(literal -1 binary64) (cos.f64 ky) (sin.f64 (neg.f64 (PI.f64))))))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (/.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)))))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (/.f64 (-.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 3 binary64)) (*.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 kx) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 (*.f64 (sin.f64 ky) (sin.f64 kx)) #s(literal 2 binary64))) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 2 binary64)))))))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (/ (- (pow (- 1/2 (* (cos (+ ky ky)) 1/2)) 3) (pow (* (neg (sin kx)) (sin kx)) 3)) (+ (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (- 1/2 (* (cos (+ ky ky)) 1/2))) (+ (* (* (neg (sin kx)) (sin kx)) (* (neg (sin kx)) (sin kx))) (* (- 1/2 (* (cos (+ ky ky)) 1/2)) (* (neg (sin kx)) (sin kx)))))) (/.f64 (-.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 3 binary64)) (*.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 kx) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 2 binary64)))))))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (/.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 (neg.f64 (sin.f64 kx)) (sin.f64 kx)) #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 (neg.f64 (sin.f64 kx)) (sin.f64 kx)) (*.f64 (neg.f64 (sin.f64 kx)) (sin.f64 kx))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (*.f64 (neg.f64 (sin.f64 kx)) (sin.f64 kx)))))))) (sin.f64 th))
Outputs
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (sin.f64 th) (/.f64 ky (fabs.f64 (sin.f64 kx)))))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
Calls

77 calls:

69.0ms
kx
45.0ms
(sin.f64 ky)
40.0ms
(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
39.0ms
(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
38.0ms
ky
Results
AccuracySegmentsBranch
15.2%1(sin.f64 th)
15.2%1(sin.f64 kx)
15.2%1(pow.f64 (sin.f64 kx) #s(literal 2 binary64))
15.2%1kx
15.2%1th
15.2%1ky
15.2%1(sin.f64 ky)
15.2%1(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
15.2%1(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
32.8%3(sin.f64 kx)
32.4%2(pow.f64 (sin.f64 kx) #s(literal 2 binary64))
32.4%2kx
32.8%2(sin.f64 ky)
32.8%2ky
36.2%2(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
42.0%2(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
32.7%3(sin.f64 th)
32.7%2th
37.4%3(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
38.1%3(sin.f64 kx)
38.1%2(pow.f64 (sin.f64 kx) #s(literal 2 binary64))
38.1%2kx
41.3%3(sin.f64 ky)
41.5%3ky
43.6%3(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
40.6%1(sin.f64 th)
54.4%2(sin.f64 ky)
40.6%1th
49.6%3(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
59.2%2(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
51.3%3(sin.f64 kx)
64.1%3(sin.f64 ky)
51.3%2(pow.f64 (sin.f64 kx) #s(literal 2 binary64))
51.3%2kx
56.9%2ky
68.8%3(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
77.2%3(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
85.8%5(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
85.9%5(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
85.9%5(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
63.6%3(sin.f64 th)
65.8%4th
71.2%3(sin.f64 kx)
74.1%4(sin.f64 ky)
71.2%2(pow.f64 (sin.f64 kx) #s(literal 2 binary64))
71.2%2kx
68.5%5(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
74.0%3ky
85.9%5(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
95.8%4(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
95.8%4(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
95.9%4(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
95.9%4(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
90.5%3(sin.f64 ky)
89.0%2(pow.f64 (sin.f64 kx) #s(literal 2 binary64))
89.0%2kx
90.5%2ky
82.8%3(sin.f64 th)
89.0%3(sin.f64 kx)
82.8%2th
96.8%3ky
95.9%4(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
97.2%4(sin.f64 ky)
94.1%2(pow.f64 (sin.f64 kx) #s(literal 2 binary64))
94.1%2kx
90.3%2(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
96.0%2(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
97.2%3ky
93.8%1(sin.f64 th)
93.8%1(sin.f64 kx)
96.5%2(pow.f64 (sin.f64 kx) #s(literal 2 binary64))
97.7%3(sin.f64 ky)
97.3%2(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
96.9%2(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
96.5%2kx
97.7%2ky
93.8%1th
Samples
26.0ms512×0valid
Compiler

Compiled 5 303 to 1 139 computations (78.5% saved)

Precisions
Click to see histograms. Total time spent on operations: 9.0ms
ival-mult!: 6.0ms (70.3% of total)
ival-sub!: 2.0ms (23.4% of total)
adjust: 1.0ms (11.7% of total)

bsearch23.0ms (0.1%)

Memory
38.8MiB live, 38.8MiB allocated; 0ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
21.0ms
2.3246791102542506e-173
8.19463098746444e-172
Samples
16.0ms112×0valid
Compiler

Compiled 306 to 256 computations (16.3% saved)

Precisions
Click to see histograms. Total time spent on operations: 12.0ms
ival-sin: 8.0ms (64.7% of total)
ival-pow2: 2.0ms (16.2% of total)
ival-sqrt: 1.0ms (8.1% of total)
adjust: 0.0ms (0.0% of total)
ival-add!: 0.0ms (0.0% of total)
ival-div!: 0.0ms (0.0% of total)
ival-mult!: 0.0ms (0.0% of total)

bsearch1.0ms (0.0%)

Memory
1.6MiB live, 1.6MiB allocated; 0ms collecting garbage
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
0.978328324213006
0.9999916418440381
Compiler

Compiled 31 to 26 computations (16.1% saved)

bsearch36.0ms (0.2%)

Memory
3.8MiB live, 48.0MiB allocated; 9ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
33.0ms
5.8392518190192896e-5
5.535506757660983
1.0ms
2.3246791102542506e-173
8.19463098746444e-172
Samples
26.0ms144×0valid
Compiler

Compiled 730 to 617 computations (15.5% saved)

Precisions
Click to see histograms. Total time spent on operations: 21.0ms
ival-sin: 15.0ms (72.8% of total)
ival-pow2: 3.0ms (14.6% of total)
ival-sqrt: 1.0ms (4.9% of total)
ival-div!: 1.0ms (4.9% of total)
ival-mult!: 1.0ms (4.9% of total)
adjust: 0.0ms (0.0% of total)
ival-add!: 0.0ms (0.0% of total)

bsearch1.0ms (0.0%)

Memory
2.1MiB live, 2.1MiB allocated; 0ms collecting garbage
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
0.978328324213006
0.9999916418440381
0.0ms
9.515473917176766e-22
4.273748034197304e-21
0.0ms
-0.11217143814136157
1.934072347107794e-304
Compiler

Compiled 31 to 26 computations (16.1% saved)

bsearch1.0ms (0.0%)

Memory
1.8MiB live, 1.8MiB allocated; 0ms collecting garbage
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
0.978328324213006
0.9999916418440381
0.0ms
9.515473917176766e-22
4.273748034197304e-21
0.0ms
-0.11217143814136157
1.934072347107794e-304
Compiler

Compiled 31 to 26 computations (16.1% saved)

bsearch7.0ms (0.0%)

Memory
-43.3MiB live, 1.8MiB allocated; 8ms collecting garbage
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
0.978328324213006
0.9999916418440381
0.0ms
4.273748034197304e-21
4.3290265724659985e-21
0.0ms
-0.11217143814136157
1.934072347107794e-304
Compiler

Compiled 31 to 26 computations (16.1% saved)

bsearch1.0ms (0.0%)

Memory
2.0MiB live, 2.0MiB allocated; 0ms collecting garbage
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
0.978328324213006
0.9999916418440381
0.0ms
4.273748034197304e-21
4.3290265724659985e-21
0.0ms
-0.11217143814136157
1.934072347107794e-304
Compiler

Compiled 31 to 26 computations (16.1% saved)

bsearch1.0ms (0.0%)

Memory
2.2MiB live, 2.2MiB allocated; 0ms collecting garbage
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
0.978328324213006
0.9999916418440381
0.0ms
4.273748034197304e-21
4.3290265724659985e-21
0.0ms
-0.11217143814136157
1.934072347107794e-304
0.0ms
-1.0
-0.9978968279924147
Compiler

Compiled 31 to 26 computations (16.1% saved)

bsearch1.0ms (0.0%)

Memory
2.0MiB live, 2.0MiB allocated; 0ms collecting garbage
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
0.978328324213006
0.9999916418440381
0.0ms
4.273748034197304e-21
4.3290265724659985e-21
0.0ms
-0.11217143814136157
1.934072347107794e-304
0.0ms
-1.0
-0.9978968279924147
Compiler

Compiled 31 to 26 computations (16.1% saved)

bsearch1.0ms (0.0%)

Memory
2.2MiB live, 2.2MiB allocated; 0ms collecting garbage
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
0.978328324213006
0.9999916418440381
0.0ms
4.273748034197304e-21
4.3290265724659985e-21
0.0ms
-0.11217143814136157
1.934072347107794e-304
0.0ms
-1.0
-0.9978968279924147
Compiler

Compiled 31 to 26 computations (16.1% saved)

bsearch1.0ms (0.0%)

Memory
2.0MiB live, 2.0MiB allocated; 0ms collecting garbage
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
0.978328324213006
0.9999916418440381
0.0ms
4.273748034197304e-21
4.3290265724659985e-21
0.0ms
-0.11217143814136157
1.934072347107794e-304
0.0ms
-1.0
-0.9978968279924147
Compiler

Compiled 31 to 26 computations (16.1% saved)

bsearch1.0ms (0.0%)

Memory
1.5MiB live, 1.5MiB allocated; 0ms collecting garbage
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
4.3290265724659985e-21
0.021859979938521377
0.0ms
-0.11217143814136157
1.934072347107794e-304
Compiler

Compiled 31 to 26 computations (16.1% saved)

bsearch1.0ms (0.0%)

Memory
1.1MiB live, 1.1MiB allocated; 0ms collecting garbage
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
4.3290265724659985e-21
0.021859979938521377
0.0ms
-0.11217143814136157
1.934072347107794e-304
Compiler

Compiled 31 to 26 computations (16.1% saved)

bsearch0.0ms (0.0%)

Memory
0.8MiB live, 0.8MiB allocated; 0ms collecting garbage
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
4.3290265724659985e-21
0.021859979938521377
Compiler

Compiled 31 to 26 computations (16.1% saved)

bsearch0.0ms (0.0%)

Memory
0.9MiB live, 0.9MiB allocated; 0ms collecting garbage
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
1.7141936613836296e-29
5.801759931090706e-29
0.0ms
2.2016173323366358e-103
8.490628481769432e-101
Compiler

Compiled 31 to 26 computations (16.1% saved)

bsearch0.0ms (0.0%)

Memory
0.7MiB live, 0.7MiB allocated; 0ms collecting garbage
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
1.7141936613836296e-29
5.801759931090706e-29
Compiler

Compiled 31 to 26 computations (16.1% saved)

bsearch0.0ms (0.0%)

Memory
0.7MiB live, 0.7MiB allocated; 0ms collecting garbage
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
1.7141936613836296e-29
5.801759931090706e-29
Compiler

Compiled 31 to 26 computations (16.1% saved)

derivations381.0ms (2.0%)

Memory
-8.7MiB live, 370.5MiB allocated; 76ms collecting garbage
Stop Event
fuel
Compiler

Compiled 2 594 to 206 computations (92.1% saved)

preprocess380.0ms (2.0%)

Memory
8.3MiB live, 623.4MiB allocated; 151ms collecting garbage
Symmetry

(abs kx)

Compiler

Compiled 24 168 to 9 827 computations (59.3% saved)

end0.0ms (0.0%)

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

Profiling

Loading profile data...