Toniolo and Linder, Equation (3b), real

Time bar (total: 6.8s)

start0.0ms (0%)

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

analyze266.0ms (3.9%)

Memory
37.3MiB live, 609.4MiB allocated; 155ms collecting garbage
Algorithm
search
Search
ProbabilityValidUnknownPreconditionInfiniteDomainCan'tIter
0%0%99.9%0.1%0%0%0%0
0%0%99.9%0.1%0%0%0%1
0%0%99.9%0.1%0%0%0%2
0%0%99.9%0.1%0%0%0%3
0%0%99.9%0.1%0%0%0%4
25%25%74.9%0.1%0%0%0%5
43.8%43.7%56.2%0.1%0%0%0%6
43.8%43.7%56.2%0.1%0%0%0%7
53.1%53%46.8%0.1%0%0%0%8
60.9%60.8%39%0.1%0%0%0%9
60.9%60.8%39%0.1%0%0%0%10
64.8%64.7%35.1%0.1%0%0%0%11
68.4%68.3%31.6%0.1%0%0%0%12
Compiler

Compiled 18 to 14 computations (22.2% saved)

sample1.7s (25.2%)

Memory
24.5MiB live, 2 271.8MiB allocated; 537ms collecting garbage
Samples
1.4s8 256×0valid
Precisions
Click to see histograms. Total time spent on operations: 1.1s
ival-sin: 675.0ms (61.4% of total)
ival-pow2: 192.0ms (17.5% of total)
ival-sqrt: 124.0ms (11.3% of total)
ival-mult!: 48.0ms (4.4% of total)
ival-div!: 36.0ms (3.3% of total)
ival-add!: 23.0ms (2.1% of total)
adjust: 2.0ms (0.2% of total)
Bogosity

preprocess68.0ms (1%)

Memory
4.6MiB live, 49.8MiB allocated; 6ms collecting garbage
Iterations

Useful iterations: 1 (0.0ms)

IterNodesCost
046166
1113163
2396163
32511163
Stop Event
node-limit
Alt Table
Click to see full alt table
StatusAccuracyProgram
95.6%
(*.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 30 to 26 computations (13.3% saved)

series39.0ms (0.6%)

Memory
-1.9MiB live, 55.7MiB allocated; 11ms collecting garbage
Counts
13 → 63
Calls
Call 1
Inputs
(*.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 (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 ky)
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 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))
(pow.f64 (sin.f64 kx) #s(literal 2 binary64))
(sin.f64 kx)
kx
#s(literal 2 binary64)
(pow.f64 (sin.f64 ky) #s(literal 2 binary64))
(sin.f64 th)
th
Outputs
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (/ (* (sin ky) (sin th)) (sqrt (pow (sin ky) 2)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (+ (* -1/2 (/ (* (pow kx 2) (* (sin ky) (sin th))) (pow (sqrt (pow (sin ky) 2)) 3))) (/ (* (sin ky) (sin th)) (sqrt (pow (sin ky) 2))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (+ (* (pow kx 2) (- (* -1 (* (pow kx 2) (+ (* -1/2 (/ (* (sin ky) (* (sin th) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2)))))) (pow (sqrt (pow (sin ky) 2)) 3))) (* -1/4 (/ (* (sin ky) (sin th)) (pow (sqrt (pow (sin ky) 2)) 5)))))) (* 1/2 (/ (* (sin ky) (sin th)) (pow (sqrt (pow (sin ky) 2)) 3))))) (/ (* (sin ky) (sin th)) (sqrt (pow (sin ky) 2))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (+ (* (pow kx 2) (- (* (pow kx 2) (- (* -1 (* (pow kx 2) (+ (* -1/2 (/ (+ (* -1/2 (/ (* (sin ky) (* (sin th) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2)))))) (pow (sqrt (pow (sin ky) 2)) 3))) (* -1/4 (/ (* (sin ky) (sin th)) (pow (sqrt (pow (sin ky) 2)) 5)))) (pow (sqrt (pow (sin ky) 2)) 2))) (+ (* 1/4 (/ (* (sin ky) (* (sin th) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2)))))) (pow (sqrt (pow (sin ky) 2)) 5))) (* 1/2 (/ (* (sin ky) (* (sin th) (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2)))) (pow (sqrt (pow (sin ky) 2)) 2)))))) (pow (sqrt (pow (sin ky) 2)) 3))))))) (+ (* -1/2 (/ (* (sin ky) (* (sin th) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2)))))) (pow (sqrt (pow (sin ky) 2)) 3))) (* -1/4 (/ (* (sin ky) (sin th)) (pow (sqrt (pow (sin ky) 2)) 5)))))) (* 1/2 (/ (* (sin ky) (sin th)) (pow (sqrt (pow (sin ky) 2)) 3))))) (/ (* (sin ky) (sin th)) (sqrt (pow (sin ky) 2))))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (/ (sin ky) (sqrt (pow (sin ky) 2)))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow kx 2) (sin ky)) (pow (sqrt (pow (sin ky) 2)) 3))) (/ (sin ky) (sqrt (pow (sin ky) 2))))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ (* (pow kx 2) (- (* -1 (* (pow kx 2) (+ (* -1/2 (/ (* (sin ky) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2))))) (pow (sqrt (pow (sin ky) 2)) 3))) (* -1/4 (/ (sin ky) (pow (sqrt (pow (sin ky) 2)) 5)))))) (* 1/2 (/ (sin ky) (pow (sqrt (pow (sin ky) 2)) 3))))) (/ (sin ky) (sqrt (pow (sin ky) 2))))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ (* (pow kx 2) (- (* (pow kx 2) (- (* -1 (* (pow kx 2) (+ (* -1/2 (/ (+ (* -1/2 (/ (* (sin ky) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2))))) (pow (sqrt (pow (sin ky) 2)) 3))) (* -1/4 (/ (sin ky) (pow (sqrt (pow (sin ky) 2)) 5)))) (pow (sqrt (pow (sin ky) 2)) 2))) (+ (* 1/4 (/ (* (sin ky) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2))))) (pow (sqrt (pow (sin ky) 2)) 5))) (* 1/2 (/ (* (sin ky) (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2)))) (pow (sqrt (pow (sin ky) 2)) 2))))) (pow (sqrt (pow (sin ky) 2)) 3))))))) (+ (* -1/2 (/ (* (sin ky) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2))))) (pow (sqrt (pow (sin ky) 2)) 3))) (* -1/4 (/ (sin ky) (pow (sqrt (pow (sin ky) 2)) 5)))))) (* 1/2 (/ (sin ky) (pow (sqrt (pow (sin ky) 2)) 3))))) (/ (sin ky) (sqrt (pow (sin ky) 2))))))
#s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (sqrt (pow (sin ky) 2))))
#s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (sqrt (pow (sin ky) 2)) (* 1/2 (/ (pow kx 2) (sqrt (pow (sin ky) 2)))))))
#s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (sqrt (pow (sin ky) 2)) (* (pow kx 2) (+ (* -1/2 (/ (* (pow kx 2) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2))))) (sqrt (pow (sin ky) 2)))) (* 1/2 (/ 1 (sqrt (pow (sin ky) 2)))))))))
#s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (sqrt (pow (sin ky) 2)) (* (pow kx 2) (+ (* (pow kx 2) (+ (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2)))) (sqrt (pow (sin ky) 2)))) (* 1/2 (/ (* (pow kx 2) (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2)))) (pow (sqrt (pow (sin ky) 2)) 2))))) (sqrt (pow (sin ky) 2)))))) (* 1/2 (/ 1 (sqrt (pow (sin ky) 2)))))))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (pow (sin ky) 2)))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (pow kx 2) (pow (sin ky) 2))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (* (pow kx 2) (+ 1 (* -1/3 (pow kx 2)))) (pow (sin ky) 2))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (* (pow kx 2) (+ 1 (* (pow kx 2) (- (* 2/45 (pow kx 2)) 1/3)))) (pow (sin ky) 2))))
#s(approx (pow (sin kx) 2) #s(hole binary64 (pow kx 2)))
#s(approx (pow (sin kx) 2) #s(hole binary64 (* (pow kx 2) (+ 1 (* -1/3 (pow kx 2))))))
#s(approx (pow (sin kx) 2) #s(hole binary64 (* (pow kx 2) (+ 1 (* (pow kx 2) (- (* 2/45 (pow kx 2)) 1/3))))))
#s(approx (pow (sin kx) 2) #s(hole binary64 (* (pow kx 2) (+ 1 (* (pow kx 2) (- (* (pow kx 2) (+ 2/45 (* -1/315 (pow kx 2)))) 1/3))))))
#s(approx (sin kx) #s(hole binary64 kx))
#s(approx (sin kx) #s(hole binary64 (* kx (+ 1 (* -1/6 (pow kx 2))))))
#s(approx (sin kx) #s(hole binary64 (* kx (+ 1 (* (pow kx 2) (- (* 1/120 (pow kx 2)) 1/6))))))
#s(approx (sin kx) #s(hole binary64 (* kx (+ 1 (* (pow kx 2) (- (* (pow kx 2) (+ 1/120 (* -1/5040 (pow kx 2)))) 1/6))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (/ (* (sin ky) (sin th)) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))
#s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (pow (sin kx) 2) (pow (sin ky) 2))))
#s(approx (pow (sin kx) 2) #s(hole binary64 (pow (sin kx) 2)))
#s(approx (sin kx) #s(hole binary64 (sin kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (/ (* ky (sin th)) (sqrt (pow (sin kx) 2)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (* ky (+ (* (pow ky 2) (- (* -1/6 (/ (sin th) (sqrt (pow (sin kx) 2)))) (* 1/2 (/ (sin th) (pow (sqrt (pow (sin kx) 2)) 3))))) (/ (sin th) (sqrt (pow (sin kx) 2)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (* ky (+ (* (pow ky 2) (- (+ (* -1/6 (/ (sin th) (sqrt (pow (sin kx) 2)))) (* (pow ky 2) (- (* 1/120 (/ (sin th) (sqrt (pow (sin kx) 2)))) (+ (* -1/2 (/ (* (sin th) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2))))) (pow (sqrt (pow (sin kx) 2)) 3))) (* 1/2 (/ (- (* -1/6 (/ (sin th) (sqrt (pow (sin kx) 2)))) (* 1/2 (/ (sin th) (pow (sqrt (pow (sin kx) 2)) 3)))) (pow (sqrt (pow (sin kx) 2)) 2))))))) (* 1/2 (/ (sin th) (pow (sqrt (pow (sin kx) 2)) 3))))) (/ (sin th) (sqrt (pow (sin kx) 2)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (* ky (+ (* (pow ky 2) (- (+ (* -1/6 (/ (sin th) (sqrt (pow (sin kx) 2)))) (* (pow ky 2) (- (+ (* 1/120 (/ (sin th) (sqrt (pow (sin kx) 2)))) (* (pow ky 2) (- (* -1/5040 (/ (sin th) (sqrt (pow (sin kx) 2)))) (+ (* -1/2 (/ (* (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2)))) (- (* -1/6 (/ (sin th) (sqrt (pow (sin kx) 2)))) (* 1/2 (/ (sin th) (pow (sqrt (pow (sin kx) 2)) 3))))) (pow (sqrt (pow (sin kx) 2)) 2))) (+ (* 1/2 (/ (* (sin th) (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2)))) (pow (sqrt (pow (sin kx) 2)) 2))))) (pow (sqrt (pow (sin kx) 2)) 3))) (* 1/2 (/ (- (* 1/120 (/ (sin th) (sqrt (pow (sin kx) 2)))) (+ (* -1/2 (/ (* (sin th) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2))))) (pow (sqrt (pow (sin kx) 2)) 3))) (* 1/2 (/ (- (* -1/6 (/ (sin th) (sqrt (pow (sin kx) 2)))) (* 1/2 (/ (sin th) (pow (sqrt (pow (sin kx) 2)) 3)))) (pow (sqrt (pow (sin kx) 2)) 2))))) (pow (sqrt (pow (sin kx) 2)) 2)))))))) (+ (* -1/2 (/ (* (sin th) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2))))) (pow (sqrt (pow (sin kx) 2)) 3))) (* 1/2 (/ (- (* -1/6 (/ (sin th) (sqrt (pow (sin kx) 2)))) (* 1/2 (/ (sin th) (pow (sqrt (pow (sin kx) 2)) 3)))) (pow (sqrt (pow (sin kx) 2)) 2))))))) (* 1/2 (/ (sin th) (pow (sqrt (pow (sin kx) 2)) 3))))) (/ (sin th) (sqrt (pow (sin kx) 2)))))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (/ ky (sqrt (pow (sin kx) 2)))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (* ky (+ (* -1 (* (pow ky 2) (+ (* 1/6 (/ 1 (sqrt (pow (sin kx) 2)))) (* 1/2 (/ 1 (pow (sqrt (pow (sin kx) 2)) 3)))))) (/ 1 (sqrt (pow (sin kx) 2)))))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (* ky (+ (* (pow ky 2) (- (* (pow ky 2) (- (* 1/120 (/ 1 (sqrt (pow (sin kx) 2)))) (+ (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2)))) (pow (sqrt (pow (sin kx) 2)) 3))) (* -1/2 (/ (+ (* 1/6 (/ 1 (sqrt (pow (sin kx) 2)))) (* 1/2 (/ 1 (pow (sqrt (pow (sin kx) 2)) 3)))) (pow (sqrt (pow (sin kx) 2)) 2)))))) (+ (* 1/6 (/ 1 (sqrt (pow (sin kx) 2)))) (* 1/2 (/ 1 (pow (sqrt (pow (sin kx) 2)) 3)))))) (/ 1 (sqrt (pow (sin kx) 2)))))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (* ky (+ (* (pow ky 2) (- (* (pow ky 2) (- (+ (* -1 (* (pow ky 2) (+ (* 1/5040 (/ 1 (sqrt (pow (sin kx) 2)))) (+ (* 1/2 (/ (* (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2)))) (+ (* 1/6 (/ 1 (sqrt (pow (sin kx) 2)))) (* 1/2 (/ 1 (pow (sqrt (pow (sin kx) 2)) 3))))) (pow (sqrt (pow (sin kx) 2)) 2))) (+ (* 1/2 (/ (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2)))) (pow (sqrt (pow (sin kx) 2)) 2)))) (pow (sqrt (pow (sin kx) 2)) 3))) (* 1/2 (/ (- (* 1/120 (/ 1 (sqrt (pow (sin kx) 2)))) (+ (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2)))) (pow (sqrt (pow (sin kx) 2)) 3))) (* -1/2 (/ (+ (* 1/6 (/ 1 (sqrt (pow (sin kx) 2)))) (* 1/2 (/ 1 (pow (sqrt (pow (sin kx) 2)) 3)))) (pow (sqrt (pow (sin kx) 2)) 2))))) (pow (sqrt (pow (sin kx) 2)) 2)))))))) (* 1/120 (/ 1 (sqrt (pow (sin kx) 2))))) (+ (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2)))) (pow (sqrt (pow (sin kx) 2)) 3))) (* -1/2 (/ (+ (* 1/6 (/ 1 (sqrt (pow (sin kx) 2)))) (* 1/2 (/ 1 (pow (sqrt (pow (sin kx) 2)) 3)))) (pow (sqrt (pow (sin kx) 2)) 2)))))) (+ (* 1/6 (/ 1 (sqrt (pow (sin kx) 2)))) (* 1/2 (/ 1 (pow (sqrt (pow (sin kx) 2)) 3)))))) (/ 1 (sqrt (pow (sin kx) 2)))))))
#s(approx (sin ky) #s(hole binary64 ky))
#s(approx (sin ky) #s(hole binary64 (* ky (+ 1 (* -1/6 (pow ky 2))))))
#s(approx (sin ky) #s(hole binary64 (* ky (+ 1 (* (pow ky 2) (- (* 1/120 (pow ky 2)) 1/6))))))
#s(approx (sin ky) #s(hole binary64 (* ky (+ 1 (* (pow ky 2) (- (* (pow ky 2) (+ 1/120 (* -1/5040 (pow ky 2)))) 1/6))))))
#s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (sqrt (pow (sin kx) 2))))
#s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (sqrt (pow (sin kx) 2)) (* 1/2 (/ (pow ky 2) (sqrt (pow (sin kx) 2)))))))
#s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (sqrt (pow (sin kx) 2)) (* (pow ky 2) (+ (* -1/2 (/ (* (pow ky 2) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2))))) (sqrt (pow (sin kx) 2)))) (* 1/2 (/ 1 (sqrt (pow (sin kx) 2)))))))))
#s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (sqrt (pow (sin kx) 2)) (* (pow ky 2) (+ (* (pow ky 2) (+ (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2)))) (sqrt (pow (sin kx) 2)))) (* 1/2 (/ (* (pow ky 2) (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2)))) (pow (sqrt (pow (sin kx) 2)) 2))))) (sqrt (pow (sin kx) 2)))))) (* 1/2 (/ 1 (sqrt (pow (sin kx) 2)))))))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (pow ky 2) (pow (sin kx) 2))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2)))) (pow (sin kx) 2))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3)))) (pow (sin kx) 2))))
#s(approx (pow (sin ky) 2) #s(hole binary64 (pow ky 2)))
#s(approx (pow (sin ky) 2) #s(hole binary64 (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2))))))
#s(approx (pow (sin ky) 2) #s(hole binary64 (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3))))))
#s(approx (pow (sin ky) 2) #s(hole binary64 (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* (pow ky 2) (+ 2/45 (* -1/315 (pow ky 2)))) 1/3))))))
#s(approx (sin ky) #s(hole binary64 (sin ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (/ (* th (sin ky)) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (* th (+ (* -1/6 (/ (* (pow th 2) (sin ky)) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (* th (+ (* (pow th 2) (+ (* -1/6 (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 1/120 (/ (* (pow th 2) (sin ky)) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (* th (+ (* (pow th 2) (+ (* -1/6 (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* (pow th 2) (+ (* -1/5040 (/ (* (pow th 2) (sin ky)) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 1/120 (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))
#s(approx (sin th) #s(hole binary64 th))
#s(approx (sin th) #s(hole binary64 (* th (+ 1 (* -1/6 (pow th 2))))))
#s(approx (sin th) #s(hole binary64 (* th (+ 1 (* (pow th 2) (- (* 1/120 (pow th 2)) 1/6))))))
#s(approx (sin th) #s(hole binary64 (* th (+ 1 (* (pow th 2) (- (* (pow th 2) (+ 1/120 (* -1/5040 (pow th 2)))) 1/6))))))
#s(approx (sin th) #s(hole binary64 (sin th)))
Calls

9 calls:

TimeVariablePointExpression
13.0ms
ky
@-inf
((* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin ky) ky (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow (sin kx) 2) (sin kx) kx 2 (pow (sin ky) 2) (sin th) th)
5.0ms
ky
@0
((* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin ky) ky (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow (sin kx) 2) (sin kx) kx 2 (pow (sin ky) 2) (sin th) th)
4.0ms
kx
@0
((* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin ky) ky (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow (sin kx) 2) (sin kx) kx 2 (pow (sin ky) 2) (sin th) th)
4.0ms
kx
@inf
((* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin ky) ky (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow (sin kx) 2) (sin kx) kx 2 (pow (sin ky) 2) (sin th) th)
3.0ms
kx
@-inf
((* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin ky) ky (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow (sin kx) 2) (sin kx) kx 2 (pow (sin ky) 2) (sin th) th)

rewrite233.0ms (3.4%)

Memory
-18.1MiB live, 227.2MiB allocated; 33ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
04263085
04422885
126082588
082812276
Stop Event
iter-limit
node-limit
iter-limit
Counts
76 → 253
Calls
Call 1
Inputs
(*.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 (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 ky)
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 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))
(pow.f64 (sin.f64 kx) #s(literal 2 binary64))
(sin.f64 kx)
kx
#s(literal 2 binary64)
(pow.f64 (sin.f64 ky) #s(literal 2 binary64))
(sin.f64 th)
th
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (/ (* (sin ky) (sin th)) (sqrt (pow (sin ky) 2)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (+ (* -1/2 (/ (* (pow kx 2) (* (sin ky) (sin th))) (pow (sqrt (pow (sin ky) 2)) 3))) (/ (* (sin ky) (sin th)) (sqrt (pow (sin ky) 2))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (+ (* (pow kx 2) (- (* -1 (* (pow kx 2) (+ (* -1/2 (/ (* (sin ky) (* (sin th) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2)))))) (pow (sqrt (pow (sin ky) 2)) 3))) (* -1/4 (/ (* (sin ky) (sin th)) (pow (sqrt (pow (sin ky) 2)) 5)))))) (* 1/2 (/ (* (sin ky) (sin th)) (pow (sqrt (pow (sin ky) 2)) 3))))) (/ (* (sin ky) (sin th)) (sqrt (pow (sin ky) 2))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (+ (* (pow kx 2) (- (* (pow kx 2) (- (* -1 (* (pow kx 2) (+ (* -1/2 (/ (+ (* -1/2 (/ (* (sin ky) (* (sin th) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2)))))) (pow (sqrt (pow (sin ky) 2)) 3))) (* -1/4 (/ (* (sin ky) (sin th)) (pow (sqrt (pow (sin ky) 2)) 5)))) (pow (sqrt (pow (sin ky) 2)) 2))) (+ (* 1/4 (/ (* (sin ky) (* (sin th) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2)))))) (pow (sqrt (pow (sin ky) 2)) 5))) (* 1/2 (/ (* (sin ky) (* (sin th) (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2)))) (pow (sqrt (pow (sin ky) 2)) 2)))))) (pow (sqrt (pow (sin ky) 2)) 3))))))) (+ (* -1/2 (/ (* (sin ky) (* (sin th) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2)))))) (pow (sqrt (pow (sin ky) 2)) 3))) (* -1/4 (/ (* (sin ky) (sin th)) (pow (sqrt (pow (sin ky) 2)) 5)))))) (* 1/2 (/ (* (sin ky) (sin th)) (pow (sqrt (pow (sin ky) 2)) 3))))) (/ (* (sin ky) (sin th)) (sqrt (pow (sin ky) 2))))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (/ (sin ky) (sqrt (pow (sin ky) 2)))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow kx 2) (sin ky)) (pow (sqrt (pow (sin ky) 2)) 3))) (/ (sin ky) (sqrt (pow (sin ky) 2))))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ (* (pow kx 2) (- (* -1 (* (pow kx 2) (+ (* -1/2 (/ (* (sin ky) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2))))) (pow (sqrt (pow (sin ky) 2)) 3))) (* -1/4 (/ (sin ky) (pow (sqrt (pow (sin ky) 2)) 5)))))) (* 1/2 (/ (sin ky) (pow (sqrt (pow (sin ky) 2)) 3))))) (/ (sin ky) (sqrt (pow (sin ky) 2))))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ (* (pow kx 2) (- (* (pow kx 2) (- (* -1 (* (pow kx 2) (+ (* -1/2 (/ (+ (* -1/2 (/ (* (sin ky) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2))))) (pow (sqrt (pow (sin ky) 2)) 3))) (* -1/4 (/ (sin ky) (pow (sqrt (pow (sin ky) 2)) 5)))) (pow (sqrt (pow (sin ky) 2)) 2))) (+ (* 1/4 (/ (* (sin ky) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2))))) (pow (sqrt (pow (sin ky) 2)) 5))) (* 1/2 (/ (* (sin ky) (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2)))) (pow (sqrt (pow (sin ky) 2)) 2))))) (pow (sqrt (pow (sin ky) 2)) 3))))))) (+ (* -1/2 (/ (* (sin ky) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2))))) (pow (sqrt (pow (sin ky) 2)) 3))) (* -1/4 (/ (sin ky) (pow (sqrt (pow (sin ky) 2)) 5)))))) (* 1/2 (/ (sin ky) (pow (sqrt (pow (sin ky) 2)) 3))))) (/ (sin ky) (sqrt (pow (sin ky) 2))))))
#s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (sqrt (pow (sin ky) 2))))
#s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (sqrt (pow (sin ky) 2)) (* 1/2 (/ (pow kx 2) (sqrt (pow (sin ky) 2)))))))
#s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (sqrt (pow (sin ky) 2)) (* (pow kx 2) (+ (* -1/2 (/ (* (pow kx 2) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2))))) (sqrt (pow (sin ky) 2)))) (* 1/2 (/ 1 (sqrt (pow (sin ky) 2)))))))))
#s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (sqrt (pow (sin ky) 2)) (* (pow kx 2) (+ (* (pow kx 2) (+ (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2)))) (sqrt (pow (sin ky) 2)))) (* 1/2 (/ (* (pow kx 2) (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2)))) (pow (sqrt (pow (sin ky) 2)) 2))))) (sqrt (pow (sin ky) 2)))))) (* 1/2 (/ 1 (sqrt (pow (sin ky) 2)))))))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (pow (sin ky) 2)))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (pow kx 2) (pow (sin ky) 2))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (* (pow kx 2) (+ 1 (* -1/3 (pow kx 2)))) (pow (sin ky) 2))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (* (pow kx 2) (+ 1 (* (pow kx 2) (- (* 2/45 (pow kx 2)) 1/3)))) (pow (sin ky) 2))))
#s(approx (pow (sin kx) 2) #s(hole binary64 (pow kx 2)))
#s(approx (pow (sin kx) 2) #s(hole binary64 (* (pow kx 2) (+ 1 (* -1/3 (pow kx 2))))))
#s(approx (pow (sin kx) 2) #s(hole binary64 (* (pow kx 2) (+ 1 (* (pow kx 2) (- (* 2/45 (pow kx 2)) 1/3))))))
#s(approx (pow (sin kx) 2) #s(hole binary64 (* (pow kx 2) (+ 1 (* (pow kx 2) (- (* (pow kx 2) (+ 2/45 (* -1/315 (pow kx 2)))) 1/3))))))
#s(approx (sin kx) #s(hole binary64 kx))
#s(approx (sin kx) #s(hole binary64 (* kx (+ 1 (* -1/6 (pow kx 2))))))
#s(approx (sin kx) #s(hole binary64 (* kx (+ 1 (* (pow kx 2) (- (* 1/120 (pow kx 2)) 1/6))))))
#s(approx (sin kx) #s(hole binary64 (* kx (+ 1 (* (pow kx 2) (- (* (pow kx 2) (+ 1/120 (* -1/5040 (pow kx 2)))) 1/6))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (/ (* (sin ky) (sin th)) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))
#s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (pow (sin kx) 2) (pow (sin ky) 2))))
#s(approx (pow (sin kx) 2) #s(hole binary64 (pow (sin kx) 2)))
#s(approx (sin kx) #s(hole binary64 (sin kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (/ (* ky (sin th)) (sqrt (pow (sin kx) 2)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (* ky (+ (* (pow ky 2) (- (* -1/6 (/ (sin th) (sqrt (pow (sin kx) 2)))) (* 1/2 (/ (sin th) (pow (sqrt (pow (sin kx) 2)) 3))))) (/ (sin th) (sqrt (pow (sin kx) 2)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (* ky (+ (* (pow ky 2) (- (+ (* -1/6 (/ (sin th) (sqrt (pow (sin kx) 2)))) (* (pow ky 2) (- (* 1/120 (/ (sin th) (sqrt (pow (sin kx) 2)))) (+ (* -1/2 (/ (* (sin th) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2))))) (pow (sqrt (pow (sin kx) 2)) 3))) (* 1/2 (/ (- (* -1/6 (/ (sin th) (sqrt (pow (sin kx) 2)))) (* 1/2 (/ (sin th) (pow (sqrt (pow (sin kx) 2)) 3)))) (pow (sqrt (pow (sin kx) 2)) 2))))))) (* 1/2 (/ (sin th) (pow (sqrt (pow (sin kx) 2)) 3))))) (/ (sin th) (sqrt (pow (sin kx) 2)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (* ky (+ (* (pow ky 2) (- (+ (* -1/6 (/ (sin th) (sqrt (pow (sin kx) 2)))) (* (pow ky 2) (- (+ (* 1/120 (/ (sin th) (sqrt (pow (sin kx) 2)))) (* (pow ky 2) (- (* -1/5040 (/ (sin th) (sqrt (pow (sin kx) 2)))) (+ (* -1/2 (/ (* (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2)))) (- (* -1/6 (/ (sin th) (sqrt (pow (sin kx) 2)))) (* 1/2 (/ (sin th) (pow (sqrt (pow (sin kx) 2)) 3))))) (pow (sqrt (pow (sin kx) 2)) 2))) (+ (* 1/2 (/ (* (sin th) (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2)))) (pow (sqrt (pow (sin kx) 2)) 2))))) (pow (sqrt (pow (sin kx) 2)) 3))) (* 1/2 (/ (- (* 1/120 (/ (sin th) (sqrt (pow (sin kx) 2)))) (+ (* -1/2 (/ (* (sin th) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2))))) (pow (sqrt (pow (sin kx) 2)) 3))) (* 1/2 (/ (- (* -1/6 (/ (sin th) (sqrt (pow (sin kx) 2)))) (* 1/2 (/ (sin th) (pow (sqrt (pow (sin kx) 2)) 3)))) (pow (sqrt (pow (sin kx) 2)) 2))))) (pow (sqrt (pow (sin kx) 2)) 2)))))))) (+ (* -1/2 (/ (* (sin th) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2))))) (pow (sqrt (pow (sin kx) 2)) 3))) (* 1/2 (/ (- (* -1/6 (/ (sin th) (sqrt (pow (sin kx) 2)))) (* 1/2 (/ (sin th) (pow (sqrt (pow (sin kx) 2)) 3)))) (pow (sqrt (pow (sin kx) 2)) 2))))))) (* 1/2 (/ (sin th) (pow (sqrt (pow (sin kx) 2)) 3))))) (/ (sin th) (sqrt (pow (sin kx) 2)))))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (/ ky (sqrt (pow (sin kx) 2)))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (* ky (+ (* -1 (* (pow ky 2) (+ (* 1/6 (/ 1 (sqrt (pow (sin kx) 2)))) (* 1/2 (/ 1 (pow (sqrt (pow (sin kx) 2)) 3)))))) (/ 1 (sqrt (pow (sin kx) 2)))))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (* ky (+ (* (pow ky 2) (- (* (pow ky 2) (- (* 1/120 (/ 1 (sqrt (pow (sin kx) 2)))) (+ (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2)))) (pow (sqrt (pow (sin kx) 2)) 3))) (* -1/2 (/ (+ (* 1/6 (/ 1 (sqrt (pow (sin kx) 2)))) (* 1/2 (/ 1 (pow (sqrt (pow (sin kx) 2)) 3)))) (pow (sqrt (pow (sin kx) 2)) 2)))))) (+ (* 1/6 (/ 1 (sqrt (pow (sin kx) 2)))) (* 1/2 (/ 1 (pow (sqrt (pow (sin kx) 2)) 3)))))) (/ 1 (sqrt (pow (sin kx) 2)))))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (* ky (+ (* (pow ky 2) (- (* (pow ky 2) (- (+ (* -1 (* (pow ky 2) (+ (* 1/5040 (/ 1 (sqrt (pow (sin kx) 2)))) (+ (* 1/2 (/ (* (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2)))) (+ (* 1/6 (/ 1 (sqrt (pow (sin kx) 2)))) (* 1/2 (/ 1 (pow (sqrt (pow (sin kx) 2)) 3))))) (pow (sqrt (pow (sin kx) 2)) 2))) (+ (* 1/2 (/ (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2)))) (pow (sqrt (pow (sin kx) 2)) 2)))) (pow (sqrt (pow (sin kx) 2)) 3))) (* 1/2 (/ (- (* 1/120 (/ 1 (sqrt (pow (sin kx) 2)))) (+ (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2)))) (pow (sqrt (pow (sin kx) 2)) 3))) (* -1/2 (/ (+ (* 1/6 (/ 1 (sqrt (pow (sin kx) 2)))) (* 1/2 (/ 1 (pow (sqrt (pow (sin kx) 2)) 3)))) (pow (sqrt (pow (sin kx) 2)) 2))))) (pow (sqrt (pow (sin kx) 2)) 2)))))))) (* 1/120 (/ 1 (sqrt (pow (sin kx) 2))))) (+ (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2)))) (pow (sqrt (pow (sin kx) 2)) 3))) (* -1/2 (/ (+ (* 1/6 (/ 1 (sqrt (pow (sin kx) 2)))) (* 1/2 (/ 1 (pow (sqrt (pow (sin kx) 2)) 3)))) (pow (sqrt (pow (sin kx) 2)) 2)))))) (+ (* 1/6 (/ 1 (sqrt (pow (sin kx) 2)))) (* 1/2 (/ 1 (pow (sqrt (pow (sin kx) 2)) 3)))))) (/ 1 (sqrt (pow (sin kx) 2)))))))
#s(approx (sin ky) #s(hole binary64 ky))
#s(approx (sin ky) #s(hole binary64 (* ky (+ 1 (* -1/6 (pow ky 2))))))
#s(approx (sin ky) #s(hole binary64 (* ky (+ 1 (* (pow ky 2) (- (* 1/120 (pow ky 2)) 1/6))))))
#s(approx (sin ky) #s(hole binary64 (* ky (+ 1 (* (pow ky 2) (- (* (pow ky 2) (+ 1/120 (* -1/5040 (pow ky 2)))) 1/6))))))
#s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (sqrt (pow (sin kx) 2))))
#s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (sqrt (pow (sin kx) 2)) (* 1/2 (/ (pow ky 2) (sqrt (pow (sin kx) 2)))))))
#s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (sqrt (pow (sin kx) 2)) (* (pow ky 2) (+ (* -1/2 (/ (* (pow ky 2) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2))))) (sqrt (pow (sin kx) 2)))) (* 1/2 (/ 1 (sqrt (pow (sin kx) 2)))))))))
#s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (sqrt (pow (sin kx) 2)) (* (pow ky 2) (+ (* (pow ky 2) (+ (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2)))) (sqrt (pow (sin kx) 2)))) (* 1/2 (/ (* (pow ky 2) (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2)))) (pow (sqrt (pow (sin kx) 2)) 2))))) (sqrt (pow (sin kx) 2)))))) (* 1/2 (/ 1 (sqrt (pow (sin kx) 2)))))))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (pow ky 2) (pow (sin kx) 2))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2)))) (pow (sin kx) 2))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3)))) (pow (sin kx) 2))))
#s(approx (pow (sin ky) 2) #s(hole binary64 (pow ky 2)))
#s(approx (pow (sin ky) 2) #s(hole binary64 (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2))))))
#s(approx (pow (sin ky) 2) #s(hole binary64 (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3))))))
#s(approx (pow (sin ky) 2) #s(hole binary64 (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* (pow ky 2) (+ 2/45 (* -1/315 (pow ky 2)))) 1/3))))))
#s(approx (sin ky) #s(hole binary64 (sin ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (/ (* th (sin ky)) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (* th (+ (* -1/6 (/ (* (pow th 2) (sin ky)) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (* th (+ (* (pow th 2) (+ (* -1/6 (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 1/120 (/ (* (pow th 2) (sin ky)) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (* th (+ (* (pow th 2) (+ (* -1/6 (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* (pow th 2) (+ (* -1/5040 (/ (* (pow th 2) (sin ky)) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 1/120 (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))
#s(approx (sin th) #s(hole binary64 th))
#s(approx (sin th) #s(hole binary64 (* th (+ 1 (* -1/6 (pow th 2))))))
#s(approx (sin th) #s(hole binary64 (* th (+ 1 (* (pow th 2) (- (* 1/120 (pow th 2)) 1/6))))))
#s(approx (sin th) #s(hole binary64 (* th (+ 1 (* (pow th 2) (- (* (pow th 2) (+ 1/120 (* -1/5040 (pow th 2)))) 1/6))))))
#s(approx (sin th) #s(hole binary64 (sin th)))
Outputs
(*.f64 (sin.f64 th) (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))
(*.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (sin.f64 th))
(*.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))
(/.f64 (neg.f64 (neg.f64 (*.f64 (sin.f64 th) (sin.f64 ky)))) (neg.f64 (neg.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))
(/.f64 (neg.f64 (*.f64 (sin.f64 th) (sin.f64 ky))) (neg.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky))))
(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))
(/.f64 (neg.f64 (neg.f64 (sin.f64 ky))) (neg.f64 (neg.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))
(/.f64 (neg.f64 (sin.f64 ky)) (neg.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky))))
(/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))
(pow.f64 (sin.f64 ky) #s(literal 1 binary64))
(sin.f64 ky)
(exp.f64 (*.f64 (log.f64 (sin.f64 ky)) #s(literal 1 binary64)))
ky
(pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 1/2 binary64))
(/.f64 (sqrt.f64 (-.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 (sin.f64 ky) #s(literal 4 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
(/.f64 (hypot.f64 (pow.f64 (sin.f64 kx) #s(literal 3 binary64)) (pow.f64 (sin.f64 ky) #s(literal 3 binary64))) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (*.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal 2 binary64))))))
(/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -1/2 binary64)))
(sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))
(hypot.f64 (fabs.f64 (fabs.f64 (sin.f64 kx))) (fabs.f64 (fabs.f64 (sin.f64 ky))))
(hypot.f64 (fabs.f64 (fabs.f64 (sin.f64 kx))) (exp.f64 (log.f64 (sin.f64 ky))))
(hypot.f64 (fabs.f64 (fabs.f64 (sin.f64 kx))) (exp.f64 (log.f64 (fabs.f64 (sin.f64 ky)))))
(hypot.f64 (fabs.f64 (fabs.f64 (sin.f64 kx))) (neg.f64 (sin.f64 ky)))
(hypot.f64 (fabs.f64 (fabs.f64 (sin.f64 kx))) (neg.f64 (fabs.f64 (sin.f64 ky))))
(hypot.f64 (fabs.f64 (fabs.f64 (sin.f64 kx))) (fabs.f64 (sin.f64 ky)))
(hypot.f64 (fabs.f64 (fabs.f64 (sin.f64 kx))) (sin.f64 ky))
(hypot.f64 (fabs.f64 (fabs.f64 (sin.f64 ky))) (fabs.f64 (fabs.f64 (sin.f64 kx))))
(hypot.f64 (fabs.f64 (fabs.f64 (sin.f64 ky))) (neg.f64 (sin.f64 kx)))
(hypot.f64 (fabs.f64 (fabs.f64 (sin.f64 ky))) (exp.f64 (log.f64 (sin.f64 kx))))
(hypot.f64 (fabs.f64 (fabs.f64 (sin.f64 ky))) (exp.f64 (log.f64 (fabs.f64 (sin.f64 kx)))))
(hypot.f64 (fabs.f64 (fabs.f64 (sin.f64 ky))) (neg.f64 (fabs.f64 (sin.f64 kx))))
(hypot.f64 (fabs.f64 (fabs.f64 (sin.f64 ky))) (fabs.f64 (sin.f64 kx)))
(hypot.f64 (fabs.f64 (fabs.f64 (sin.f64 ky))) (sin.f64 kx))
(hypot.f64 (neg.f64 (sin.f64 kx)) (fabs.f64 (fabs.f64 (sin.f64 ky))))
(hypot.f64 (neg.f64 (sin.f64 kx)) (exp.f64 (log.f64 (sin.f64 ky))))
(hypot.f64 (neg.f64 (sin.f64 kx)) (exp.f64 (log.f64 (fabs.f64 (sin.f64 ky)))))
(hypot.f64 (neg.f64 (sin.f64 kx)) (neg.f64 (sin.f64 ky)))
(hypot.f64 (neg.f64 (sin.f64 kx)) (neg.f64 (fabs.f64 (sin.f64 ky))))
(hypot.f64 (neg.f64 (sin.f64 kx)) (fabs.f64 (sin.f64 ky)))
(hypot.f64 (neg.f64 (sin.f64 kx)) (sin.f64 ky))
(hypot.f64 (exp.f64 (log.f64 (sin.f64 ky))) (fabs.f64 (fabs.f64 (sin.f64 kx))))
(hypot.f64 (exp.f64 (log.f64 (sin.f64 ky))) (neg.f64 (sin.f64 kx)))
(hypot.f64 (exp.f64 (log.f64 (sin.f64 ky))) (exp.f64 (log.f64 (sin.f64 kx))))
(hypot.f64 (exp.f64 (log.f64 (sin.f64 ky))) (exp.f64 (log.f64 (fabs.f64 (sin.f64 kx)))))
(hypot.f64 (exp.f64 (log.f64 (sin.f64 ky))) (neg.f64 (fabs.f64 (sin.f64 kx))))
(hypot.f64 (exp.f64 (log.f64 (sin.f64 ky))) (fabs.f64 (sin.f64 kx)))
(hypot.f64 (exp.f64 (log.f64 (sin.f64 ky))) (sin.f64 kx))
(hypot.f64 (exp.f64 (log.f64 (sin.f64 kx))) (fabs.f64 (fabs.f64 (sin.f64 ky))))
(hypot.f64 (exp.f64 (log.f64 (sin.f64 kx))) (exp.f64 (log.f64 (sin.f64 ky))))
(hypot.f64 (exp.f64 (log.f64 (sin.f64 kx))) (exp.f64 (log.f64 (fabs.f64 (sin.f64 ky)))))
(hypot.f64 (exp.f64 (log.f64 (sin.f64 kx))) (neg.f64 (sin.f64 ky)))
(hypot.f64 (exp.f64 (log.f64 (sin.f64 kx))) (neg.f64 (fabs.f64 (sin.f64 ky))))
(hypot.f64 (exp.f64 (log.f64 (sin.f64 kx))) (fabs.f64 (sin.f64 ky)))
(hypot.f64 (exp.f64 (log.f64 (sin.f64 kx))) (sin.f64 ky))
(hypot.f64 (exp.f64 (log.f64 (fabs.f64 (sin.f64 ky)))) (fabs.f64 (fabs.f64 (sin.f64 kx))))
(hypot.f64 (exp.f64 (log.f64 (fabs.f64 (sin.f64 ky)))) (neg.f64 (sin.f64 kx)))
(hypot.f64 (exp.f64 (log.f64 (fabs.f64 (sin.f64 ky)))) (exp.f64 (log.f64 (sin.f64 kx))))
(hypot.f64 (exp.f64 (log.f64 (fabs.f64 (sin.f64 ky)))) (exp.f64 (log.f64 (fabs.f64 (sin.f64 kx)))))
(hypot.f64 (exp.f64 (log.f64 (fabs.f64 (sin.f64 ky)))) (neg.f64 (fabs.f64 (sin.f64 kx))))
(hypot.f64 (exp.f64 (log.f64 (fabs.f64 (sin.f64 ky)))) (fabs.f64 (sin.f64 kx)))
(hypot.f64 (exp.f64 (log.f64 (fabs.f64 (sin.f64 ky)))) (sin.f64 kx))
(hypot.f64 (exp.f64 (log.f64 (fabs.f64 (sin.f64 kx)))) (fabs.f64 (fabs.f64 (sin.f64 ky))))
(hypot.f64 (exp.f64 (log.f64 (fabs.f64 (sin.f64 kx)))) (exp.f64 (log.f64 (sin.f64 ky))))
(hypot.f64 (exp.f64 (log.f64 (fabs.f64 (sin.f64 kx)))) (exp.f64 (log.f64 (fabs.f64 (sin.f64 ky)))))
(hypot.f64 (exp.f64 (log.f64 (fabs.f64 (sin.f64 kx)))) (neg.f64 (sin.f64 ky)))
(hypot.f64 (exp.f64 (log.f64 (fabs.f64 (sin.f64 kx)))) (neg.f64 (fabs.f64 (sin.f64 ky))))
(hypot.f64 (exp.f64 (log.f64 (fabs.f64 (sin.f64 kx)))) (fabs.f64 (sin.f64 ky)))
(hypot.f64 (exp.f64 (log.f64 (fabs.f64 (sin.f64 kx)))) (sin.f64 ky))
(hypot.f64 (neg.f64 (fabs.f64 (sin.f64 kx))) (fabs.f64 (fabs.f64 (sin.f64 ky))))
(hypot.f64 (neg.f64 (fabs.f64 (sin.f64 kx))) (exp.f64 (log.f64 (sin.f64 ky))))
(hypot.f64 (neg.f64 (fabs.f64 (sin.f64 kx))) (exp.f64 (log.f64 (fabs.f64 (sin.f64 ky)))))
(hypot.f64 (neg.f64 (fabs.f64 (sin.f64 kx))) (neg.f64 (sin.f64 ky)))
(hypot.f64 (neg.f64 (fabs.f64 (sin.f64 kx))) (neg.f64 (fabs.f64 (sin.f64 ky))))
(hypot.f64 (neg.f64 (fabs.f64 (sin.f64 kx))) (fabs.f64 (sin.f64 ky)))
(hypot.f64 (neg.f64 (fabs.f64 (sin.f64 kx))) (sin.f64 ky))
(hypot.f64 (neg.f64 (sin.f64 ky)) (fabs.f64 (fabs.f64 (sin.f64 kx))))
(hypot.f64 (neg.f64 (sin.f64 ky)) (neg.f64 (sin.f64 kx)))
(hypot.f64 (neg.f64 (sin.f64 ky)) (exp.f64 (log.f64 (sin.f64 kx))))
(hypot.f64 (neg.f64 (sin.f64 ky)) (exp.f64 (log.f64 (fabs.f64 (sin.f64 kx)))))
(hypot.f64 (neg.f64 (sin.f64 ky)) (neg.f64 (fabs.f64 (sin.f64 kx))))
(hypot.f64 (neg.f64 (sin.f64 ky)) (fabs.f64 (sin.f64 kx)))
(hypot.f64 (neg.f64 (sin.f64 ky)) (sin.f64 kx))
(hypot.f64 (neg.f64 (fabs.f64 (sin.f64 ky))) (fabs.f64 (fabs.f64 (sin.f64 kx))))
(hypot.f64 (neg.f64 (fabs.f64 (sin.f64 ky))) (neg.f64 (sin.f64 kx)))
(hypot.f64 (neg.f64 (fabs.f64 (sin.f64 ky))) (exp.f64 (log.f64 (sin.f64 kx))))
(hypot.f64 (neg.f64 (fabs.f64 (sin.f64 ky))) (exp.f64 (log.f64 (fabs.f64 (sin.f64 kx)))))
(hypot.f64 (neg.f64 (fabs.f64 (sin.f64 ky))) (neg.f64 (fabs.f64 (sin.f64 kx))))
(hypot.f64 (neg.f64 (fabs.f64 (sin.f64 ky))) (fabs.f64 (sin.f64 kx)))
(hypot.f64 (neg.f64 (fabs.f64 (sin.f64 ky))) (sin.f64 kx))
(hypot.f64 (fabs.f64 (sin.f64 kx)) (fabs.f64 (fabs.f64 (sin.f64 ky))))
(hypot.f64 (fabs.f64 (sin.f64 kx)) (exp.f64 (log.f64 (sin.f64 ky))))
(hypot.f64 (fabs.f64 (sin.f64 kx)) (exp.f64 (log.f64 (fabs.f64 (sin.f64 ky)))))
(hypot.f64 (fabs.f64 (sin.f64 kx)) (neg.f64 (sin.f64 ky)))
(hypot.f64 (fabs.f64 (sin.f64 kx)) (neg.f64 (fabs.f64 (sin.f64 ky))))
(hypot.f64 (fabs.f64 (sin.f64 kx)) (fabs.f64 (sin.f64 ky)))
(hypot.f64 (fabs.f64 (sin.f64 kx)) (sin.f64 ky))
(hypot.f64 (fabs.f64 (sin.f64 ky)) (fabs.f64 (fabs.f64 (sin.f64 kx))))
(hypot.f64 (fabs.f64 (sin.f64 ky)) (neg.f64 (sin.f64 kx)))
(hypot.f64 (fabs.f64 (sin.f64 ky)) (exp.f64 (log.f64 (sin.f64 kx))))
(hypot.f64 (fabs.f64 (sin.f64 ky)) (exp.f64 (log.f64 (fabs.f64 (sin.f64 kx)))))
(hypot.f64 (fabs.f64 (sin.f64 ky)) (neg.f64 (fabs.f64 (sin.f64 kx))))
(hypot.f64 (fabs.f64 (sin.f64 ky)) (fabs.f64 (sin.f64 kx)))
(hypot.f64 (fabs.f64 (sin.f64 ky)) (sin.f64 kx))
(hypot.f64 (sin.f64 kx) (fabs.f64 (fabs.f64 (sin.f64 ky))))
(hypot.f64 (sin.f64 kx) (exp.f64 (log.f64 (sin.f64 ky))))
(hypot.f64 (sin.f64 kx) (exp.f64 (log.f64 (fabs.f64 (sin.f64 ky)))))
(hypot.f64 (sin.f64 kx) (neg.f64 (sin.f64 ky)))
(hypot.f64 (sin.f64 kx) (neg.f64 (fabs.f64 (sin.f64 ky))))
(hypot.f64 (sin.f64 kx) (fabs.f64 (sin.f64 ky)))
(hypot.f64 (sin.f64 kx) (sin.f64 ky))
(hypot.f64 (sin.f64 ky) (fabs.f64 (fabs.f64 (sin.f64 kx))))
(hypot.f64 (sin.f64 ky) (neg.f64 (sin.f64 kx)))
(hypot.f64 (sin.f64 ky) (exp.f64 (log.f64 (sin.f64 kx))))
(hypot.f64 (sin.f64 ky) (exp.f64 (log.f64 (fabs.f64 (sin.f64 kx)))))
(hypot.f64 (sin.f64 ky) (neg.f64 (fabs.f64 (sin.f64 kx))))
(hypot.f64 (sin.f64 ky) (fabs.f64 (sin.f64 kx)))
(hypot.f64 (sin.f64 ky) (sin.f64 kx))
(exp.f64 (*.f64 (log.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) #s(literal 1/2 binary64)))
(/.f64 (neg.f64 (-.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 (sin.f64 ky) #s(literal 4 binary64)))) (neg.f64 (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
(/.f64 (neg.f64 (+.f64 (exp.f64 (*.f64 (*.f64 (log.f64 (sin.f64 kx)) #s(literal 2 binary64)) #s(literal 3 binary64))) (exp.f64 (*.f64 (*.f64 (log.f64 (sin.f64 ky)) #s(literal 2 binary64)) #s(literal 3 binary64))))) (neg.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (*.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal 2 binary64))))))
(/.f64 (-.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 (sin.f64 ky) #s(literal 4 binary64))) (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))
(/.f64 (+.f64 (exp.f64 (*.f64 (*.f64 (log.f64 (sin.f64 kx)) #s(literal 2 binary64)) #s(literal 3 binary64))) (exp.f64 (*.f64 (*.f64 (log.f64 (sin.f64 ky)) #s(literal 2 binary64)) #s(literal 3 binary64)))) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (*.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal 2 binary64)))))
(fma.f64 (fabs.f64 (fabs.f64 (sin.f64 kx))) (fabs.f64 (fabs.f64 (sin.f64 kx))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))
(fma.f64 (fabs.f64 (fabs.f64 (sin.f64 ky))) (fabs.f64 (fabs.f64 (sin.f64 ky))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))
(fma.f64 (neg.f64 (sin.f64 kx)) (neg.f64 (sin.f64 kx)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))
(fma.f64 (exp.f64 (log.f64 (sin.f64 ky))) (exp.f64 (log.f64 (sin.f64 ky))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))
(fma.f64 (exp.f64 (log.f64 (sin.f64 kx))) (exp.f64 (log.f64 (sin.f64 kx))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))
(fma.f64 (exp.f64 (log.f64 (fabs.f64 (sin.f64 ky)))) (exp.f64 (log.f64 (fabs.f64 (sin.f64 ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))
(fma.f64 (exp.f64 (log.f64 (fabs.f64 (sin.f64 kx)))) (exp.f64 (log.f64 (fabs.f64 (sin.f64 kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))
(fma.f64 (neg.f64 (fabs.f64 (sin.f64 kx))) (neg.f64 (fabs.f64 (sin.f64 kx))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))
(fma.f64 (neg.f64 (sin.f64 ky)) (neg.f64 (sin.f64 ky)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))
(fma.f64 (neg.f64 (fabs.f64 (sin.f64 ky))) (neg.f64 (fabs.f64 (sin.f64 ky))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))
(fma.f64 (fabs.f64 (sin.f64 kx)) (fabs.f64 (sin.f64 kx)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))
(fma.f64 (fabs.f64 (sin.f64 ky)) (fabs.f64 (sin.f64 ky)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))
(fma.f64 (sin.f64 kx) (sin.f64 kx) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))
(fma.f64 (sin.f64 ky) (sin.f64 ky) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))
(-.f64 (/.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
(+.f64 (/.f64 (exp.f64 (*.f64 (*.f64 (log.f64 (sin.f64 kx)) #s(literal 2 binary64)) #s(literal 3 binary64))) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (*.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal 2 binary64))))) (/.f64 (exp.f64 (*.f64 (*.f64 (log.f64 (sin.f64 ky)) #s(literal 2 binary64)) #s(literal 3 binary64))) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (*.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal 2 binary64))))))
(+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))
(+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))
(*.f64 (fabs.f64 (fabs.f64 (sin.f64 kx))) (fabs.f64 (fabs.f64 (sin.f64 kx))))
(*.f64 (neg.f64 (sin.f64 kx)) (neg.f64 (sin.f64 kx)))
(*.f64 (exp.f64 (log.f64 (sin.f64 kx))) (exp.f64 (log.f64 (sin.f64 kx))))
(*.f64 (exp.f64 (log.f64 (fabs.f64 (sin.f64 kx)))) (exp.f64 (log.f64 (fabs.f64 (sin.f64 kx)))))
(*.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 (exp.f64 (log.f64 (sin.f64 kx))) #s(literal 2 binary64))
(pow.f64 (exp.f64 (log.f64 (fabs.f64 (sin.f64 kx)))) #s(literal 2 binary64))
(pow.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) #s(literal 1/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 1 binary64))
(pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 2 binary64))
(pow.f64 (sin.f64 kx) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx))) #s(literal 2 binary64))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))
(sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)))
(exp.f64 (*.f64 (*.f64 (log.f64 (sin.f64 kx)) #s(literal 2 binary64)) #s(literal 1 binary64)))
(exp.f64 (*.f64 (log.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 1 binary64)))
(exp.f64 (*.f64 (log.f64 (sin.f64 kx)) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (fabs.f64 (sin.f64 kx))) #s(literal 2 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 (sin.f64 kx)) #s(literal 2 binary64))) (sinh.f64 (*.f64 (log.f64 (sin.f64 kx)) #s(literal 2 binary64))))
(+.f64 (cosh.f64 (*.f64 (log.f64 (fabs.f64 (sin.f64 kx))) #s(literal 2 binary64))) (sinh.f64 (*.f64 (log.f64 (fabs.f64 (sin.f64 kx))) #s(literal 2 binary64))))
(pow.f64 (sin.f64 kx) #s(literal 1 binary64))
(sin.f64 kx)
(exp.f64 (*.f64 (log.f64 (sin.f64 kx)) #s(literal 1 binary64)))
kx
#s(literal 2 binary64)
(*.f64 (fabs.f64 (fabs.f64 (sin.f64 ky))) (fabs.f64 (fabs.f64 (sin.f64 ky))))
(*.f64 (exp.f64 (log.f64 (sin.f64 ky))) (exp.f64 (log.f64 (sin.f64 ky))))
(*.f64 (exp.f64 (log.f64 (fabs.f64 (sin.f64 ky)))) (exp.f64 (log.f64 (fabs.f64 (sin.f64 ky)))))
(*.f64 (neg.f64 (sin.f64 ky)) (neg.f64 (sin.f64 ky)))
(*.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 (sin.f64 ky) (sin.f64 ky))
(pow.f64 (exp.f64 (log.f64 (sin.f64 ky))) #s(literal 2 binary64))
(pow.f64 (exp.f64 (log.f64 (fabs.f64 (sin.f64 ky)))) #s(literal 2 binary64))
(pow.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) #s(literal 1/2 binary64))
(pow.f64 (fabs.f64 (sin.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) ky)))) #s(literal 1 binary64))
(pow.f64 (sin.f64 ky) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 ky ky)) (cos.f64 (+.f64 ky ky))) #s(literal 2 binary64))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))
(sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)))
(exp.f64 (*.f64 (*.f64 (log.f64 (sin.f64 ky)) #s(literal 2 binary64)) #s(literal 1 binary64)))
(exp.f64 (*.f64 (log.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 1 binary64)))
(exp.f64 (*.f64 (log.f64 (fabs.f64 (sin.f64 ky))) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (sin.f64 ky)) #s(literal 2 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 (sin.f64 ky)) #s(literal 2 binary64))) (sinh.f64 (*.f64 (log.f64 (sin.f64 ky)) #s(literal 2 binary64))))
(+.f64 (cosh.f64 (*.f64 (log.f64 (fabs.f64 (sin.f64 ky))) #s(literal 2 binary64))) (sinh.f64 (*.f64 (log.f64 (fabs.f64 (sin.f64 ky))) #s(literal 2 binary64))))
(sin.f64 th)
th
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.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)) (fma.f64 (/.f64 (*.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (*.f64 kx kx)) (pow.f64 (fabs.f64 (sin.f64 ky)) #s(literal 3 binary64))) #s(literal -1/2 binary64) (/.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)) (fma.f64 (-.f64 (neg.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (+.f64 (/.f64 #s(literal 1/4 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)) (sin.f64 th)) (sin.f64 ky)) (pow.f64 (fabs.f64 (sin.f64 ky)) #s(literal 3 binary64))) #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (pow.f64 (fabs.f64 (sin.f64 ky)) #s(literal 5 binary64))) #s(literal -1/4 binary64))) (*.f64 kx kx))) (*.f64 (/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (pow.f64 (fabs.f64 (sin.f64 ky)) #s(literal 3 binary64))) #s(literal 1/2 binary64))) (*.f64 kx kx) (/.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)) (fma.f64 (fma.f64 (-.f64 (neg.f64 (*.f64 (*.f64 kx kx) (fma.f64 (/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (+.f64 (/.f64 #s(literal 1/4 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)) (sin.f64 th)) (sin.f64 ky)) (pow.f64 (fabs.f64 (sin.f64 ky)) #s(literal 3 binary64))) #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (pow.f64 (fabs.f64 (sin.f64 ky)) #s(literal 5 binary64))) #s(literal -1/4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -1/2 binary64) (fma.f64 (/.f64 (*.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (-.f64 #s(literal 2/45 binary64) (*.f64 (/.f64 (+.f64 (/.f64 #s(literal 1/4 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) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -1/2 binary64)))) (pow.f64 (fabs.f64 (sin.f64 ky)) #s(literal 3 binary64))) #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 (/.f64 #s(literal 1/4 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)) (sin.f64 th)) (sin.f64 ky)) (pow.f64 (fabs.f64 (sin.f64 ky)) #s(literal 5 binary64))) #s(literal 1/4 binary64)))))) (fma.f64 (/.f64 (*.f64 (*.f64 (+.f64 (/.f64 #s(literal 1/4 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)) (sin.f64 th)) (sin.f64 ky)) (pow.f64 (fabs.f64 (sin.f64 ky)) #s(literal 3 binary64))) #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (pow.f64 (fabs.f64 (sin.f64 ky)) #s(literal 5 binary64))) #s(literal -1/4 binary64)))) (*.f64 kx kx) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (pow.f64 (fabs.f64 (sin.f64 ky)) #s(literal 3 binary64))))) (*.f64 kx kx) (/.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)))) (/.f64 (sin.f64 ky) (fabs.f64 (sin.f64 ky))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 kx kx) (sin.f64 ky)) (pow.f64 (fabs.f64 (sin.f64 ky)) #s(literal 3 binary64))) (/.f64 (sin.f64 ky) (fabs.f64 (sin.f64 ky)))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 (-.f64 (neg.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (+.f64 (/.f64 #s(literal 1/4 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)) (sin.f64 ky)) (pow.f64 (fabs.f64 (sin.f64 ky)) #s(literal 3 binary64))) #s(literal -1/2 binary64) (/.f64 (*.f64 #s(literal -1/4 binary64) (sin.f64 ky)) (pow.f64 (fabs.f64 (sin.f64 ky)) #s(literal 5 binary64)))) (*.f64 kx kx))) (/.f64 (*.f64 #s(literal 1/2 binary64) (sin.f64 ky)) (pow.f64 (fabs.f64 (sin.f64 ky)) #s(literal 3 binary64)))) (*.f64 kx kx) (/.f64 (sin.f64 ky) (fabs.f64 (sin.f64 ky)))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 (fma.f64 (-.f64 (neg.f64 (*.f64 (*.f64 kx kx) (fma.f64 (/.f64 (fma.f64 (/.f64 (*.f64 (+.f64 (/.f64 #s(literal 1/4 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)) (sin.f64 ky)) (pow.f64 (fabs.f64 (sin.f64 ky)) #s(literal 3 binary64))) #s(literal -1/2 binary64) (/.f64 (*.f64 #s(literal -1/4 binary64) (sin.f64 ky)) (pow.f64 (fabs.f64 (sin.f64 ky)) #s(literal 5 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -1/2 binary64) (fma.f64 (*.f64 (sin.f64 ky) (/.f64 (-.f64 #s(literal 2/45 binary64) (*.f64 (/.f64 (+.f64 (/.f64 #s(literal 1/4 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) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -1/2 binary64))) (pow.f64 (fabs.f64 (sin.f64 ky)) #s(literal 3 binary64)))) #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 #s(literal 1/4 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)) (sin.f64 ky)) (pow.f64 (fabs.f64 (sin.f64 ky)) #s(literal 5 binary64))) #s(literal 1/4 binary64)))))) (fma.f64 (/.f64 (*.f64 (+.f64 (/.f64 #s(literal 1/4 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)) (sin.f64 ky)) (pow.f64 (fabs.f64 (sin.f64 ky)) #s(literal 3 binary64))) #s(literal -1/2 binary64) (/.f64 (*.f64 #s(literal -1/4 binary64) (sin.f64 ky)) (pow.f64 (fabs.f64 (sin.f64 ky)) #s(literal 5 binary64))))) (*.f64 kx kx) (*.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 ky) (pow.f64 (fabs.f64 (sin.f64 ky)) #s(literal 3 binary64))))) (*.f64 kx kx) (/.f64 (sin.f64 ky) (fabs.f64 (sin.f64 ky)))))
#s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 (sin.f64 ky)))
#s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fma.f64 (/.f64 (*.f64 kx kx) (fabs.f64 (sin.f64 ky))) #s(literal 1/2 binary64) (fabs.f64 (sin.f64 ky))))
#s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fma.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 (/.f64 #s(literal 1/4 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 kx kx)) #s(literal 1/2 binary64)) (fabs.f64 (sin.f64 ky))) (*.f64 kx kx) (fabs.f64 (sin.f64 ky))))
#s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fma.f64 (fma.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 #s(literal 2/45 binary64) (*.f64 (/.f64 (+.f64 (/.f64 #s(literal 1/4 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) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -1/2 binary64))) (*.f64 kx kx)) (*.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 #s(literal 1/4 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)))) (fabs.f64 (sin.f64 ky))) (*.f64 kx kx) (/.f64 #s(literal 1/2 binary64) (fabs.f64 (sin.f64 ky)))) (*.f64 kx kx) (fabs.f64 (sin.f64 ky))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 kx kx (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 (fma.f64 (-.f64 (*.f64 #s(literal 2/45 binary64) (*.f64 kx kx)) #s(literal 1/3 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))
#s(approx (pow (sin kx) 2) (*.f64 kx kx))
#s(approx (pow (sin kx) 2) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))
#s(approx (pow (sin kx) 2) (*.f64 (fma.f64 (-.f64 (*.f64 #s(literal 2/45 binary64) (*.f64 kx kx)) #s(literal 1/3 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))
#s(approx (pow (sin kx) 2) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -1/315 binary64) (*.f64 kx kx) #s(literal 2/45 binary64)) (*.f64 kx kx)) #s(literal 1/3 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))
#s(approx (sin kx) kx)
#s(approx (sin kx) (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 kx kx) #s(literal 1 binary64)) kx))
#s(approx (sin kx) (*.f64 (fma.f64 (-.f64 (*.f64 #s(literal 1/120 binary64) (*.f64 kx kx)) #s(literal 1/6 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) kx))
#s(approx (sin kx) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 kx kx) #s(literal 1/120 binary64)) (*.f64 kx kx)) #s(literal 1/6 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) kx))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (sin.f64 th) (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))
#s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))
#s(approx (pow (sin kx) 2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))
#s(approx (sin kx) (sin.f64 kx))
#s(approx (* (/ (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 (fma.f64 (fma.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx))) (*.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 3 binary64))))) (*.f64 ky ky) (/.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 (fma.f64 (-.f64 (fma.f64 (-.f64 (/.f64 (*.f64 #s(literal 1/120 binary64) (sin.f64 th)) (fabs.f64 (sin.f64 kx))) (fma.f64 (/.f64 (*.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 1/3 binary64)) (sin.f64 th)) (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 3 binary64))) #s(literal -1/2 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx))) (*.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 3 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 1/2 binary64)))) (*.f64 ky ky) (/.f64 (*.f64 #s(literal -1/6 binary64) (sin.f64 th)) (fabs.f64 (sin.f64 kx)))) (*.f64 (/.f64 (sin.f64 th) (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 3 binary64))) #s(literal 1/2 binary64))) (*.f64 ky ky) (/.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 (fma.f64 (fma.f64 (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx))) #s(literal -1/6 binary64) (-.f64 (*.f64 (-.f64 (fma.f64 (-.f64 (/.f64 (*.f64 #s(literal -1/5040 binary64) (sin.f64 th)) (fabs.f64 (sin.f64 kx))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 (sin.f64 th) (/.f64 (-.f64 #s(literal 2/45 binary64) (*.f64 (/.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 1/3 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal -1/2 binary64))) (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 3 binary64))) (/.f64 (-.f64 (/.f64 (*.f64 #s(literal 1/120 binary64) (sin.f64 th)) (fabs.f64 (sin.f64 kx))) (fma.f64 (/.f64 (*.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 1/3 binary64)) (sin.f64 th)) (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 3 binary64))) #s(literal -1/2 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx))) (*.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 3 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))) (*.f64 (*.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 1/3 binary64)) (/.f64 (fma.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx))) (*.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 3 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))) #s(literal -1/2 binary64)))) (*.f64 ky ky) (/.f64 (*.f64 #s(literal 1/120 binary64) (sin.f64 th)) (fabs.f64 (sin.f64 kx)))) (fma.f64 (/.f64 (*.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 1/3 binary64)) (sin.f64 th)) (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 3 binary64))) #s(literal -1/2 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx))) (*.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 3 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 1/2 binary64)))) (*.f64 ky ky)) (*.f64 (/.f64 (sin.f64 th) (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 3 binary64))) #s(literal 1/2 binary64)))) (*.f64 ky ky) (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx)))) ky))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (fabs.f64 (sin.f64 kx))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (*.f64 (+.f64 (neg.f64 (*.f64 (fma.f64 (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal -3 binary64)) #s(literal 1/2 binary64) (/.f64 #s(literal 1/6 binary64) (fabs.f64 (sin.f64 kx)))) (*.f64 ky ky))) (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx)))) ky))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (*.f64 (fma.f64 (-.f64 (*.f64 (-.f64 (/.f64 #s(literal 1/120 binary64) (fabs.f64 (sin.f64 kx))) (*.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 1/3 binary64)) (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 3 binary64))) (/.f64 (fma.f64 (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal -3 binary64)) #s(literal 1/2 binary64) (/.f64 #s(literal 1/6 binary64) (fabs.f64 (sin.f64 kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))) (*.f64 ky ky)) (fma.f64 (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal -3 binary64)) #s(literal 1/2 binary64) (/.f64 #s(literal 1/6 binary64) (fabs.f64 (sin.f64 kx))))) (*.f64 ky ky) (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx)))) ky))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (*.f64 (fma.f64 (-.f64 (*.f64 (*.f64 ky ky) (-.f64 (+.f64 (neg.f64 (*.f64 (*.f64 ky ky) (+.f64 (fma.f64 (*.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 1/3 binary64)) (/.f64 (fma.f64 (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal -3 binary64)) #s(literal 1/2 binary64) (/.f64 #s(literal 1/6 binary64) (fabs.f64 (sin.f64 kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))) #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (-.f64 #s(literal 2/45 binary64) (*.f64 (/.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 1/3 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal -1/2 binary64))) (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 3 binary64))) (/.f64 (-.f64 (/.f64 #s(literal 1/120 binary64) (fabs.f64 (sin.f64 kx))) (*.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 1/3 binary64)) (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 3 binary64))) (/.f64 (fma.f64 (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal -3 binary64)) #s(literal 1/2 binary64) (/.f64 #s(literal 1/6 binary64) (fabs.f64 (sin.f64 kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))) (/.f64 #s(literal 1/5040 binary64) (fabs.f64 (sin.f64 kx)))))) (/.f64 #s(literal 1/120 binary64) (fabs.f64 (sin.f64 kx)))) (*.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 1/3 binary64)) (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 3 binary64))) (/.f64 (fma.f64 (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal -3 binary64)) #s(literal 1/2 binary64) (/.f64 #s(literal 1/6 binary64) (fabs.f64 (sin.f64 kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))) (fma.f64 (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal -3 binary64)) #s(literal 1/2 binary64) (/.f64 #s(literal 1/6 binary64) (fabs.f64 (sin.f64 kx))))) (*.f64 ky ky) (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx)))) ky))
#s(approx (sin ky) ky)
#s(approx (sin ky) (*.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky))
#s(approx (sin ky) (*.f64 (fma.f64 (-.f64 (*.f64 (*.f64 ky ky) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (*.f64 ky ky) #s(literal 1 binary64)) ky))
#s(approx (sin ky) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (*.f64 ky ky)) #s(literal 1/6 binary64)) (*.f64 ky ky) #s(literal 1 binary64)) ky))
#s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 (sin.f64 kx)))
#s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fma.f64 (/.f64 (*.f64 ky ky) (fabs.f64 (sin.f64 kx))) #s(literal 1/2 binary64) (fabs.f64 (sin.f64 kx))))
#s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fma.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 1/3 binary64)) (*.f64 ky ky)) #s(literal 1/2 binary64)) (fabs.f64 (sin.f64 kx))) (*.f64 ky ky) (fabs.f64 (sin.f64 kx))))
#s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fma.f64 (fma.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 #s(literal 2/45 binary64) (*.f64 (/.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 1/3 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal -1/2 binary64))) (*.f64 ky ky)) (*.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 1/3 binary64)))) (fabs.f64 (sin.f64 kx))) (*.f64 ky ky) (/.f64 #s(literal 1/2 binary64) (fabs.f64 (sin.f64 kx)))) (*.f64 ky ky) (fabs.f64 (sin.f64 kx))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 ky ky (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 (fma.f64 (-.f64 (*.f64 (*.f64 ky ky) #s(literal 2/45 binary64)) #s(literal 1/3 binary64)) (*.f64 ky ky) #s(literal 1 binary64)) (*.f64 ky ky) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))
#s(approx (pow (sin ky) 2) (*.f64 ky ky))
#s(approx (pow (sin ky) 2) (*.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky)))
#s(approx (pow (sin ky) 2) (*.f64 (fma.f64 (-.f64 (*.f64 (*.f64 ky ky) #s(literal 2/45 binary64)) #s(literal 1/3 binary64)) (*.f64 ky ky) #s(literal 1 binary64)) (*.f64 ky ky)))
#s(approx (pow (sin ky) 2) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/315 binary64) #s(literal 2/45 binary64)) (*.f64 ky ky)) #s(literal 1/3 binary64)) (*.f64 ky ky) #s(literal 1 binary64)) (*.f64 ky ky)))
#s(approx (sin ky) (sin.f64 ky))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 ky) th) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 th th) (sin.f64 ky)) (sin.f64 ky)) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (fma.f64 (/.f64 (fma.f64 #s(literal -1/6 binary64) (sin.f64 ky) (*.f64 #s(literal 1/120 binary64) (*.f64 (*.f64 th th) (sin.f64 ky)))) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (*.f64 th th) (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (fma.f64 (fma.f64 (/.f64 (fma.f64 #s(literal 1/120 binary64) (sin.f64 ky) (*.f64 #s(literal -1/5040 binary64) (*.f64 (*.f64 th th) (sin.f64 ky)))) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (*.f64 th th) (/.f64 (*.f64 #s(literal -1/6 binary64) (sin.f64 ky)) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) (*.f64 th th) (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) th))
#s(approx (sin th) th)
#s(approx (sin th) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) th))
#s(approx (sin th) (*.f64 (fma.f64 (-.f64 (*.f64 (*.f64 th th) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (*.f64 th th) #s(literal 1 binary64)) th))
#s(approx (sin th) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (*.f64 th th)) #s(literal 1/6 binary64)) (*.f64 th th) #s(literal 1 binary64)) th))
#s(approx (sin th) (sin.f64 th))

eval32.0ms (0.5%)

Memory
13.3MiB live, 56.5MiB allocated; 9ms collecting garbage
Compiler

Compiled 3 450 to 1 227 computations (64.4% saved)

prune15.0ms (0.2%)

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

17 alts after pruning (17 fresh and 0 done)

PrunedKeptTotal
New22717244
Fresh000
Picked101
Done000
Total22817245
Accuracy
99.9%
Counts
245 → 17
Alt Table
Click to see full alt table
StatusAccuracyProgram
96.2%
(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))
88.5%
(*.f64 (/.f64 (sin.f64 ky) (/.f64 (hypot.f64 (pow.f64 (sin.f64 kx) #s(literal 3 binary64)) (pow.f64 (sin.f64 ky) #s(literal 3 binary64))) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (*.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal 2 binary64))))))) (sin.f64 th))
86.3%
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (fma.f64 (sin.f64 ky) (sin.f64 ky) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))) (sin.f64 th))
78.1%
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 (sin.f64 ky) #s(literal 4 binary64))) (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))) (sin.f64 th))
50.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))))) #s(approx (sin th) th))
77.4%
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))) (sin.f64 th))
67.9%
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (exp.f64 (*.f64 (log.f64 (sin.f64 kx)) #s(literal 2 binary64))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
39.6%
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 ky ky (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))) (sin.f64 th))
31.7%
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (sin.f64 th))
43.3%
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 (sin.f64 ky)))) (sin.f64 th))
46.6%
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 (sin.f64 kx)))) (sin.f64 th))
54.5%
(*.f64 (/.f64 #s(approx (sin ky) ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 #s(approx (sin ky) ky) #s(literal 2 binary64))))) (sin.f64 th))
99.6%
(*.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))
41.7%
(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (fabs.f64 (sin.f64 kx)))) (sin.f64 th))
49.6%
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (fabs.f64 (sin.f64 ky))))
39.8%
#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))))
49.0%
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 ky) th) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))
Compiler

Compiled 632 to 584 computations (7.6% saved)

series180.0ms (2.7%)

Memory
-19.4MiB live, 163.6MiB allocated; 38ms collecting garbage
Counts
36 → 115
Calls
Call 1
Inputs
(*.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))
(sin.f64 ky)
ky
(/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))
(sin.f64 th)
th
(hypot.f64 (sin.f64 kx) (sin.f64 ky))
(sin.f64 kx)
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 (sin.f64 th) ky) (fabs.f64 (sin.f64 kx)))
(*.f64 (sin.f64 th) ky)
(fabs.f64 (sin.f64 kx))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 (sin.f64 ky)))) (sin.f64 th))
(/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 (sin.f64 ky))))
#s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 (sin.f64 ky)))
(fabs.f64 (sin.f64 ky))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 ky ky (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))) (sin.f64 th))
(/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 ky ky (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))
(sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 ky ky (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 ky ky (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))
(fma.f64 ky ky (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))
#s(literal 1/2 binary64)
(*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))
(cos.f64 (*.f64 #s(literal 2 binary64) kx))
(*.f64 #s(literal 2 binary64) kx)
#s(literal 2 binary64)
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (exp.f64 (*.f64 (log.f64 (sin.f64 kx)) #s(literal 2 binary64))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (exp.f64 (*.f64 (log.f64 (sin.f64 kx)) #s(literal 2 binary64))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
(sqrt.f64 (+.f64 (exp.f64 (*.f64 (log.f64 (sin.f64 kx)) #s(literal 2 binary64))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
(+.f64 (exp.f64 (*.f64 (log.f64 (sin.f64 kx)) #s(literal 2 binary64))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (sin.f64 kx)) #s(literal 2 binary64)))
(*.f64 (log.f64 (sin.f64 kx)) #s(literal 2 binary64))
(log.f64 (sin.f64 kx))
(pow.f64 (sin.f64 ky) #s(literal 2 binary64))
Outputs
#s(approx (* (sin ky) (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))))) #s(hole binary64 (/ (* (sin ky) (sin th)) (sqrt (pow (sin ky) 2)))))
#s(approx (* (sin ky) (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow kx 2) (* (sin ky) (sin th))) (pow (sqrt (pow (sin ky) 2)) 3))) (/ (* (sin ky) (sin th)) (sqrt (pow (sin ky) 2))))))
#s(approx (* (sin ky) (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))))) #s(hole binary64 (+ (* (pow kx 2) (- (* -1 (* (pow kx 2) (+ (* -1/2 (/ (* (sin ky) (* (sin th) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2)))))) (pow (sqrt (pow (sin ky) 2)) 3))) (* -1/4 (/ (* (sin ky) (sin th)) (pow (sqrt (pow (sin ky) 2)) 5)))))) (* 1/2 (/ (* (sin ky) (sin th)) (pow (sqrt (pow (sin ky) 2)) 3))))) (/ (* (sin ky) (sin th)) (sqrt (pow (sin ky) 2))))))
#s(approx (* (sin ky) (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))))) #s(hole binary64 (+ (* (pow kx 2) (- (* (pow kx 2) (- (* -1 (* (pow kx 2) (+ (* -1/2 (/ (+ (* -1/2 (/ (* (sin ky) (* (sin th) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2)))))) (pow (sqrt (pow (sin ky) 2)) 3))) (* -1/4 (/ (* (sin ky) (sin th)) (pow (sqrt (pow (sin ky) 2)) 5)))) (pow (sqrt (pow (sin ky) 2)) 2))) (+ (* 1/4 (/ (* (sin ky) (* (sin th) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2)))))) (pow (sqrt (pow (sin ky) 2)) 5))) (* 1/2 (/ (* (sin ky) (* (sin th) (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2)))) (pow (sqrt (pow (sin ky) 2)) 2)))))) (pow (sqrt (pow (sin ky) 2)) 3))))))) (+ (* -1/2 (/ (* (sin ky) (* (sin th) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2)))))) (pow (sqrt (pow (sin ky) 2)) 3))) (* -1/4 (/ (* (sin ky) (sin th)) (pow (sqrt (pow (sin ky) 2)) 5)))))) (* 1/2 (/ (* (sin ky) (sin th)) (pow (sqrt (pow (sin ky) 2)) 3))))) (/ (* (sin ky) (sin th)) (sqrt (pow (sin ky) 2))))))
#s(approx (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(hole binary64 (/ (sin th) (sqrt (pow (sin ky) 2)))))
#s(approx (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sqrt (pow (sin ky) 2)) 3))) (/ (sin th) (sqrt (pow (sin ky) 2))))))
#s(approx (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(hole binary64 (+ (* (pow kx 2) (- (* -1 (* (pow kx 2) (+ (* -1/2 (/ (* (sin th) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2))))) (pow (sqrt (pow (sin ky) 2)) 3))) (* -1/4 (/ (sin th) (pow (sqrt (pow (sin ky) 2)) 5)))))) (* 1/2 (/ (sin th) (pow (sqrt (pow (sin ky) 2)) 3))))) (/ (sin th) (sqrt (pow (sin ky) 2))))))
#s(approx (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(hole binary64 (+ (* (pow kx 2) (- (* (pow kx 2) (- (* -1 (* (pow kx 2) (+ (* -1/2 (/ (+ (* -1/2 (/ (* (sin th) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2))))) (pow (sqrt (pow (sin ky) 2)) 3))) (* -1/4 (/ (sin th) (pow (sqrt (pow (sin ky) 2)) 5)))) (pow (sqrt (pow (sin ky) 2)) 2))) (+ (* 1/4 (/ (* (sin th) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2))))) (pow (sqrt (pow (sin ky) 2)) 5))) (* 1/2 (/ (* (sin th) (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2)))) (pow (sqrt (pow (sin ky) 2)) 2))))) (pow (sqrt (pow (sin ky) 2)) 3))))))) (+ (* -1/2 (/ (* (sin th) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2))))) (pow (sqrt (pow (sin ky) 2)) 3))) (* -1/4 (/ (sin th) (pow (sqrt (pow (sin ky) 2)) 5)))))) (* 1/2 (/ (sin th) (pow (sqrt (pow (sin ky) 2)) 3))))) (/ (sin th) (sqrt (pow (sin ky) 2))))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) #s(hole binary64 (sqrt (pow (sin ky) 2))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) #s(hole binary64 (+ (sqrt (pow (sin ky) 2)) (* 1/2 (/ (pow kx 2) (sqrt (pow (sin ky) 2)))))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) #s(hole binary64 (+ (sqrt (pow (sin ky) 2)) (* (pow kx 2) (+ (* -1/2 (/ (* (pow kx 2) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2))))) (sqrt (pow (sin ky) 2)))) (* 1/2 (/ 1 (sqrt (pow (sin ky) 2)))))))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) #s(hole binary64 (+ (sqrt (pow (sin ky) 2)) (* (pow kx 2) (+ (* (pow kx 2) (+ (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2)))) (sqrt (pow (sin ky) 2)))) (* 1/2 (/ (* (pow kx 2) (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2)))) (pow (sqrt (pow (sin ky) 2)) 2))))) (sqrt (pow (sin ky) 2)))))) (* 1/2 (/ 1 (sqrt (pow (sin ky) 2)))))))))
#s(approx (sin kx) #s(hole binary64 kx))
#s(approx (sin kx) #s(hole binary64 (* kx (+ 1 (* -1/6 (pow kx 2))))))
#s(approx (sin kx) #s(hole binary64 (* kx (+ 1 (* (pow kx 2) (- (* 1/120 (pow kx 2)) 1/6))))))
#s(approx (sin kx) #s(hole binary64 (* kx (+ 1 (* (pow kx 2) (- (* (pow kx 2) (+ 1/120 (* -1/5040 (pow kx 2)))) 1/6))))))
#s(approx (/ (* (sin th) ky) (fabs (sin kx))) #s(hole binary64 (/ (* ky (sin th)) (fabs (sin kx)))))
#s(approx (fabs (sin kx)) #s(hole binary64 (fabs (sin kx))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (/ (sin ky) (sqrt (pow (sin ky) 2)))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow kx 2) (sin ky)) (pow (sqrt (pow (sin ky) 2)) 3))) (/ (sin ky) (sqrt (pow (sin ky) 2))))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ (* (pow kx 2) (- (* -1 (* (pow kx 2) (+ (* -1/2 (/ (* (sin ky) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2))))) (pow (sqrt (pow (sin ky) 2)) 3))) (* -1/4 (/ (sin ky) (pow (sqrt (pow (sin ky) 2)) 5)))))) (* 1/2 (/ (sin ky) (pow (sqrt (pow (sin ky) 2)) 3))))) (/ (sin ky) (sqrt (pow (sin ky) 2))))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ (* (pow kx 2) (- (* (pow kx 2) (- (* -1 (* (pow kx 2) (+ (* -1/2 (/ (+ (* -1/2 (/ (* (sin ky) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2))))) (pow (sqrt (pow (sin ky) 2)) 3))) (* -1/4 (/ (sin ky) (pow (sqrt (pow (sin ky) 2)) 5)))) (pow (sqrt (pow (sin ky) 2)) 2))) (+ (* 1/4 (/ (* (sin ky) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2))))) (pow (sqrt (pow (sin ky) 2)) 5))) (* 1/2 (/ (* (sin ky) (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2)))) (pow (sqrt (pow (sin ky) 2)) 2))))) (pow (sqrt (pow (sin ky) 2)) 3))))))) (+ (* -1/2 (/ (* (sin ky) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2))))) (pow (sqrt (pow (sin ky) 2)) 3))) (* -1/4 (/ (sin ky) (pow (sqrt (pow (sin ky) 2)) 5)))))) (* 1/2 (/ (sin ky) (pow (sqrt (pow (sin ky) 2)) 3))))) (/ (sin ky) (sqrt (pow (sin ky) 2))))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (pow (sin ky) 2)))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (pow kx 2) (pow (sin ky) 2))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (* (pow kx 2) (+ 1 (* -1/3 (pow kx 2)))) (pow (sin ky) 2))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (* (pow kx 2) (+ 1 (* (pow kx 2) (- (* 2/45 (pow kx 2)) 1/3)))) (pow (sin ky) 2))))
#s(approx (+ (* ky ky) (- 1/2 (* 1/2 (cos (* 2 kx))))) #s(hole binary64 (pow ky 2)))
#s(approx (+ (* ky ky) (- 1/2 (* 1/2 (cos (* 2 kx))))) #s(hole binary64 (+ (pow kx 2) (pow ky 2))))
#s(approx (+ (* ky ky) (- 1/2 (* 1/2 (cos (* 2 kx))))) #s(hole binary64 (+ (* (pow kx 2) (+ 1 (* -1/3 (pow kx 2)))) (pow ky 2))))
#s(approx (+ (* ky ky) (- 1/2 (* 1/2 (cos (* 2 kx))))) #s(hole binary64 (+ (* (pow kx 2) (+ 1 (* (pow kx 2) (- (* 2/45 (pow kx 2)) 1/3)))) (pow ky 2))))
#s(approx (- 1/2 (* 1/2 (cos (* 2 kx)))) #s(hole binary64 (pow kx 2)))
#s(approx (- 1/2 (* 1/2 (cos (* 2 kx)))) #s(hole binary64 (* (pow kx 2) (+ 1 (* -1/3 (pow kx 2))))))
#s(approx (- 1/2 (* 1/2 (cos (* 2 kx)))) #s(hole binary64 (* (pow kx 2) (+ 1 (* (pow kx 2) (- (* 2/45 (pow kx 2)) 1/3))))))
#s(approx (- 1/2 (* 1/2 (cos (* 2 kx)))) #s(hole binary64 (* (pow kx 2) (+ 1 (* (pow kx 2) (- (* (pow kx 2) (+ 2/45 (* -1/315 (pow kx 2)))) 1/3))))))
#s(approx (* 1/2 (cos (* 2 kx))) #s(hole binary64 1/2))
#s(approx (* 1/2 (cos (* 2 kx))) #s(hole binary64 (+ 1/2 (* -1 (pow kx 2)))))
#s(approx (* 1/2 (cos (* 2 kx))) #s(hole binary64 (+ 1/2 (* (pow kx 2) (- (* 1/3 (pow kx 2)) 1)))))
#s(approx (* 1/2 (cos (* 2 kx))) #s(hole binary64 (+ 1/2 (* (pow kx 2) (- (* (pow kx 2) (+ 1/3 (* -2/45 (pow kx 2)))) 1)))))
#s(approx (cos (* 2 kx)) #s(hole binary64 1))
#s(approx (cos (* 2 kx)) #s(hole binary64 (+ 1 (* -2 (pow kx 2)))))
#s(approx (cos (* 2 kx)) #s(hole binary64 (+ 1 (* (pow kx 2) (- (* 2/3 (pow kx 2)) 2)))))
#s(approx (cos (* 2 kx)) #s(hole binary64 (+ 1 (* (pow kx 2) (- (* (pow kx 2) (+ 2/3 (* -4/45 (pow kx 2)))) 2)))))
#s(approx (* 2 kx) #s(hole binary64 (* 2 kx)))
#s(approx (* (log (sin kx)) 2) #s(hole binary64 (* 2 (log kx))))
#s(approx (* (log (sin kx)) 2) #s(hole binary64 (+ (* -1/3 (pow kx 2)) (* 2 (log kx)))))
#s(approx (* (log (sin kx)) 2) #s(hole binary64 (+ (* 2 (log kx)) (* (pow kx 2) (- (* -1/90 (pow kx 2)) 1/3)))))
#s(approx (* (log (sin kx)) 2) #s(hole binary64 (+ (* 2 (log kx)) (* (pow kx 2) (- (* (pow kx 2) (- (* -2/2835 (pow kx 2)) 1/90)) 1/3)))))
#s(approx (log (sin kx)) #s(hole binary64 (log kx)))
#s(approx (log (sin kx)) #s(hole binary64 (+ (log kx) (* -1/6 (pow kx 2)))))
#s(approx (log (sin kx)) #s(hole binary64 (+ (log kx) (* (pow kx 2) (- (* -1/180 (pow kx 2)) 1/6)))))
#s(approx (log (sin kx)) #s(hole binary64 (+ (log kx) (* (pow kx 2) (- (* (pow kx 2) (- (* -1/2835 (pow kx 2)) 1/180)) 1/6)))))
#s(approx (* (sin ky) (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))))) #s(hole binary64 (/ (* (sin ky) (sin th)) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))
#s(approx (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(hole binary64 (/ (sin th) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) #s(hole binary64 (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
#s(approx (sin kx) #s(hole binary64 (sin kx)))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (pow (sin kx) 2) (pow (sin ky) 2))))
#s(approx (+ (* ky ky) (- 1/2 (* 1/2 (cos (* 2 kx))))) #s(hole binary64 (- (+ 1/2 (pow ky 2)) (* 1/2 (cos (* 2 kx))))))
#s(approx (- 1/2 (* 1/2 (cos (* 2 kx)))) #s(hole binary64 (- 1/2 (* 1/2 (cos (* 2 kx))))))
#s(approx (* 1/2 (cos (* 2 kx))) #s(hole binary64 (* 1/2 (cos (* 2 kx)))))
#s(approx (cos (* 2 kx)) #s(hole binary64 (cos (* 2 kx))))
#s(approx (exp (* (log (sin kx)) 2)) #s(hole binary64 (pow (sin kx) 2)))
#s(approx (* (log (sin kx)) 2) #s(hole binary64 (* 2 (log (sin kx)))))
#s(approx (log (sin kx)) #s(hole binary64 (log (sin kx))))
#s(approx (* (sin ky) (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))))) #s(hole binary64 (/ (* ky (sin th)) (sqrt (pow (sin kx) 2)))))
#s(approx (* (sin ky) (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))))) #s(hole binary64 (* ky (+ (* (pow ky 2) (- (* -1/6 (/ (sin th) (sqrt (pow (sin kx) 2)))) (* 1/2 (/ (sin th) (pow (sqrt (pow (sin kx) 2)) 3))))) (/ (sin th) (sqrt (pow (sin kx) 2)))))))
#s(approx (* (sin ky) (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))))) #s(hole binary64 (* ky (+ (* (pow ky 2) (- (+ (* -1/6 (/ (sin th) (sqrt (pow (sin kx) 2)))) (* (pow ky 2) (- (* 1/120 (/ (sin th) (sqrt (pow (sin kx) 2)))) (+ (* -1/2 (/ (* (sin th) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2))))) (pow (sqrt (pow (sin kx) 2)) 3))) (* 1/2 (/ (- (* -1/6 (/ (sin th) (sqrt (pow (sin kx) 2)))) (* 1/2 (/ (sin th) (pow (sqrt (pow (sin kx) 2)) 3)))) (pow (sqrt (pow (sin kx) 2)) 2))))))) (* 1/2 (/ (sin th) (pow (sqrt (pow (sin kx) 2)) 3))))) (/ (sin th) (sqrt (pow (sin kx) 2)))))))
#s(approx (* (sin ky) (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))))) #s(hole binary64 (* ky (+ (* (pow ky 2) (- (+ (* -1/6 (/ (sin th) (sqrt (pow (sin kx) 2)))) (* (pow ky 2) (- (+ (* 1/120 (/ (sin th) (sqrt (pow (sin kx) 2)))) (* (pow ky 2) (- (* -1/5040 (/ (sin th) (sqrt (pow (sin kx) 2)))) (+ (* -1/2 (/ (* (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2)))) (- (* -1/6 (/ (sin th) (sqrt (pow (sin kx) 2)))) (* 1/2 (/ (sin th) (pow (sqrt (pow (sin kx) 2)) 3))))) (pow (sqrt (pow (sin kx) 2)) 2))) (+ (* 1/2 (/ (* (sin th) (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2)))) (pow (sqrt (pow (sin kx) 2)) 2))))) (pow (sqrt (pow (sin kx) 2)) 3))) (* 1/2 (/ (- (* 1/120 (/ (sin th) (sqrt (pow (sin kx) 2)))) (+ (* -1/2 (/ (* (sin th) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2))))) (pow (sqrt (pow (sin kx) 2)) 3))) (* 1/2 (/ (- (* -1/6 (/ (sin th) (sqrt (pow (sin kx) 2)))) (* 1/2 (/ (sin th) (pow (sqrt (pow (sin kx) 2)) 3)))) (pow (sqrt (pow (sin kx) 2)) 2))))) (pow (sqrt (pow (sin kx) 2)) 2)))))))) (+ (* -1/2 (/ (* (sin th) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2))))) (pow (sqrt (pow (sin kx) 2)) 3))) (* 1/2 (/ (- (* -1/6 (/ (sin th) (sqrt (pow (sin kx) 2)))) (* 1/2 (/ (sin th) (pow (sqrt (pow (sin kx) 2)) 3)))) (pow (sqrt (pow (sin kx) 2)) 2))))))) (* 1/2 (/ (sin th) (pow (sqrt (pow (sin kx) 2)) 3))))) (/ (sin th) (sqrt (pow (sin kx) 2)))))))
#s(approx (sin ky) #s(hole binary64 ky))
#s(approx (sin ky) #s(hole binary64 (* ky (+ 1 (* -1/6 (pow ky 2))))))
#s(approx (sin ky) #s(hole binary64 (* ky (+ 1 (* (pow ky 2) (- (* 1/120 (pow ky 2)) 1/6))))))
#s(approx (sin ky) #s(hole binary64 (* ky (+ 1 (* (pow ky 2) (- (* (pow ky 2) (+ 1/120 (* -1/5040 (pow ky 2)))) 1/6))))))
#s(approx (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(hole binary64 (/ (sin th) (sqrt (pow (sin kx) 2)))))
#s(approx (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sqrt (pow (sin kx) 2)) 3))) (/ (sin th) (sqrt (pow (sin kx) 2))))))
#s(approx (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(hole binary64 (+ (* (pow ky 2) (- (* -1 (* (pow ky 2) (+ (* -1/2 (/ (* (sin th) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2))))) (pow (sqrt (pow (sin kx) 2)) 3))) (* -1/4 (/ (sin th) (pow (sqrt (pow (sin kx) 2)) 5)))))) (* 1/2 (/ (sin th) (pow (sqrt (pow (sin kx) 2)) 3))))) (/ (sin th) (sqrt (pow (sin kx) 2))))))
#s(approx (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(hole binary64 (+ (* (pow ky 2) (- (* (pow ky 2) (- (* -1 (* (pow ky 2) (+ (* -1/2 (/ (+ (* -1/2 (/ (* (sin th) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2))))) (pow (sqrt (pow (sin kx) 2)) 3))) (* -1/4 (/ (sin th) (pow (sqrt (pow (sin kx) 2)) 5)))) (pow (sqrt (pow (sin kx) 2)) 2))) (+ (* 1/4 (/ (* (sin th) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2))))) (pow (sqrt (pow (sin kx) 2)) 5))) (* 1/2 (/ (* (sin th) (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2)))) (pow (sqrt (pow (sin kx) 2)) 2))))) (pow (sqrt (pow (sin kx) 2)) 3))))))) (+ (* -1/2 (/ (* (sin th) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2))))) (pow (sqrt (pow (sin kx) 2)) 3))) (* -1/4 (/ (sin th) (pow (sqrt (pow (sin kx) 2)) 5)))))) (* 1/2 (/ (sin th) (pow (sqrt (pow (sin kx) 2)) 3))))) (/ (sin th) (sqrt (pow (sin kx) 2))))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) #s(hole binary64 (sqrt (pow (sin kx) 2))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) #s(hole binary64 (+ (sqrt (pow (sin kx) 2)) (* 1/2 (/ (pow ky 2) (sqrt (pow (sin kx) 2)))))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) #s(hole binary64 (+ (sqrt (pow (sin kx) 2)) (* (pow ky 2) (+ (* -1/2 (/ (* (pow ky 2) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2))))) (sqrt (pow (sin kx) 2)))) (* 1/2 (/ 1 (sqrt (pow (sin kx) 2)))))))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) #s(hole binary64 (+ (sqrt (pow (sin kx) 2)) (* (pow ky 2) (+ (* (pow ky 2) (+ (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2)))) (sqrt (pow (sin kx) 2)))) (* 1/2 (/ (* (pow ky 2) (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2)))) (pow (sqrt (pow (sin kx) 2)) 2))))) (sqrt (pow (sin kx) 2)))))) (* 1/2 (/ 1 (sqrt (pow (sin kx) 2)))))))))
#s(approx (* (sin th) ky) #s(hole binary64 (* ky (sin th))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (/ ky (sqrt (pow (sin kx) 2)))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (* ky (+ (* -1 (* (pow ky 2) (+ (* 1/6 (/ 1 (sqrt (pow (sin kx) 2)))) (* 1/2 (/ 1 (pow (sqrt (pow (sin kx) 2)) 3)))))) (/ 1 (sqrt (pow (sin kx) 2)))))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (* ky (+ (* (pow ky 2) (- (* (pow ky 2) (- (* 1/120 (/ 1 (sqrt (pow (sin kx) 2)))) (+ (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2)))) (pow (sqrt (pow (sin kx) 2)) 3))) (* -1/2 (/ (+ (* 1/6 (/ 1 (sqrt (pow (sin kx) 2)))) (* 1/2 (/ 1 (pow (sqrt (pow (sin kx) 2)) 3)))) (pow (sqrt (pow (sin kx) 2)) 2)))))) (+ (* 1/6 (/ 1 (sqrt (pow (sin kx) 2)))) (* 1/2 (/ 1 (pow (sqrt (pow (sin kx) 2)) 3)))))) (/ 1 (sqrt (pow (sin kx) 2)))))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (* ky (+ (* (pow ky 2) (- (* (pow ky 2) (- (+ (* -1 (* (pow ky 2) (+ (* 1/5040 (/ 1 (sqrt (pow (sin kx) 2)))) (+ (* 1/2 (/ (* (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2)))) (+ (* 1/6 (/ 1 (sqrt (pow (sin kx) 2)))) (* 1/2 (/ 1 (pow (sqrt (pow (sin kx) 2)) 3))))) (pow (sqrt (pow (sin kx) 2)) 2))) (+ (* 1/2 (/ (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2)))) (pow (sqrt (pow (sin kx) 2)) 2)))) (pow (sqrt (pow (sin kx) 2)) 3))) (* 1/2 (/ (- (* 1/120 (/ 1 (sqrt (pow (sin kx) 2)))) (+ (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2)))) (pow (sqrt (pow (sin kx) 2)) 3))) (* -1/2 (/ (+ (* 1/6 (/ 1 (sqrt (pow (sin kx) 2)))) (* 1/2 (/ 1 (pow (sqrt (pow (sin kx) 2)) 3)))) (pow (sqrt (pow (sin kx) 2)) 2))))) (pow (sqrt (pow (sin kx) 2)) 2)))))))) (* 1/120 (/ 1 (sqrt (pow (sin kx) 2))))) (+ (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2)))) (pow (sqrt (pow (sin kx) 2)) 3))) (* -1/2 (/ (+ (* 1/6 (/ 1 (sqrt (pow (sin kx) 2)))) (* 1/2 (/ 1 (pow (sqrt (pow (sin kx) 2)) 3)))) (pow (sqrt (pow (sin kx) 2)) 2)))))) (+ (* 1/6 (/ 1 (sqrt (pow (sin kx) 2)))) (* 1/2 (/ 1 (pow (sqrt (pow (sin kx) 2)) 3)))))) (/ 1 (sqrt (pow (sin kx) 2)))))))
#s(approx (fabs (sin ky)) #s(hole binary64 (fabs (sin ky))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (pow ky 2) (pow (sin kx) 2))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2)))) (pow (sin kx) 2))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3)))) (pow (sin kx) 2))))
#s(approx (pow (sin ky) 2) #s(hole binary64 (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2))))))
#s(approx (pow (sin ky) 2) #s(hole binary64 (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3))))))
#s(approx (pow (sin ky) 2) #s(hole binary64 (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* (pow ky 2) (+ 2/45 (* -1/315 (pow ky 2)))) 1/3))))))
#s(approx (sin ky) #s(hole binary64 (sin ky)))
#s(approx (+ (* ky ky) (- 1/2 (* 1/2 (cos (* 2 kx))))) #s(hole binary64 (* (pow ky 2) (- (+ 1 (* 1/2 (/ 1 (pow ky 2)))) (* 1/2 (/ (cos (* 2 kx)) (pow ky 2)))))))
#s(approx (* (sin ky) (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))))) #s(hole binary64 (/ (* th (sin ky)) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))
#s(approx (* (sin ky) (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))))) #s(hole binary64 (* th (+ (* -1/6 (/ (* (pow th 2) (sin ky)) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))
#s(approx (* (sin ky) (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))))) #s(hole binary64 (* th (+ (* (pow th 2) (+ (* -1/6 (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 1/120 (/ (* (pow th 2) (sin ky)) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))
#s(approx (* (sin ky) (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))))) #s(hole binary64 (* th (+ (* (pow th 2) (+ (* -1/6 (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* (pow th 2) (+ (* -1/5040 (/ (* (pow th 2) (sin ky)) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 1/120 (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))
#s(approx (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(hole binary64 (/ th (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))
#s(approx (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(hole binary64 (* th (+ (* -1/6 (/ (pow th 2) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (/ 1 (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))
#s(approx (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(hole binary64 (* th (+ (* (pow th 2) (- (* 1/120 (/ (pow th 2) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 1/6 (/ 1 (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (/ 1 (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))
#s(approx (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(hole binary64 (* th (+ (* (pow th 2) (- (* (pow th 2) (+ (* -1/5040 (/ (pow th 2) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 1/120 (/ 1 (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (* 1/6 (/ 1 (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (/ 1 (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))
#s(approx (sin th) #s(hole binary64 th))
#s(approx (sin th) #s(hole binary64 (* th (+ 1 (* -1/6 (pow th 2))))))
#s(approx (sin th) #s(hole binary64 (* th (+ 1 (* (pow th 2) (- (* 1/120 (pow th 2)) 1/6))))))
#s(approx (sin th) #s(hole binary64 (* th (+ 1 (* (pow th 2) (- (* (pow th 2) (+ 1/120 (* -1/5040 (pow th 2)))) 1/6))))))
#s(approx (/ (* (sin th) ky) (fabs (sin kx))) #s(hole binary64 (/ (* ky th) (fabs (sin kx)))))
#s(approx (/ (* (sin th) ky) (fabs (sin kx))) #s(hole binary64 (* th (+ (* -1/6 (/ (* ky (pow th 2)) (fabs (sin kx)))) (/ ky (fabs (sin kx)))))))
#s(approx (/ (* (sin th) ky) (fabs (sin kx))) #s(hole binary64 (* th (+ (* (pow th 2) (+ (* -1/6 (/ ky (fabs (sin kx)))) (* 1/120 (/ (* ky (pow th 2)) (fabs (sin kx)))))) (/ ky (fabs (sin kx)))))))
#s(approx (/ (* (sin th) ky) (fabs (sin kx))) #s(hole binary64 (* th (+ (* (pow th 2) (+ (* -1/6 (/ ky (fabs (sin kx)))) (* (pow th 2) (+ (* -1/5040 (/ (* ky (pow th 2)) (fabs (sin kx)))) (* 1/120 (/ ky (fabs (sin kx)))))))) (/ ky (fabs (sin kx)))))))
#s(approx (* (sin th) ky) #s(hole binary64 (* ky th)))
#s(approx (* (sin th) ky) #s(hole binary64 (* th (+ ky (* -1/6 (* ky (pow th 2)))))))
#s(approx (* (sin th) ky) #s(hole binary64 (* th (+ ky (* (pow th 2) (+ (* -1/6 ky) (* 1/120 (* ky (pow th 2)))))))))
#s(approx (* (sin th) ky) #s(hole binary64 (* th (+ ky (* (pow th 2) (+ (* -1/6 ky) (* (pow th 2) (+ (* -1/5040 (* ky (pow th 2))) (* 1/120 ky)))))))))
#s(approx (sin th) #s(hole binary64 (sin th)))
Calls

9 calls:

TimeVariablePointExpression
54.0ms
kx
@inf
((* (sin ky) (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))))) (sin ky) ky (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (sin th) th (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (sin kx) kx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (* (sin th) ky) (fabs (sin kx))) (* (sin th) ky) (fabs (sin kx)) (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs (sin ky)) (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+ (pow (sin kx) 2) (pow (sin ky) 2)) (+ (* ky ky) (- 1/2 (* 1/2 (cos (* 2 kx))))) (- 1/2 (* 1/2 (cos (* 2 kx)))) 1/2 (* 1/2 (cos (* 2 kx))) (cos (* 2 kx)) (* 2 kx) 2 (* (/ (sin ky) (sqrt (+ (exp (* (log (sin kx)) 2)) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (exp (* (log (sin kx)) 2)) (pow (sin ky) 2)))) (sqrt (+ (exp (* (log (sin kx)) 2)) (pow (sin ky) 2))) (+ (exp (* (log (sin kx)) 2)) (pow (sin ky) 2)) (exp (* (log (sin kx)) 2)) (* (log (sin kx)) 2) (log (sin kx)) (pow (sin ky) 2))
45.0ms
kx
@-inf
((* (sin ky) (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))))) (sin ky) ky (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (sin th) th (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (sin kx) kx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (* (sin th) ky) (fabs (sin kx))) (* (sin th) ky) (fabs (sin kx)) (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs (sin ky)) (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+ (pow (sin kx) 2) (pow (sin ky) 2)) (+ (* ky ky) (- 1/2 (* 1/2 (cos (* 2 kx))))) (- 1/2 (* 1/2 (cos (* 2 kx)))) 1/2 (* 1/2 (cos (* 2 kx))) (cos (* 2 kx)) (* 2 kx) 2 (* (/ (sin ky) (sqrt (+ (exp (* (log (sin kx)) 2)) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (exp (* (log (sin kx)) 2)) (pow (sin ky) 2)))) (sqrt (+ (exp (* (log (sin kx)) 2)) (pow (sin ky) 2))) (+ (exp (* (log (sin kx)) 2)) (pow (sin ky) 2)) (exp (* (log (sin kx)) 2)) (* (log (sin kx)) 2) (log (sin kx)) (pow (sin ky) 2))
39.0ms
kx
@0
((* (sin ky) (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))))) (sin ky) ky (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (sin th) th (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (sin kx) kx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (* (sin th) ky) (fabs (sin kx))) (* (sin th) ky) (fabs (sin kx)) (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs (sin ky)) (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+ (pow (sin kx) 2) (pow (sin ky) 2)) (+ (* ky ky) (- 1/2 (* 1/2 (cos (* 2 kx))))) (- 1/2 (* 1/2 (cos (* 2 kx)))) 1/2 (* 1/2 (cos (* 2 kx))) (cos (* 2 kx)) (* 2 kx) 2 (* (/ (sin ky) (sqrt (+ (exp (* (log (sin kx)) 2)) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (exp (* (log (sin kx)) 2)) (pow (sin ky) 2)))) (sqrt (+ (exp (* (log (sin kx)) 2)) (pow (sin ky) 2))) (+ (exp (* (log (sin kx)) 2)) (pow (sin ky) 2)) (exp (* (log (sin kx)) 2)) (* (log (sin kx)) 2) (log (sin kx)) (pow (sin ky) 2))
18.0ms
th
@inf
((* (sin ky) (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))))) (sin ky) ky (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (sin th) th (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (sin kx) kx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (* (sin th) ky) (fabs (sin kx))) (* (sin th) ky) (fabs (sin kx)) (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs (sin ky)) (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+ (pow (sin kx) 2) (pow (sin ky) 2)) (+ (* ky ky) (- 1/2 (* 1/2 (cos (* 2 kx))))) (- 1/2 (* 1/2 (cos (* 2 kx)))) 1/2 (* 1/2 (cos (* 2 kx))) (cos (* 2 kx)) (* 2 kx) 2 (* (/ (sin ky) (sqrt (+ (exp (* (log (sin kx)) 2)) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (exp (* (log (sin kx)) 2)) (pow (sin ky) 2)))) (sqrt (+ (exp (* (log (sin kx)) 2)) (pow (sin ky) 2))) (+ (exp (* (log (sin kx)) 2)) (pow (sin ky) 2)) (exp (* (log (sin kx)) 2)) (* (log (sin kx)) 2) (log (sin kx)) (pow (sin ky) 2))
5.0ms
ky
@0
((* (sin ky) (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))))) (sin ky) ky (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (sin th) th (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (sin kx) kx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (* (sin th) ky) (fabs (sin kx))) (* (sin th) ky) (fabs (sin kx)) (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs (sin ky)) (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+ (pow (sin kx) 2) (pow (sin ky) 2)) (+ (* ky ky) (- 1/2 (* 1/2 (cos (* 2 kx))))) (- 1/2 (* 1/2 (cos (* 2 kx)))) 1/2 (* 1/2 (cos (* 2 kx))) (cos (* 2 kx)) (* 2 kx) 2 (* (/ (sin ky) (sqrt (+ (exp (* (log (sin kx)) 2)) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (exp (* (log (sin kx)) 2)) (pow (sin ky) 2)))) (sqrt (+ (exp (* (log (sin kx)) 2)) (pow (sin ky) 2))) (+ (exp (* (log (sin kx)) 2)) (pow (sin ky) 2)) (exp (* (log (sin kx)) 2)) (* (log (sin kx)) 2) (log (sin kx)) (pow (sin ky) 2))

rewrite255.0ms (3.8%)

Memory
2.4MiB live, 188.3MiB allocated; 38ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
07094870
07733997
142893997
082783814
Stop Event
iter-limit
node-limit
iter-limit
Counts
151 → 668
Calls
Call 1
Inputs
(*.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))
(sin.f64 ky)
ky
(/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))
(sin.f64 th)
th
(hypot.f64 (sin.f64 kx) (sin.f64 ky))
(sin.f64 kx)
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 (sin.f64 th) ky) (fabs.f64 (sin.f64 kx)))
(*.f64 (sin.f64 th) ky)
(fabs.f64 (sin.f64 kx))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 (sin.f64 ky)))) (sin.f64 th))
(/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 (sin.f64 ky))))
#s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 (sin.f64 ky)))
(fabs.f64 (sin.f64 ky))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 ky ky (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))) (sin.f64 th))
(/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 ky ky (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))
(sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 ky ky (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 ky ky (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))
(fma.f64 ky ky (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))
#s(literal 1/2 binary64)
(*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))
(cos.f64 (*.f64 #s(literal 2 binary64) kx))
(*.f64 #s(literal 2 binary64) kx)
#s(literal 2 binary64)
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (exp.f64 (*.f64 (log.f64 (sin.f64 kx)) #s(literal 2 binary64))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (exp.f64 (*.f64 (log.f64 (sin.f64 kx)) #s(literal 2 binary64))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
(sqrt.f64 (+.f64 (exp.f64 (*.f64 (log.f64 (sin.f64 kx)) #s(literal 2 binary64))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
(+.f64 (exp.f64 (*.f64 (log.f64 (sin.f64 kx)) #s(literal 2 binary64))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (sin.f64 kx)) #s(literal 2 binary64)))
(*.f64 (log.f64 (sin.f64 kx)) #s(literal 2 binary64))
(log.f64 (sin.f64 kx))
(pow.f64 (sin.f64 ky) #s(literal 2 binary64))
#s(approx (* (sin ky) (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))))) #s(hole binary64 (/ (* (sin ky) (sin th)) (sqrt (pow (sin ky) 2)))))
#s(approx (* (sin ky) (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow kx 2) (* (sin ky) (sin th))) (pow (sqrt (pow (sin ky) 2)) 3))) (/ (* (sin ky) (sin th)) (sqrt (pow (sin ky) 2))))))
#s(approx (* (sin ky) (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))))) #s(hole binary64 (+ (* (pow kx 2) (- (* -1 (* (pow kx 2) (+ (* -1/2 (/ (* (sin ky) (* (sin th) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2)))))) (pow (sqrt (pow (sin ky) 2)) 3))) (* -1/4 (/ (* (sin ky) (sin th)) (pow (sqrt (pow (sin ky) 2)) 5)))))) (* 1/2 (/ (* (sin ky) (sin th)) (pow (sqrt (pow (sin ky) 2)) 3))))) (/ (* (sin ky) (sin th)) (sqrt (pow (sin ky) 2))))))
#s(approx (* (sin ky) (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))))) #s(hole binary64 (+ (* (pow kx 2) (- (* (pow kx 2) (- (* -1 (* (pow kx 2) (+ (* -1/2 (/ (+ (* -1/2 (/ (* (sin ky) (* (sin th) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2)))))) (pow (sqrt (pow (sin ky) 2)) 3))) (* -1/4 (/ (* (sin ky) (sin th)) (pow (sqrt (pow (sin ky) 2)) 5)))) (pow (sqrt (pow (sin ky) 2)) 2))) (+ (* 1/4 (/ (* (sin ky) (* (sin th) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2)))))) (pow (sqrt (pow (sin ky) 2)) 5))) (* 1/2 (/ (* (sin ky) (* (sin th) (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2)))) (pow (sqrt (pow (sin ky) 2)) 2)))))) (pow (sqrt (pow (sin ky) 2)) 3))))))) (+ (* -1/2 (/ (* (sin ky) (* (sin th) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2)))))) (pow (sqrt (pow (sin ky) 2)) 3))) (* -1/4 (/ (* (sin ky) (sin th)) (pow (sqrt (pow (sin ky) 2)) 5)))))) (* 1/2 (/ (* (sin ky) (sin th)) (pow (sqrt (pow (sin ky) 2)) 3))))) (/ (* (sin ky) (sin th)) (sqrt (pow (sin ky) 2))))))
#s(approx (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(hole binary64 (/ (sin th) (sqrt (pow (sin ky) 2)))))
#s(approx (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sqrt (pow (sin ky) 2)) 3))) (/ (sin th) (sqrt (pow (sin ky) 2))))))
#s(approx (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(hole binary64 (+ (* (pow kx 2) (- (* -1 (* (pow kx 2) (+ (* -1/2 (/ (* (sin th) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2))))) (pow (sqrt (pow (sin ky) 2)) 3))) (* -1/4 (/ (sin th) (pow (sqrt (pow (sin ky) 2)) 5)))))) (* 1/2 (/ (sin th) (pow (sqrt (pow (sin ky) 2)) 3))))) (/ (sin th) (sqrt (pow (sin ky) 2))))))
#s(approx (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(hole binary64 (+ (* (pow kx 2) (- (* (pow kx 2) (- (* -1 (* (pow kx 2) (+ (* -1/2 (/ (+ (* -1/2 (/ (* (sin th) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2))))) (pow (sqrt (pow (sin ky) 2)) 3))) (* -1/4 (/ (sin th) (pow (sqrt (pow (sin ky) 2)) 5)))) (pow (sqrt (pow (sin ky) 2)) 2))) (+ (* 1/4 (/ (* (sin th) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2))))) (pow (sqrt (pow (sin ky) 2)) 5))) (* 1/2 (/ (* (sin th) (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2)))) (pow (sqrt (pow (sin ky) 2)) 2))))) (pow (sqrt (pow (sin ky) 2)) 3))))))) (+ (* -1/2 (/ (* (sin th) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2))))) (pow (sqrt (pow (sin ky) 2)) 3))) (* -1/4 (/ (sin th) (pow (sqrt (pow (sin ky) 2)) 5)))))) (* 1/2 (/ (sin th) (pow (sqrt (pow (sin ky) 2)) 3))))) (/ (sin th) (sqrt (pow (sin ky) 2))))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) #s(hole binary64 (sqrt (pow (sin ky) 2))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) #s(hole binary64 (+ (sqrt (pow (sin ky) 2)) (* 1/2 (/ (pow kx 2) (sqrt (pow (sin ky) 2)))))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) #s(hole binary64 (+ (sqrt (pow (sin ky) 2)) (* (pow kx 2) (+ (* -1/2 (/ (* (pow kx 2) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2))))) (sqrt (pow (sin ky) 2)))) (* 1/2 (/ 1 (sqrt (pow (sin ky) 2)))))))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) #s(hole binary64 (+ (sqrt (pow (sin ky) 2)) (* (pow kx 2) (+ (* (pow kx 2) (+ (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2)))) (sqrt (pow (sin ky) 2)))) (* 1/2 (/ (* (pow kx 2) (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2)))) (pow (sqrt (pow (sin ky) 2)) 2))))) (sqrt (pow (sin ky) 2)))))) (* 1/2 (/ 1 (sqrt (pow (sin ky) 2)))))))))
#s(approx (sin kx) #s(hole binary64 kx))
#s(approx (sin kx) #s(hole binary64 (* kx (+ 1 (* -1/6 (pow kx 2))))))
#s(approx (sin kx) #s(hole binary64 (* kx (+ 1 (* (pow kx 2) (- (* 1/120 (pow kx 2)) 1/6))))))
#s(approx (sin kx) #s(hole binary64 (* kx (+ 1 (* (pow kx 2) (- (* (pow kx 2) (+ 1/120 (* -1/5040 (pow kx 2)))) 1/6))))))
#s(approx (/ (* (sin th) ky) (fabs (sin kx))) #s(hole binary64 (/ (* ky (sin th)) (fabs (sin kx)))))
#s(approx (fabs (sin kx)) #s(hole binary64 (fabs (sin kx))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (/ (sin ky) (sqrt (pow (sin ky) 2)))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow kx 2) (sin ky)) (pow (sqrt (pow (sin ky) 2)) 3))) (/ (sin ky) (sqrt (pow (sin ky) 2))))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ (* (pow kx 2) (- (* -1 (* (pow kx 2) (+ (* -1/2 (/ (* (sin ky) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2))))) (pow (sqrt (pow (sin ky) 2)) 3))) (* -1/4 (/ (sin ky) (pow (sqrt (pow (sin ky) 2)) 5)))))) (* 1/2 (/ (sin ky) (pow (sqrt (pow (sin ky) 2)) 3))))) (/ (sin ky) (sqrt (pow (sin ky) 2))))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ (* (pow kx 2) (- (* (pow kx 2) (- (* -1 (* (pow kx 2) (+ (* -1/2 (/ (+ (* -1/2 (/ (* (sin ky) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2))))) (pow (sqrt (pow (sin ky) 2)) 3))) (* -1/4 (/ (sin ky) (pow (sqrt (pow (sin ky) 2)) 5)))) (pow (sqrt (pow (sin ky) 2)) 2))) (+ (* 1/4 (/ (* (sin ky) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2))))) (pow (sqrt (pow (sin ky) 2)) 5))) (* 1/2 (/ (* (sin ky) (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2)))) (pow (sqrt (pow (sin ky) 2)) 2))))) (pow (sqrt (pow (sin ky) 2)) 3))))))) (+ (* -1/2 (/ (* (sin ky) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2))))) (pow (sqrt (pow (sin ky) 2)) 3))) (* -1/4 (/ (sin ky) (pow (sqrt (pow (sin ky) 2)) 5)))))) (* 1/2 (/ (sin ky) (pow (sqrt (pow (sin ky) 2)) 3))))) (/ (sin ky) (sqrt (pow (sin ky) 2))))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (pow (sin ky) 2)))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (pow kx 2) (pow (sin ky) 2))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (* (pow kx 2) (+ 1 (* -1/3 (pow kx 2)))) (pow (sin ky) 2))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (* (pow kx 2) (+ 1 (* (pow kx 2) (- (* 2/45 (pow kx 2)) 1/3)))) (pow (sin ky) 2))))
#s(approx (+ (* ky ky) (- 1/2 (* 1/2 (cos (* 2 kx))))) #s(hole binary64 (pow ky 2)))
#s(approx (+ (* ky ky) (- 1/2 (* 1/2 (cos (* 2 kx))))) #s(hole binary64 (+ (pow kx 2) (pow ky 2))))
#s(approx (+ (* ky ky) (- 1/2 (* 1/2 (cos (* 2 kx))))) #s(hole binary64 (+ (* (pow kx 2) (+ 1 (* -1/3 (pow kx 2)))) (pow ky 2))))
#s(approx (+ (* ky ky) (- 1/2 (* 1/2 (cos (* 2 kx))))) #s(hole binary64 (+ (* (pow kx 2) (+ 1 (* (pow kx 2) (- (* 2/45 (pow kx 2)) 1/3)))) (pow ky 2))))
#s(approx (- 1/2 (* 1/2 (cos (* 2 kx)))) #s(hole binary64 (pow kx 2)))
#s(approx (- 1/2 (* 1/2 (cos (* 2 kx)))) #s(hole binary64 (* (pow kx 2) (+ 1 (* -1/3 (pow kx 2))))))
#s(approx (- 1/2 (* 1/2 (cos (* 2 kx)))) #s(hole binary64 (* (pow kx 2) (+ 1 (* (pow kx 2) (- (* 2/45 (pow kx 2)) 1/3))))))
#s(approx (- 1/2 (* 1/2 (cos (* 2 kx)))) #s(hole binary64 (* (pow kx 2) (+ 1 (* (pow kx 2) (- (* (pow kx 2) (+ 2/45 (* -1/315 (pow kx 2)))) 1/3))))))
#s(approx (* 1/2 (cos (* 2 kx))) #s(hole binary64 1/2))
#s(approx (* 1/2 (cos (* 2 kx))) #s(hole binary64 (+ 1/2 (* -1 (pow kx 2)))))
#s(approx (* 1/2 (cos (* 2 kx))) #s(hole binary64 (+ 1/2 (* (pow kx 2) (- (* 1/3 (pow kx 2)) 1)))))
#s(approx (* 1/2 (cos (* 2 kx))) #s(hole binary64 (+ 1/2 (* (pow kx 2) (- (* (pow kx 2) (+ 1/3 (* -2/45 (pow kx 2)))) 1)))))
#s(approx (cos (* 2 kx)) #s(hole binary64 1))
#s(approx (cos (* 2 kx)) #s(hole binary64 (+ 1 (* -2 (pow kx 2)))))
#s(approx (cos (* 2 kx)) #s(hole binary64 (+ 1 (* (pow kx 2) (- (* 2/3 (pow kx 2)) 2)))))
#s(approx (cos (* 2 kx)) #s(hole binary64 (+ 1 (* (pow kx 2) (- (* (pow kx 2) (+ 2/3 (* -4/45 (pow kx 2)))) 2)))))
#s(approx (* 2 kx) #s(hole binary64 (* 2 kx)))
#s(approx (* (log (sin kx)) 2) #s(hole binary64 (* 2 (log kx))))
#s(approx (* (log (sin kx)) 2) #s(hole binary64 (+ (* -1/3 (pow kx 2)) (* 2 (log kx)))))
#s(approx (* (log (sin kx)) 2) #s(hole binary64 (+ (* 2 (log kx)) (* (pow kx 2) (- (* -1/90 (pow kx 2)) 1/3)))))
#s(approx (* (log (sin kx)) 2) #s(hole binary64 (+ (* 2 (log kx)) (* (pow kx 2) (- (* (pow kx 2) (- (* -2/2835 (pow kx 2)) 1/90)) 1/3)))))
#s(approx (log (sin kx)) #s(hole binary64 (log kx)))
#s(approx (log (sin kx)) #s(hole binary64 (+ (log kx) (* -1/6 (pow kx 2)))))
#s(approx (log (sin kx)) #s(hole binary64 (+ (log kx) (* (pow kx 2) (- (* -1/180 (pow kx 2)) 1/6)))))
#s(approx (log (sin kx)) #s(hole binary64 (+ (log kx) (* (pow kx 2) (- (* (pow kx 2) (- (* -1/2835 (pow kx 2)) 1/180)) 1/6)))))
#s(approx (* (sin ky) (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))))) #s(hole binary64 (/ (* (sin ky) (sin th)) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))
#s(approx (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(hole binary64 (/ (sin th) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) #s(hole binary64 (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
#s(approx (sin kx) #s(hole binary64 (sin kx)))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (pow (sin kx) 2) (pow (sin ky) 2))))
#s(approx (+ (* ky ky) (- 1/2 (* 1/2 (cos (* 2 kx))))) #s(hole binary64 (- (+ 1/2 (pow ky 2)) (* 1/2 (cos (* 2 kx))))))
#s(approx (- 1/2 (* 1/2 (cos (* 2 kx)))) #s(hole binary64 (- 1/2 (* 1/2 (cos (* 2 kx))))))
#s(approx (* 1/2 (cos (* 2 kx))) #s(hole binary64 (* 1/2 (cos (* 2 kx)))))
#s(approx (cos (* 2 kx)) #s(hole binary64 (cos (* 2 kx))))
#s(approx (exp (* (log (sin kx)) 2)) #s(hole binary64 (pow (sin kx) 2)))
#s(approx (* (log (sin kx)) 2) #s(hole binary64 (* 2 (log (sin kx)))))
#s(approx (log (sin kx)) #s(hole binary64 (log (sin kx))))
#s(approx (* (sin ky) (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))))) #s(hole binary64 (/ (* ky (sin th)) (sqrt (pow (sin kx) 2)))))
#s(approx (* (sin ky) (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))))) #s(hole binary64 (* ky (+ (* (pow ky 2) (- (* -1/6 (/ (sin th) (sqrt (pow (sin kx) 2)))) (* 1/2 (/ (sin th) (pow (sqrt (pow (sin kx) 2)) 3))))) (/ (sin th) (sqrt (pow (sin kx) 2)))))))
#s(approx (* (sin ky) (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))))) #s(hole binary64 (* ky (+ (* (pow ky 2) (- (+ (* -1/6 (/ (sin th) (sqrt (pow (sin kx) 2)))) (* (pow ky 2) (- (* 1/120 (/ (sin th) (sqrt (pow (sin kx) 2)))) (+ (* -1/2 (/ (* (sin th) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2))))) (pow (sqrt (pow (sin kx) 2)) 3))) (* 1/2 (/ (- (* -1/6 (/ (sin th) (sqrt (pow (sin kx) 2)))) (* 1/2 (/ (sin th) (pow (sqrt (pow (sin kx) 2)) 3)))) (pow (sqrt (pow (sin kx) 2)) 2))))))) (* 1/2 (/ (sin th) (pow (sqrt (pow (sin kx) 2)) 3))))) (/ (sin th) (sqrt (pow (sin kx) 2)))))))
#s(approx (* (sin ky) (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))))) #s(hole binary64 (* ky (+ (* (pow ky 2) (- (+ (* -1/6 (/ (sin th) (sqrt (pow (sin kx) 2)))) (* (pow ky 2) (- (+ (* 1/120 (/ (sin th) (sqrt (pow (sin kx) 2)))) (* (pow ky 2) (- (* -1/5040 (/ (sin th) (sqrt (pow (sin kx) 2)))) (+ (* -1/2 (/ (* (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2)))) (- (* -1/6 (/ (sin th) (sqrt (pow (sin kx) 2)))) (* 1/2 (/ (sin th) (pow (sqrt (pow (sin kx) 2)) 3))))) (pow (sqrt (pow (sin kx) 2)) 2))) (+ (* 1/2 (/ (* (sin th) (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2)))) (pow (sqrt (pow (sin kx) 2)) 2))))) (pow (sqrt (pow (sin kx) 2)) 3))) (* 1/2 (/ (- (* 1/120 (/ (sin th) (sqrt (pow (sin kx) 2)))) (+ (* -1/2 (/ (* (sin th) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2))))) (pow (sqrt (pow (sin kx) 2)) 3))) (* 1/2 (/ (- (* -1/6 (/ (sin th) (sqrt (pow (sin kx) 2)))) (* 1/2 (/ (sin th) (pow (sqrt (pow (sin kx) 2)) 3)))) (pow (sqrt (pow (sin kx) 2)) 2))))) (pow (sqrt (pow (sin kx) 2)) 2)))))))) (+ (* -1/2 (/ (* (sin th) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2))))) (pow (sqrt (pow (sin kx) 2)) 3))) (* 1/2 (/ (- (* -1/6 (/ (sin th) (sqrt (pow (sin kx) 2)))) (* 1/2 (/ (sin th) (pow (sqrt (pow (sin kx) 2)) 3)))) (pow (sqrt (pow (sin kx) 2)) 2))))))) (* 1/2 (/ (sin th) (pow (sqrt (pow (sin kx) 2)) 3))))) (/ (sin th) (sqrt (pow (sin kx) 2)))))))
#s(approx (sin ky) #s(hole binary64 ky))
#s(approx (sin ky) #s(hole binary64 (* ky (+ 1 (* -1/6 (pow ky 2))))))
#s(approx (sin ky) #s(hole binary64 (* ky (+ 1 (* (pow ky 2) (- (* 1/120 (pow ky 2)) 1/6))))))
#s(approx (sin ky) #s(hole binary64 (* ky (+ 1 (* (pow ky 2) (- (* (pow ky 2) (+ 1/120 (* -1/5040 (pow ky 2)))) 1/6))))))
#s(approx (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(hole binary64 (/ (sin th) (sqrt (pow (sin kx) 2)))))
#s(approx (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sqrt (pow (sin kx) 2)) 3))) (/ (sin th) (sqrt (pow (sin kx) 2))))))
#s(approx (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(hole binary64 (+ (* (pow ky 2) (- (* -1 (* (pow ky 2) (+ (* -1/2 (/ (* (sin th) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2))))) (pow (sqrt (pow (sin kx) 2)) 3))) (* -1/4 (/ (sin th) (pow (sqrt (pow (sin kx) 2)) 5)))))) (* 1/2 (/ (sin th) (pow (sqrt (pow (sin kx) 2)) 3))))) (/ (sin th) (sqrt (pow (sin kx) 2))))))
#s(approx (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(hole binary64 (+ (* (pow ky 2) (- (* (pow ky 2) (- (* -1 (* (pow ky 2) (+ (* -1/2 (/ (+ (* -1/2 (/ (* (sin th) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2))))) (pow (sqrt (pow (sin kx) 2)) 3))) (* -1/4 (/ (sin th) (pow (sqrt (pow (sin kx) 2)) 5)))) (pow (sqrt (pow (sin kx) 2)) 2))) (+ (* 1/4 (/ (* (sin th) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2))))) (pow (sqrt (pow (sin kx) 2)) 5))) (* 1/2 (/ (* (sin th) (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2)))) (pow (sqrt (pow (sin kx) 2)) 2))))) (pow (sqrt (pow (sin kx) 2)) 3))))))) (+ (* -1/2 (/ (* (sin th) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2))))) (pow (sqrt (pow (sin kx) 2)) 3))) (* -1/4 (/ (sin th) (pow (sqrt (pow (sin kx) 2)) 5)))))) (* 1/2 (/ (sin th) (pow (sqrt (pow (sin kx) 2)) 3))))) (/ (sin th) (sqrt (pow (sin kx) 2))))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) #s(hole binary64 (sqrt (pow (sin kx) 2))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) #s(hole binary64 (+ (sqrt (pow (sin kx) 2)) (* 1/2 (/ (pow ky 2) (sqrt (pow (sin kx) 2)))))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) #s(hole binary64 (+ (sqrt (pow (sin kx) 2)) (* (pow ky 2) (+ (* -1/2 (/ (* (pow ky 2) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2))))) (sqrt (pow (sin kx) 2)))) (* 1/2 (/ 1 (sqrt (pow (sin kx) 2)))))))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) #s(hole binary64 (+ (sqrt (pow (sin kx) 2)) (* (pow ky 2) (+ (* (pow ky 2) (+ (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2)))) (sqrt (pow (sin kx) 2)))) (* 1/2 (/ (* (pow ky 2) (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2)))) (pow (sqrt (pow (sin kx) 2)) 2))))) (sqrt (pow (sin kx) 2)))))) (* 1/2 (/ 1 (sqrt (pow (sin kx) 2)))))))))
#s(approx (* (sin th) ky) #s(hole binary64 (* ky (sin th))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (/ ky (sqrt (pow (sin kx) 2)))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (* ky (+ (* -1 (* (pow ky 2) (+ (* 1/6 (/ 1 (sqrt (pow (sin kx) 2)))) (* 1/2 (/ 1 (pow (sqrt (pow (sin kx) 2)) 3)))))) (/ 1 (sqrt (pow (sin kx) 2)))))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (* ky (+ (* (pow ky 2) (- (* (pow ky 2) (- (* 1/120 (/ 1 (sqrt (pow (sin kx) 2)))) (+ (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2)))) (pow (sqrt (pow (sin kx) 2)) 3))) (* -1/2 (/ (+ (* 1/6 (/ 1 (sqrt (pow (sin kx) 2)))) (* 1/2 (/ 1 (pow (sqrt (pow (sin kx) 2)) 3)))) (pow (sqrt (pow (sin kx) 2)) 2)))))) (+ (* 1/6 (/ 1 (sqrt (pow (sin kx) 2)))) (* 1/2 (/ 1 (pow (sqrt (pow (sin kx) 2)) 3)))))) (/ 1 (sqrt (pow (sin kx) 2)))))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (* ky (+ (* (pow ky 2) (- (* (pow ky 2) (- (+ (* -1 (* (pow ky 2) (+ (* 1/5040 (/ 1 (sqrt (pow (sin kx) 2)))) (+ (* 1/2 (/ (* (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2)))) (+ (* 1/6 (/ 1 (sqrt (pow (sin kx) 2)))) (* 1/2 (/ 1 (pow (sqrt (pow (sin kx) 2)) 3))))) (pow (sqrt (pow (sin kx) 2)) 2))) (+ (* 1/2 (/ (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2)))) (pow (sqrt (pow (sin kx) 2)) 2)))) (pow (sqrt (pow (sin kx) 2)) 3))) (* 1/2 (/ (- (* 1/120 (/ 1 (sqrt (pow (sin kx) 2)))) (+ (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2)))) (pow (sqrt (pow (sin kx) 2)) 3))) (* -1/2 (/ (+ (* 1/6 (/ 1 (sqrt (pow (sin kx) 2)))) (* 1/2 (/ 1 (pow (sqrt (pow (sin kx) 2)) 3)))) (pow (sqrt (pow (sin kx) 2)) 2))))) (pow (sqrt (pow (sin kx) 2)) 2)))))))) (* 1/120 (/ 1 (sqrt (pow (sin kx) 2))))) (+ (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2)))) (pow (sqrt (pow (sin kx) 2)) 3))) (* -1/2 (/ (+ (* 1/6 (/ 1 (sqrt (pow (sin kx) 2)))) (* 1/2 (/ 1 (pow (sqrt (pow (sin kx) 2)) 3)))) (pow (sqrt (pow (sin kx) 2)) 2)))))) (+ (* 1/6 (/ 1 (sqrt (pow (sin kx) 2)))) (* 1/2 (/ 1 (pow (sqrt (pow (sin kx) 2)) 3)))))) (/ 1 (sqrt (pow (sin kx) 2)))))))
#s(approx (fabs (sin ky)) #s(hole binary64 (fabs (sin ky))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (pow ky 2) (pow (sin kx) 2))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2)))) (pow (sin kx) 2))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3)))) (pow (sin kx) 2))))
#s(approx (pow (sin ky) 2) #s(hole binary64 (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2))))))
#s(approx (pow (sin ky) 2) #s(hole binary64 (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3))))))
#s(approx (pow (sin ky) 2) #s(hole binary64 (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* (pow ky 2) (+ 2/45 (* -1/315 (pow ky 2)))) 1/3))))))
#s(approx (sin ky) #s(hole binary64 (sin ky)))
#s(approx (+ (* ky ky) (- 1/2 (* 1/2 (cos (* 2 kx))))) #s(hole binary64 (* (pow ky 2) (- (+ 1 (* 1/2 (/ 1 (pow ky 2)))) (* 1/2 (/ (cos (* 2 kx)) (pow ky 2)))))))
#s(approx (* (sin ky) (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))))) #s(hole binary64 (/ (* th (sin ky)) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))
#s(approx (* (sin ky) (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))))) #s(hole binary64 (* th (+ (* -1/6 (/ (* (pow th 2) (sin ky)) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))
#s(approx (* (sin ky) (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))))) #s(hole binary64 (* th (+ (* (pow th 2) (+ (* -1/6 (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 1/120 (/ (* (pow th 2) (sin ky)) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))
#s(approx (* (sin ky) (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))))) #s(hole binary64 (* th (+ (* (pow th 2) (+ (* -1/6 (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* (pow th 2) (+ (* -1/5040 (/ (* (pow th 2) (sin ky)) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 1/120 (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))
#s(approx (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(hole binary64 (/ th (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))
#s(approx (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(hole binary64 (* th (+ (* -1/6 (/ (pow th 2) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (/ 1 (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))
#s(approx (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(hole binary64 (* th (+ (* (pow th 2) (- (* 1/120 (/ (pow th 2) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 1/6 (/ 1 (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (/ 1 (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))
#s(approx (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(hole binary64 (* th (+ (* (pow th 2) (- (* (pow th 2) (+ (* -1/5040 (/ (pow th 2) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 1/120 (/ 1 (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (* 1/6 (/ 1 (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (/ 1 (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))
#s(approx (sin th) #s(hole binary64 th))
#s(approx (sin th) #s(hole binary64 (* th (+ 1 (* -1/6 (pow th 2))))))
#s(approx (sin th) #s(hole binary64 (* th (+ 1 (* (pow th 2) (- (* 1/120 (pow th 2)) 1/6))))))
#s(approx (sin th) #s(hole binary64 (* th (+ 1 (* (pow th 2) (- (* (pow th 2) (+ 1/120 (* -1/5040 (pow th 2)))) 1/6))))))
#s(approx (/ (* (sin th) ky) (fabs (sin kx))) #s(hole binary64 (/ (* ky th) (fabs (sin kx)))))
#s(approx (/ (* (sin th) ky) (fabs (sin kx))) #s(hole binary64 (* th (+ (* -1/6 (/ (* ky (pow th 2)) (fabs (sin kx)))) (/ ky (fabs (sin kx)))))))
#s(approx (/ (* (sin th) ky) (fabs (sin kx))) #s(hole binary64 (* th (+ (* (pow th 2) (+ (* -1/6 (/ ky (fabs (sin kx)))) (* 1/120 (/ (* ky (pow th 2)) (fabs (sin kx)))))) (/ ky (fabs (sin kx)))))))
#s(approx (/ (* (sin th) ky) (fabs (sin kx))) #s(hole binary64 (* th (+ (* (pow th 2) (+ (* -1/6 (/ ky (fabs (sin kx)))) (* (pow th 2) (+ (* -1/5040 (/ (* ky (pow th 2)) (fabs (sin kx)))) (* 1/120 (/ ky (fabs (sin kx)))))))) (/ ky (fabs (sin kx)))))))
#s(approx (* (sin th) ky) #s(hole binary64 (* ky th)))
#s(approx (* (sin th) ky) #s(hole binary64 (* th (+ ky (* -1/6 (* ky (pow th 2)))))))
#s(approx (* (sin th) ky) #s(hole binary64 (* th (+ ky (* (pow th 2) (+ (* -1/6 ky) (* 1/120 (* ky (pow th 2)))))))))
#s(approx (* (sin th) ky) #s(hole binary64 (* th (+ ky (* (pow th 2) (+ (* -1/6 ky) (* (pow th 2) (+ (* -1/5040 (* ky (pow th 2))) (* 1/120 ky)))))))))
#s(approx (sin th) #s(hole binary64 (sin th)))
Outputs
(*.f64 (/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (sin.f64 ky))
(*.f64 (sin.f64 th) (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))
(*.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (sin.f64 th))
(*.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))
(/.f64 (neg.f64 (*.f64 (sin.f64 th) (sin.f64 ky))) (neg.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky))))
(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))
(pow.f64 (sin.f64 ky) #s(literal 1 binary64))
(/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 ky) #s(literal -1 binary64)))
(sin.f64 ky)
(exp.f64 (*.f64 (log.f64 (sin.f64 ky)) #s(literal 1 binary64)))
ky
(/.f64 (neg.f64 (sin.f64 th)) (neg.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky))))
(/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))
(sin.f64 th)
th
(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 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal 1/2 binary64))
(/.f64 (sqrt.f64 (-.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 (sin.f64 ky) #s(literal 4 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 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))))))
(/.f64 (hypot.f64 (pow.f64 (sin.f64 kx) #s(literal 3 binary64)) (pow.f64 (sin.f64 ky) #s(literal 3 binary64))) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (*.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal 2 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))
(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 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))))
(hypot.f64 (fabs.f64 (fabs.f64 (sin.f64 kx))) (fabs.f64 (fabs.f64 (sin.f64 ky))))
(hypot.f64 (fabs.f64 (fabs.f64 (sin.f64 kx))) (neg.f64 (neg.f64 (sin.f64 ky))))
(hypot.f64 (fabs.f64 (fabs.f64 (sin.f64 kx))) (exp.f64 (log.f64 (sin.f64 ky))))
(hypot.f64 (fabs.f64 (fabs.f64 (sin.f64 kx))) (exp.f64 (log.f64 (fabs.f64 (sin.f64 ky)))))
(hypot.f64 (fabs.f64 (fabs.f64 (sin.f64 kx))) (pow.f64 (neg.f64 (sin.f64 ky)) #s(literal 1 binary64)))
(hypot.f64 (fabs.f64 (fabs.f64 (sin.f64 kx))) (neg.f64 (fabs.f64 (sin.f64 ky))))
(hypot.f64 (fabs.f64 (fabs.f64 (sin.f64 kx))) (neg.f64 (sin.f64 ky)))
(hypot.f64 (fabs.f64 (fabs.f64 (sin.f64 kx))) (fabs.f64 (sin.f64 ky)))
(hypot.f64 (fabs.f64 (fabs.f64 (sin.f64 kx))) (sin.f64 ky))
(hypot.f64 (fabs.f64 (fabs.f64 (sin.f64 ky))) (fabs.f64 (fabs.f64 (sin.f64 kx))))
(hypot.f64 (fabs.f64 (fabs.f64 (sin.f64 ky))) (neg.f64 (neg.f64 (sin.f64 kx))))
(hypot.f64 (fabs.f64 (fabs.f64 (sin.f64 ky))) (exp.f64 (log.f64 (fabs.f64 (sin.f64 kx)))))
(hypot.f64 (fabs.f64 (fabs.f64 (sin.f64 ky))) (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1 binary64)))
(hypot.f64 (fabs.f64 (fabs.f64 (sin.f64 ky))) (neg.f64 (fabs.f64 (sin.f64 kx))))
(hypot.f64 (fabs.f64 (fabs.f64 (sin.f64 ky))) (neg.f64 (sin.f64 kx)))
(hypot.f64 (fabs.f64 (fabs.f64 (sin.f64 ky))) (fabs.f64 (sin.f64 kx)))
(hypot.f64 (fabs.f64 (fabs.f64 (sin.f64 ky))) (sin.f64 kx))
(hypot.f64 (neg.f64 (neg.f64 (sin.f64 kx))) (fabs.f64 (fabs.f64 (sin.f64 ky))))
(hypot.f64 (neg.f64 (neg.f64 (sin.f64 kx))) (neg.f64 (neg.f64 (sin.f64 ky))))
(hypot.f64 (neg.f64 (neg.f64 (sin.f64 kx))) (exp.f64 (log.f64 (sin.f64 ky))))
(hypot.f64 (neg.f64 (neg.f64 (sin.f64 kx))) (exp.f64 (log.f64 (fabs.f64 (sin.f64 ky)))))
(hypot.f64 (neg.f64 (neg.f64 (sin.f64 kx))) (pow.f64 (neg.f64 (sin.f64 ky)) #s(literal 1 binary64)))
(hypot.f64 (neg.f64 (neg.f64 (sin.f64 kx))) (neg.f64 (fabs.f64 (sin.f64 ky))))
(hypot.f64 (neg.f64 (neg.f64 (sin.f64 kx))) (neg.f64 (sin.f64 ky)))
(hypot.f64 (neg.f64 (neg.f64 (sin.f64 kx))) (fabs.f64 (sin.f64 ky)))
(hypot.f64 (neg.f64 (neg.f64 (sin.f64 kx))) (sin.f64 ky))
(hypot.f64 (neg.f64 (neg.f64 (sin.f64 ky))) (fabs.f64 (fabs.f64 (sin.f64 kx))))
(hypot.f64 (neg.f64 (neg.f64 (sin.f64 ky))) (neg.f64 (neg.f64 (sin.f64 kx))))
(hypot.f64 (neg.f64 (neg.f64 (sin.f64 ky))) (exp.f64 (log.f64 (fabs.f64 (sin.f64 kx)))))
(hypot.f64 (neg.f64 (neg.f64 (sin.f64 ky))) (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1 binary64)))
(hypot.f64 (neg.f64 (neg.f64 (sin.f64 ky))) (neg.f64 (fabs.f64 (sin.f64 kx))))
(hypot.f64 (neg.f64 (neg.f64 (sin.f64 ky))) (neg.f64 (sin.f64 kx)))
(hypot.f64 (neg.f64 (neg.f64 (sin.f64 ky))) (fabs.f64 (sin.f64 kx)))
(hypot.f64 (neg.f64 (neg.f64 (sin.f64 ky))) (sin.f64 kx))
(hypot.f64 (exp.f64 (log.f64 (sin.f64 ky))) (fabs.f64 (fabs.f64 (sin.f64 kx))))
(hypot.f64 (exp.f64 (log.f64 (sin.f64 ky))) (neg.f64 (neg.f64 (sin.f64 kx))))
(hypot.f64 (exp.f64 (log.f64 (sin.f64 ky))) (exp.f64 (log.f64 (fabs.f64 (sin.f64 kx)))))
(hypot.f64 (exp.f64 (log.f64 (sin.f64 ky))) (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1 binary64)))
(hypot.f64 (exp.f64 (log.f64 (sin.f64 ky))) (neg.f64 (fabs.f64 (sin.f64 kx))))
(hypot.f64 (exp.f64 (log.f64 (sin.f64 ky))) (neg.f64 (sin.f64 kx)))
(hypot.f64 (exp.f64 (log.f64 (sin.f64 ky))) (fabs.f64 (sin.f64 kx)))
(hypot.f64 (exp.f64 (log.f64 (sin.f64 ky))) (sin.f64 kx))
(hypot.f64 (exp.f64 (log.f64 (fabs.f64 (sin.f64 kx)))) (fabs.f64 (fabs.f64 (sin.f64 ky))))
(hypot.f64 (exp.f64 (log.f64 (fabs.f64 (sin.f64 kx)))) (neg.f64 (neg.f64 (sin.f64 ky))))
(hypot.f64 (exp.f64 (log.f64 (fabs.f64 (sin.f64 kx)))) (exp.f64 (log.f64 (sin.f64 ky))))
(hypot.f64 (exp.f64 (log.f64 (fabs.f64 (sin.f64 kx)))) (exp.f64 (log.f64 (fabs.f64 (sin.f64 ky)))))
(hypot.f64 (exp.f64 (log.f64 (fabs.f64 (sin.f64 kx)))) (pow.f64 (neg.f64 (sin.f64 ky)) #s(literal 1 binary64)))
(hypot.f64 (exp.f64 (log.f64 (fabs.f64 (sin.f64 kx)))) (neg.f64 (fabs.f64 (sin.f64 ky))))
(hypot.f64 (exp.f64 (log.f64 (fabs.f64 (sin.f64 kx)))) (neg.f64 (sin.f64 ky)))
(hypot.f64 (exp.f64 (log.f64 (fabs.f64 (sin.f64 kx)))) (fabs.f64 (sin.f64 ky)))
(hypot.f64 (exp.f64 (log.f64 (fabs.f64 (sin.f64 kx)))) (sin.f64 ky))
(hypot.f64 (exp.f64 (log.f64 (fabs.f64 (sin.f64 ky)))) (fabs.f64 (fabs.f64 (sin.f64 kx))))
(hypot.f64 (exp.f64 (log.f64 (fabs.f64 (sin.f64 ky)))) (neg.f64 (neg.f64 (sin.f64 kx))))
(hypot.f64 (exp.f64 (log.f64 (fabs.f64 (sin.f64 ky)))) (exp.f64 (log.f64 (fabs.f64 (sin.f64 kx)))))
(hypot.f64 (exp.f64 (log.f64 (fabs.f64 (sin.f64 ky)))) (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1 binary64)))
(hypot.f64 (exp.f64 (log.f64 (fabs.f64 (sin.f64 ky)))) (neg.f64 (fabs.f64 (sin.f64 kx))))
(hypot.f64 (exp.f64 (log.f64 (fabs.f64 (sin.f64 ky)))) (neg.f64 (sin.f64 kx)))
(hypot.f64 (exp.f64 (log.f64 (fabs.f64 (sin.f64 ky)))) (fabs.f64 (sin.f64 kx)))
(hypot.f64 (exp.f64 (log.f64 (fabs.f64 (sin.f64 ky)))) (sin.f64 kx))
(hypot.f64 (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1 binary64)) (fabs.f64 (fabs.f64 (sin.f64 ky))))
(hypot.f64 (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1 binary64)) (neg.f64 (neg.f64 (sin.f64 ky))))
(hypot.f64 (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1 binary64)) (exp.f64 (log.f64 (sin.f64 ky))))
(hypot.f64 (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1 binary64)) (exp.f64 (log.f64 (fabs.f64 (sin.f64 ky)))))
(hypot.f64 (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1 binary64)) (pow.f64 (neg.f64 (sin.f64 ky)) #s(literal 1 binary64)))
(hypot.f64 (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1 binary64)) (neg.f64 (fabs.f64 (sin.f64 ky))))
(hypot.f64 (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1 binary64)) (neg.f64 (sin.f64 ky)))
(hypot.f64 (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1 binary64)) (fabs.f64 (sin.f64 ky)))
(hypot.f64 (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1 binary64)) (sin.f64 ky))
(hypot.f64 (pow.f64 (neg.f64 (sin.f64 ky)) #s(literal 1 binary64)) (fabs.f64 (fabs.f64 (sin.f64 kx))))
(hypot.f64 (pow.f64 (neg.f64 (sin.f64 ky)) #s(literal 1 binary64)) (neg.f64 (neg.f64 (sin.f64 kx))))
(hypot.f64 (pow.f64 (neg.f64 (sin.f64 ky)) #s(literal 1 binary64)) (exp.f64 (log.f64 (fabs.f64 (sin.f64 kx)))))
(hypot.f64 (pow.f64 (neg.f64 (sin.f64 ky)) #s(literal 1 binary64)) (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1 binary64)))
(hypot.f64 (pow.f64 (neg.f64 (sin.f64 ky)) #s(literal 1 binary64)) (neg.f64 (fabs.f64 (sin.f64 kx))))
(hypot.f64 (pow.f64 (neg.f64 (sin.f64 ky)) #s(literal 1 binary64)) (neg.f64 (sin.f64 kx)))
(hypot.f64 (pow.f64 (neg.f64 (sin.f64 ky)) #s(literal 1 binary64)) (fabs.f64 (sin.f64 kx)))
(hypot.f64 (pow.f64 (neg.f64 (sin.f64 ky)) #s(literal 1 binary64)) (sin.f64 kx))
(hypot.f64 (neg.f64 (fabs.f64 (sin.f64 kx))) (fabs.f64 (fabs.f64 (sin.f64 ky))))
(hypot.f64 (neg.f64 (fabs.f64 (sin.f64 kx))) (neg.f64 (neg.f64 (sin.f64 ky))))
(hypot.f64 (neg.f64 (fabs.f64 (sin.f64 kx))) (exp.f64 (log.f64 (sin.f64 ky))))
(hypot.f64 (neg.f64 (fabs.f64 (sin.f64 kx))) (exp.f64 (log.f64 (fabs.f64 (sin.f64 ky)))))
(hypot.f64 (neg.f64 (fabs.f64 (sin.f64 kx))) (pow.f64 (neg.f64 (sin.f64 ky)) #s(literal 1 binary64)))
(hypot.f64 (neg.f64 (fabs.f64 (sin.f64 kx))) (neg.f64 (fabs.f64 (sin.f64 ky))))
(hypot.f64 (neg.f64 (fabs.f64 (sin.f64 kx))) (neg.f64 (sin.f64 ky)))
(hypot.f64 (neg.f64 (fabs.f64 (sin.f64 kx))) (fabs.f64 (sin.f64 ky)))
(hypot.f64 (neg.f64 (fabs.f64 (sin.f64 kx))) (sin.f64 ky))
(hypot.f64 (neg.f64 (fabs.f64 (sin.f64 ky))) (fabs.f64 (fabs.f64 (sin.f64 kx))))
(hypot.f64 (neg.f64 (fabs.f64 (sin.f64 ky))) (neg.f64 (neg.f64 (sin.f64 kx))))
(hypot.f64 (neg.f64 (fabs.f64 (sin.f64 ky))) (exp.f64 (log.f64 (fabs.f64 (sin.f64 kx)))))
(hypot.f64 (neg.f64 (fabs.f64 (sin.f64 ky))) (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1 binary64)))
(hypot.f64 (neg.f64 (fabs.f64 (sin.f64 ky))) (neg.f64 (fabs.f64 (sin.f64 kx))))
(hypot.f64 (neg.f64 (fabs.f64 (sin.f64 ky))) (neg.f64 (sin.f64 kx)))
(hypot.f64 (neg.f64 (fabs.f64 (sin.f64 ky))) (fabs.f64 (sin.f64 kx)))
(hypot.f64 (neg.f64 (fabs.f64 (sin.f64 ky))) (sin.f64 kx))
(hypot.f64 (neg.f64 (sin.f64 ky)) (fabs.f64 (fabs.f64 (sin.f64 kx))))
(hypot.f64 (neg.f64 (sin.f64 ky)) (neg.f64 (neg.f64 (sin.f64 kx))))
(hypot.f64 (neg.f64 (sin.f64 ky)) (exp.f64 (log.f64 (fabs.f64 (sin.f64 kx)))))
(hypot.f64 (neg.f64 (sin.f64 ky)) (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1 binary64)))
(hypot.f64 (neg.f64 (sin.f64 ky)) (neg.f64 (fabs.f64 (sin.f64 kx))))
(hypot.f64 (neg.f64 (sin.f64 ky)) (neg.f64 (sin.f64 kx)))
(hypot.f64 (neg.f64 (sin.f64 ky)) (fabs.f64 (sin.f64 kx)))
(hypot.f64 (neg.f64 (sin.f64 ky)) (sin.f64 kx))
(hypot.f64 (neg.f64 (sin.f64 kx)) (fabs.f64 (fabs.f64 (sin.f64 ky))))
(hypot.f64 (neg.f64 (sin.f64 kx)) (neg.f64 (neg.f64 (sin.f64 ky))))
(hypot.f64 (neg.f64 (sin.f64 kx)) (exp.f64 (log.f64 (sin.f64 ky))))
(hypot.f64 (neg.f64 (sin.f64 kx)) (exp.f64 (log.f64 (fabs.f64 (sin.f64 ky)))))
(hypot.f64 (neg.f64 (sin.f64 kx)) (pow.f64 (neg.f64 (sin.f64 ky)) #s(literal 1 binary64)))
(hypot.f64 (neg.f64 (sin.f64 kx)) (neg.f64 (fabs.f64 (sin.f64 ky))))
(hypot.f64 (neg.f64 (sin.f64 kx)) (neg.f64 (sin.f64 ky)))
(hypot.f64 (neg.f64 (sin.f64 kx)) (fabs.f64 (sin.f64 ky)))
(hypot.f64 (neg.f64 (sin.f64 kx)) (sin.f64 ky))
(hypot.f64 (fabs.f64 (sin.f64 kx)) (fabs.f64 (fabs.f64 (sin.f64 ky))))
(hypot.f64 (fabs.f64 (sin.f64 kx)) (neg.f64 (neg.f64 (sin.f64 ky))))
(hypot.f64 (fabs.f64 (sin.f64 kx)) (exp.f64 (log.f64 (sin.f64 ky))))
(hypot.f64 (fabs.f64 (sin.f64 kx)) (exp.f64 (log.f64 (fabs.f64 (sin.f64 ky)))))
(hypot.f64 (fabs.f64 (sin.f64 kx)) (pow.f64 (neg.f64 (sin.f64 ky)) #s(literal 1 binary64)))
(hypot.f64 (fabs.f64 (sin.f64 kx)) (neg.f64 (fabs.f64 (sin.f64 ky))))
(hypot.f64 (fabs.f64 (sin.f64 kx)) (neg.f64 (sin.f64 ky)))
(hypot.f64 (fabs.f64 (sin.f64 kx)) (fabs.f64 (sin.f64 ky)))
(hypot.f64 (fabs.f64 (sin.f64 kx)) (sin.f64 ky))
(hypot.f64 (fabs.f64 (sin.f64 ky)) (fabs.f64 (fabs.f64 (sin.f64 kx))))
(hypot.f64 (fabs.f64 (sin.f64 ky)) (neg.f64 (neg.f64 (sin.f64 kx))))
(hypot.f64 (fabs.f64 (sin.f64 ky)) (exp.f64 (log.f64 (fabs.f64 (sin.f64 kx)))))
(hypot.f64 (fabs.f64 (sin.f64 ky)) (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1 binary64)))
(hypot.f64 (fabs.f64 (sin.f64 ky)) (neg.f64 (fabs.f64 (sin.f64 kx))))
(hypot.f64 (fabs.f64 (sin.f64 ky)) (neg.f64 (sin.f64 kx)))
(hypot.f64 (fabs.f64 (sin.f64 ky)) (fabs.f64 (sin.f64 kx)))
(hypot.f64 (fabs.f64 (sin.f64 ky)) (sin.f64 kx))
(hypot.f64 (sin.f64 kx) (fabs.f64 (fabs.f64 (sin.f64 ky))))
(hypot.f64 (sin.f64 kx) (neg.f64 (neg.f64 (sin.f64 ky))))
(hypot.f64 (sin.f64 kx) (exp.f64 (log.f64 (sin.f64 ky))))
(hypot.f64 (sin.f64 kx) (exp.f64 (log.f64 (fabs.f64 (sin.f64 ky)))))
(hypot.f64 (sin.f64 kx) (pow.f64 (neg.f64 (sin.f64 ky)) #s(literal 1 binary64)))
(hypot.f64 (sin.f64 kx) (neg.f64 (fabs.f64 (sin.f64 ky))))
(hypot.f64 (sin.f64 kx) (neg.f64 (sin.f64 ky)))
(hypot.f64 (sin.f64 kx) (fabs.f64 (sin.f64 ky)))
(hypot.f64 (sin.f64 kx) (sin.f64 ky))
(hypot.f64 (sin.f64 ky) (fabs.f64 (fabs.f64 (sin.f64 kx))))
(hypot.f64 (sin.f64 ky) (neg.f64 (neg.f64 (sin.f64 kx))))
(hypot.f64 (sin.f64 ky) (exp.f64 (log.f64 (fabs.f64 (sin.f64 kx)))))
(hypot.f64 (sin.f64 ky) (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1 binary64)))
(hypot.f64 (sin.f64 ky) (neg.f64 (fabs.f64 (sin.f64 kx))))
(hypot.f64 (sin.f64 ky) (neg.f64 (sin.f64 kx)))
(hypot.f64 (sin.f64 ky) (fabs.f64 (sin.f64 kx)))
(hypot.f64 (sin.f64 ky) (sin.f64 kx))
(exp.f64 (*.f64 (log.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 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))))) #s(literal 1/2 binary64)))
(pow.f64 (sin.f64 kx) #s(literal 1 binary64))
(/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 kx) #s(literal -1 binary64)))
(sin.f64 kx)
(exp.f64 (*.f64 (log.f64 (sin.f64 kx)) #s(literal 1 binary64)))
(exp.f64 (log.f64 (sin.f64 kx)))
(+.f64 (cosh.f64 (log.f64 (sin.f64 kx))) (sinh.f64 (log.f64 (sin.f64 kx))))
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)))))
(*.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 (sin.f64 th) ky)) (neg.f64 (fabs.f64 (sin.f64 kx))))
(/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 (sin.f64 kx)))
(*.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 (sqrt.f64 (sin.f64 kx)) (sqrt.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 (sin.f64 kx) #s(literal 1/2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 1/2 binary64)))
(pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 1 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 #s(literal 1/4 binary64) (pow.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))
(/.f64 (sqrt.f64 (-.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (cos.f64 (+.f64 kx kx)) #s(literal 3 binary64)) #s(literal 1/8 binary64)))) (sqrt.f64 (+.f64 #s(literal 1/4 binary64) (+.f64 (pow.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #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 (sin.f64 kx))))
(fabs.f64 (neg.f64 (sin.f64 kx)))
(fabs.f64 (sin.f64 kx))
(exp.f64 (/.f64 (*.f64 (log.f64 (sin.f64 kx)) #s(literal 2 binary64)) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (fabs.f64 (sin.f64 kx))) #s(literal 1 binary64)))
(exp.f64 (*.f64 (*.f64 (log.f64 (sin.f64 kx)) #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (fabs.f64 (sin.f64 ky)))) (sin.f64 th))
(*.f64 (sin.f64 th) (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (fabs.f64 (sin.f64 ky)))))
(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (fabs.f64 (sin.f64 ky))))
(/.f64 (neg.f64 (sin.f64 ky)) (neg.f64 #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (fabs.f64 (sin.f64 ky)))))
(/.f64 (sin.f64 ky) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (fabs.f64 (sin.f64 ky))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (fabs.f64 (sin.f64 ky)))
(*.f64 (sqrt.f64 (neg.f64 (sin.f64 ky))) (sqrt.f64 (neg.f64 (sin.f64 ky))))
(*.f64 (sqrt.f64 (fabs.f64 (sin.f64 ky))) (sqrt.f64 (fabs.f64 (sin.f64 ky))))
(*.f64 (sqrt.f64 (sin.f64 ky)) (sqrt.f64 (sin.f64 ky)))
(*.f64 (pow.f64 (neg.f64 (sin.f64 ky)) #s(literal 1/2 binary64)) (pow.f64 (neg.f64 (sin.f64 ky)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (fabs.f64 (sin.f64 ky)) #s(literal 1/2 binary64)) (pow.f64 (fabs.f64 (sin.f64 ky)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (sin.f64 ky) #s(literal 1/2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 1/2 binary64)))
(pow.f64 (fabs.f64 (sin.f64 ky)) #s(literal 1 binary64))
(pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1/2 binary64))
(/.f64 (sqrt.f64 (-.f64 (cos.f64 (-.f64 ky ky)) (cos.f64 (+.f64 ky ky)))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 ky))))
(sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))))
(fabs.f64 (neg.f64 (neg.f64 (sin.f64 ky))))
(fabs.f64 (neg.f64 (sin.f64 ky)))
(fabs.f64 (sin.f64 ky))
(exp.f64 (/.f64 (*.f64 (log.f64 (fabs.f64 (sin.f64 ky))) #s(literal 2 binary64)) #s(literal 2 binary64)))
(exp.f64 (/.f64 (*.f64 (log.f64 (sin.f64 ky)) #s(literal 2 binary64)) #s(literal 2 binary64)))
(exp.f64 (*.f64 (*.f64 (log.f64 (fabs.f64 (sin.f64 ky))) #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(exp.f64 (*.f64 (*.f64 (log.f64 (sin.f64 ky)) #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(exp.f64 (*.f64 (log.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal 1/2 binary64)))
(exp.f64 (*.f64 (log.f64 (fabs.f64 (sin.f64 ky))) #s(literal 1 binary64)))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 (fma.f64 ky ky #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 (sin kx) 2) (pow (sin ky) 2)) (-.f64 (fma.f64 ky ky #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 (sin kx) 2) (pow (sin ky) 2)) (-.f64 (fma.f64 ky ky #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 (sin kx) 2) (pow (sin ky) 2)) (-.f64 (fma.f64 ky ky #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))))
(/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 (fma.f64 ky ky #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))
(pow.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 (fma.f64 ky ky #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 binary64) (pow.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 (fma.f64 ky ky #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal -1/2 binary64)))
(sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 (fma.f64 ky ky #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))
(exp.f64 (*.f64 (log.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 (fma.f64 ky ky #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))) #s(literal 1/2 binary64)))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 (fma.f64 ky ky #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 ky ky) (*.f64 ky ky)) (pow.f64 (sin.f64 kx) #s(literal 4 binary64))) (-.f64 (*.f64 ky ky) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))
(/.f64 (-.f64 (*.f64 (fma.f64 ky ky #s(literal 1/2 binary64)) (fma.f64 ky ky #s(literal 1/2 binary64))) (pow.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (+.f64 (fma.f64 ky ky #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))
(/.f64 (fma.f64 (*.f64 (*.f64 ky ky) (*.f64 ky ky)) (*.f64 ky ky) (exp.f64 (*.f64 (*.f64 (log.f64 (sin.f64 kx)) #s(literal 2 binary64)) #s(literal 3 binary64)))) (fma.f64 (*.f64 ky ky) (*.f64 ky ky) (-.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (*.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 (fma.f64 ky ky #s(literal 1/2 binary64)) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 (+.f64 kx kx)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (fma.f64 (fma.f64 ky ky #s(literal 1/2 binary64)) (fma.f64 ky ky #s(literal 1/2 binary64)) (+.f64 (pow.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (fma.f64 ky ky #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))
(fma.f64 (fabs.f64 (fabs.f64 ky)) (fabs.f64 (fabs.f64 ky)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))
(fma.f64 (fabs.f64 (fabs.f64 (sin.f64 kx))) (fabs.f64 (fabs.f64 (sin.f64 kx))) (*.f64 ky ky))
(fma.f64 (neg.f64 (fabs.f64 ky)) (neg.f64 (fabs.f64 ky)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))
(fma.f64 (neg.f64 (neg.f64 ky)) (neg.f64 (neg.f64 ky)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))
(fma.f64 (neg.f64 (neg.f64 (sin.f64 kx))) (neg.f64 (neg.f64 (sin.f64 kx))) (*.f64 ky ky))
(fma.f64 (exp.f64 (log.f64 ky)) (exp.f64 (log.f64 ky)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))
(fma.f64 (exp.f64 (log.f64 (fabs.f64 (sin.f64 kx)))) (exp.f64 (log.f64 (fabs.f64 (sin.f64 kx)))) (*.f64 ky ky))
(fma.f64 (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1 binary64)) (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1 binary64)) (*.f64 ky ky))
(fma.f64 (neg.f64 (fabs.f64 (sin.f64 kx))) (neg.f64 (fabs.f64 (sin.f64 kx))) (*.f64 ky ky))
(fma.f64 (fabs.f64 ky) (fabs.f64 ky) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))
(fma.f64 (neg.f64 ky) (neg.f64 ky) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))
(fma.f64 (neg.f64 (sin.f64 kx)) (neg.f64 (sin.f64 kx)) (*.f64 ky ky))
(fma.f64 (fabs.f64 (sin.f64 kx)) (fabs.f64 (sin.f64 kx)) (*.f64 ky ky))
(fma.f64 (sin.f64 kx) (sin.f64 kx) (*.f64 ky ky))
(fma.f64 ky ky (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))
(-.f64 (fma.f64 ky ky #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))
(+.f64 (fma.f64 ky ky #s(literal 1/2 binary64)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx))))
(+.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 ky ky))
(+.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 ky ky) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))
(*.f64 (fabs.f64 (fabs.f64 (sin.f64 kx))) (fabs.f64 (fabs.f64 (sin.f64 kx))))
(*.f64 (neg.f64 (neg.f64 (sin.f64 kx))) (neg.f64 (neg.f64 (sin.f64 kx))))
(*.f64 (exp.f64 (log.f64 (fabs.f64 (sin.f64 kx)))) (exp.f64 (log.f64 (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 (neg.f64 (fabs.f64 (sin.f64 kx))) (neg.f64 (fabs.f64 (sin.f64 kx))))
(*.f64 (neg.f64 (sin.f64 kx)) (neg.f64 (sin.f64 kx)))
(*.f64 (fabs.f64 (sin.f64 kx)) (fabs.f64 (sin.f64 kx)))
(*.f64 (sin.f64 kx) (sin.f64 kx))
(pow.f64 (exp.f64 #s(literal 2 binary64)) (log.f64 (sin.f64 kx)))
(pow.f64 (exp.f64 (log.f64 (fabs.f64 (sin.f64 kx)))) #s(literal 2 binary64))
(pow.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) #s(literal 1/2 binary64))
(pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 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 #s(literal 1/4 binary64) (pow.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #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/8 binary64) (*.f64 (pow.f64 (cos.f64 (+.f64 kx kx)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (+.f64 #s(literal 1/4 binary64) (+.f64 (pow.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))
(/.f64 (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx))) #s(literal 2 binary64))
(/.f64 #s(literal 1 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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))
(sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)))
(fabs.f64 (*.f64 (neg.f64 (sin.f64 kx)) (sin.f64 kx)))
(fabs.f64 (*.f64 (sin.f64 kx) (neg.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 (*.f64 (log.f64 (sin.f64 kx)) #s(literal 2 binary64)) #s(literal 1 binary64)))
(exp.f64 (*.f64 (log.f64 (sin.f64 kx)) #s(literal 2 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 (sin.f64 kx)) #s(literal 2 binary64))) (sinh.f64 (*.f64 (log.f64 (sin.f64 kx)) #s(literal 2 binary64))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx))))
#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)))
(sin.f64 (+.f64 (neg.f64 (+.f64 kx kx)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (fma.f64 #s(literal 2 binary64) kx (/.f64 (PI.f64) #s(literal 2 binary64))))
(fma.f64 (sin.f64 (+.f64 kx kx)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (+.f64 kx kx)) (sin.f64 (/.f64 (PI.f64) #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))))
(cos.f64 (neg.f64 (neg.f64 (+.f64 kx kx))))
(cos.f64 (neg.f64 (+.f64 kx kx)))
(cos.f64 (+.f64 kx kx))
(+.f64 (*.f64 (sin.f64 (+.f64 kx kx)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 (+.f64 kx kx)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(*.f64 #s(literal 2 binary64) kx)
(*.f64 kx #s(literal 2 binary64))
(+.f64 kx kx)
#s(literal 2 binary64)
(*.f64 (/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (sin.f64 ky))
(*.f64 (sin.f64 th) (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))
(*.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (sin.f64 th))
(*.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))
(/.f64 (neg.f64 (*.f64 (sin.f64 th) (sin.f64 ky))) (neg.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky))))
(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))
(/.f64 (neg.f64 (sin.f64 ky)) (neg.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky))))
(/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))
(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 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal 1/2 binary64))
(/.f64 (sqrt.f64 (-.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 (sin.f64 ky) #s(literal 4 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 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))))))
(/.f64 (hypot.f64 (pow.f64 (sin.f64 kx) #s(literal 3 binary64)) (pow.f64 (sin.f64 ky) #s(literal 3 binary64))) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (*.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal 2 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))
(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 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))))
(hypot.f64 (fabs.f64 (fabs.f64 (sin.f64 kx))) (fabs.f64 (fabs.f64 (sin.f64 ky))))
(hypot.f64 (fabs.f64 (fabs.f64 (sin.f64 kx))) (neg.f64 (neg.f64 (sin.f64 ky))))
(hypot.f64 (fabs.f64 (fabs.f64 (sin.f64 kx))) (exp.f64 (log.f64 (sin.f64 ky))))
(hypot.f64 (fabs.f64 (fabs.f64 (sin.f64 kx))) (exp.f64 (log.f64 (fabs.f64 (sin.f64 ky)))))
(hypot.f64 (fabs.f64 (fabs.f64 (sin.f64 kx))) (pow.f64 (neg.f64 (sin.f64 ky)) #s(literal 1 binary64)))
(hypot.f64 (fabs.f64 (fabs.f64 (sin.f64 kx))) (neg.f64 (fabs.f64 (sin.f64 ky))))
(hypot.f64 (fabs.f64 (fabs.f64 (sin.f64 kx))) (neg.f64 (sin.f64 ky)))
(hypot.f64 (fabs.f64 (fabs.f64 (sin.f64 kx))) (fabs.f64 (sin.f64 ky)))
(hypot.f64 (fabs.f64 (fabs.f64 (sin.f64 kx))) (sin.f64 ky))
(hypot.f64 (fabs.f64 (fabs.f64 (sin.f64 ky))) (fabs.f64 (fabs.f64 (sin.f64 kx))))
(hypot.f64 (fabs.f64 (fabs.f64 (sin.f64 ky))) (neg.f64 (neg.f64 (sin.f64 kx))))
(hypot.f64 (fabs.f64 (fabs.f64 (sin.f64 ky))) (exp.f64 (log.f64 (fabs.f64 (sin.f64 kx)))))
(hypot.f64 (fabs.f64 (fabs.f64 (sin.f64 ky))) (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1 binary64)))
(hypot.f64 (fabs.f64 (fabs.f64 (sin.f64 ky))) (neg.f64 (fabs.f64 (sin.f64 kx))))
(hypot.f64 (fabs.f64 (fabs.f64 (sin.f64 ky))) (neg.f64 (sin.f64 kx)))
(hypot.f64 (fabs.f64 (fabs.f64 (sin.f64 ky))) (fabs.f64 (sin.f64 kx)))
(hypot.f64 (fabs.f64 (fabs.f64 (sin.f64 ky))) (sin.f64 kx))
(hypot.f64 (neg.f64 (neg.f64 (sin.f64 kx))) (fabs.f64 (fabs.f64 (sin.f64 ky))))
(hypot.f64 (neg.f64 (neg.f64 (sin.f64 kx))) (neg.f64 (neg.f64 (sin.f64 ky))))
(hypot.f64 (neg.f64 (neg.f64 (sin.f64 kx))) (exp.f64 (log.f64 (sin.f64 ky))))
(hypot.f64 (neg.f64 (neg.f64 (sin.f64 kx))) (exp.f64 (log.f64 (fabs.f64 (sin.f64 ky)))))
(hypot.f64 (neg.f64 (neg.f64 (sin.f64 kx))) (pow.f64 (neg.f64 (sin.f64 ky)) #s(literal 1 binary64)))
(hypot.f64 (neg.f64 (neg.f64 (sin.f64 kx))) (neg.f64 (fabs.f64 (sin.f64 ky))))
(hypot.f64 (neg.f64 (neg.f64 (sin.f64 kx))) (neg.f64 (sin.f64 ky)))
(hypot.f64 (neg.f64 (neg.f64 (sin.f64 kx))) (fabs.f64 (sin.f64 ky)))
(hypot.f64 (neg.f64 (neg.f64 (sin.f64 kx))) (sin.f64 ky))
(hypot.f64 (neg.f64 (neg.f64 (sin.f64 ky))) (fabs.f64 (fabs.f64 (sin.f64 kx))))
(hypot.f64 (neg.f64 (neg.f64 (sin.f64 ky))) (neg.f64 (neg.f64 (sin.f64 kx))))
(hypot.f64 (neg.f64 (neg.f64 (sin.f64 ky))) (exp.f64 (log.f64 (fabs.f64 (sin.f64 kx)))))
(hypot.f64 (neg.f64 (neg.f64 (sin.f64 ky))) (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1 binary64)))
(hypot.f64 (neg.f64 (neg.f64 (sin.f64 ky))) (neg.f64 (fabs.f64 (sin.f64 kx))))
(hypot.f64 (neg.f64 (neg.f64 (sin.f64 ky))) (neg.f64 (sin.f64 kx)))
(hypot.f64 (neg.f64 (neg.f64 (sin.f64 ky))) (fabs.f64 (sin.f64 kx)))
(hypot.f64 (neg.f64 (neg.f64 (sin.f64 ky))) (sin.f64 kx))
(hypot.f64 (exp.f64 (log.f64 (sin.f64 ky))) (fabs.f64 (fabs.f64 (sin.f64 kx))))
(hypot.f64 (exp.f64 (log.f64 (sin.f64 ky))) (neg.f64 (neg.f64 (sin.f64 kx))))
(hypot.f64 (exp.f64 (log.f64 (sin.f64 ky))) (exp.f64 (log.f64 (fabs.f64 (sin.f64 kx)))))
(hypot.f64 (exp.f64 (log.f64 (sin.f64 ky))) (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1 binary64)))
(hypot.f64 (exp.f64 (log.f64 (sin.f64 ky))) (neg.f64 (fabs.f64 (sin.f64 kx))))
(hypot.f64 (exp.f64 (log.f64 (sin.f64 ky))) (neg.f64 (sin.f64 kx)))
(hypot.f64 (exp.f64 (log.f64 (sin.f64 ky))) (fabs.f64 (sin.f64 kx)))
(hypot.f64 (exp.f64 (log.f64 (sin.f64 ky))) (sin.f64 kx))
(hypot.f64 (exp.f64 (log.f64 (fabs.f64 (sin.f64 kx)))) (fabs.f64 (fabs.f64 (sin.f64 ky))))
(hypot.f64 (exp.f64 (log.f64 (fabs.f64 (sin.f64 kx)))) (neg.f64 (neg.f64 (sin.f64 ky))))
(hypot.f64 (exp.f64 (log.f64 (fabs.f64 (sin.f64 kx)))) (exp.f64 (log.f64 (sin.f64 ky))))
(hypot.f64 (exp.f64 (log.f64 (fabs.f64 (sin.f64 kx)))) (exp.f64 (log.f64 (fabs.f64 (sin.f64 ky)))))
(hypot.f64 (exp.f64 (log.f64 (fabs.f64 (sin.f64 kx)))) (pow.f64 (neg.f64 (sin.f64 ky)) #s(literal 1 binary64)))
(hypot.f64 (exp.f64 (log.f64 (fabs.f64 (sin.f64 kx)))) (neg.f64 (fabs.f64 (sin.f64 ky))))
(hypot.f64 (exp.f64 (log.f64 (fabs.f64 (sin.f64 kx)))) (neg.f64 (sin.f64 ky)))
(hypot.f64 (exp.f64 (log.f64 (fabs.f64 (sin.f64 kx)))) (fabs.f64 (sin.f64 ky)))
(hypot.f64 (exp.f64 (log.f64 (fabs.f64 (sin.f64 kx)))) (sin.f64 ky))
(hypot.f64 (exp.f64 (log.f64 (fabs.f64 (sin.f64 ky)))) (fabs.f64 (fabs.f64 (sin.f64 kx))))
(hypot.f64 (exp.f64 (log.f64 (fabs.f64 (sin.f64 ky)))) (neg.f64 (neg.f64 (sin.f64 kx))))
(hypot.f64 (exp.f64 (log.f64 (fabs.f64 (sin.f64 ky)))) (exp.f64 (log.f64 (fabs.f64 (sin.f64 kx)))))
(hypot.f64 (exp.f64 (log.f64 (fabs.f64 (sin.f64 ky)))) (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1 binary64)))
(hypot.f64 (exp.f64 (log.f64 (fabs.f64 (sin.f64 ky)))) (neg.f64 (fabs.f64 (sin.f64 kx))))
(hypot.f64 (exp.f64 (log.f64 (fabs.f64 (sin.f64 ky)))) (neg.f64 (sin.f64 kx)))
(hypot.f64 (exp.f64 (log.f64 (fabs.f64 (sin.f64 ky)))) (fabs.f64 (sin.f64 kx)))
(hypot.f64 (exp.f64 (log.f64 (fabs.f64 (sin.f64 ky)))) (sin.f64 kx))
(hypot.f64 (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1 binary64)) (fabs.f64 (fabs.f64 (sin.f64 ky))))
(hypot.f64 (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1 binary64)) (neg.f64 (neg.f64 (sin.f64 ky))))
(hypot.f64 (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1 binary64)) (exp.f64 (log.f64 (sin.f64 ky))))
(hypot.f64 (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1 binary64)) (exp.f64 (log.f64 (fabs.f64 (sin.f64 ky)))))
(hypot.f64 (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1 binary64)) (pow.f64 (neg.f64 (sin.f64 ky)) #s(literal 1 binary64)))
(hypot.f64 (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1 binary64)) (neg.f64 (fabs.f64 (sin.f64 ky))))
(hypot.f64 (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1 binary64)) (neg.f64 (sin.f64 ky)))
(hypot.f64 (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1 binary64)) (fabs.f64 (sin.f64 ky)))
(hypot.f64 (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1 binary64)) (sin.f64 ky))
(hypot.f64 (pow.f64 (neg.f64 (sin.f64 ky)) #s(literal 1 binary64)) (fabs.f64 (fabs.f64 (sin.f64 kx))))
(hypot.f64 (pow.f64 (neg.f64 (sin.f64 ky)) #s(literal 1 binary64)) (neg.f64 (neg.f64 (sin.f64 kx))))
(hypot.f64 (pow.f64 (neg.f64 (sin.f64 ky)) #s(literal 1 binary64)) (exp.f64 (log.f64 (fabs.f64 (sin.f64 kx)))))
(hypot.f64 (pow.f64 (neg.f64 (sin.f64 ky)) #s(literal 1 binary64)) (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1 binary64)))
(hypot.f64 (pow.f64 (neg.f64 (sin.f64 ky)) #s(literal 1 binary64)) (neg.f64 (fabs.f64 (sin.f64 kx))))
(hypot.f64 (pow.f64 (neg.f64 (sin.f64 ky)) #s(literal 1 binary64)) (neg.f64 (sin.f64 kx)))
(hypot.f64 (pow.f64 (neg.f64 (sin.f64 ky)) #s(literal 1 binary64)) (fabs.f64 (sin.f64 kx)))
(hypot.f64 (pow.f64 (neg.f64 (sin.f64 ky)) #s(literal 1 binary64)) (sin.f64 kx))
(hypot.f64 (neg.f64 (fabs.f64 (sin.f64 kx))) (fabs.f64 (fabs.f64 (sin.f64 ky))))
(hypot.f64 (neg.f64 (fabs.f64 (sin.f64 kx))) (neg.f64 (neg.f64 (sin.f64 ky))))
(hypot.f64 (neg.f64 (fabs.f64 (sin.f64 kx))) (exp.f64 (log.f64 (sin.f64 ky))))
(hypot.f64 (neg.f64 (fabs.f64 (sin.f64 kx))) (exp.f64 (log.f64 (fabs.f64 (sin.f64 ky)))))
(hypot.f64 (neg.f64 (fabs.f64 (sin.f64 kx))) (pow.f64 (neg.f64 (sin.f64 ky)) #s(literal 1 binary64)))
(hypot.f64 (neg.f64 (fabs.f64 (sin.f64 kx))) (neg.f64 (fabs.f64 (sin.f64 ky))))
(hypot.f64 (neg.f64 (fabs.f64 (sin.f64 kx))) (neg.f64 (sin.f64 ky)))
(hypot.f64 (neg.f64 (fabs.f64 (sin.f64 kx))) (fabs.f64 (sin.f64 ky)))
(hypot.f64 (neg.f64 (fabs.f64 (sin.f64 kx))) (sin.f64 ky))
(hypot.f64 (neg.f64 (fabs.f64 (sin.f64 ky))) (fabs.f64 (fabs.f64 (sin.f64 kx))))
(hypot.f64 (neg.f64 (fabs.f64 (sin.f64 ky))) (neg.f64 (neg.f64 (sin.f64 kx))))
(hypot.f64 (neg.f64 (fabs.f64 (sin.f64 ky))) (exp.f64 (log.f64 (fabs.f64 (sin.f64 kx)))))
(hypot.f64 (neg.f64 (fabs.f64 (sin.f64 ky))) (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1 binary64)))
(hypot.f64 (neg.f64 (fabs.f64 (sin.f64 ky))) (neg.f64 (fabs.f64 (sin.f64 kx))))
(hypot.f64 (neg.f64 (fabs.f64 (sin.f64 ky))) (neg.f64 (sin.f64 kx)))
(hypot.f64 (neg.f64 (fabs.f64 (sin.f64 ky))) (fabs.f64 (sin.f64 kx)))
(hypot.f64 (neg.f64 (fabs.f64 (sin.f64 ky))) (sin.f64 kx))
(hypot.f64 (neg.f64 (sin.f64 ky)) (fabs.f64 (fabs.f64 (sin.f64 kx))))
(hypot.f64 (neg.f64 (sin.f64 ky)) (neg.f64 (neg.f64 (sin.f64 kx))))
(hypot.f64 (neg.f64 (sin.f64 ky)) (exp.f64 (log.f64 (fabs.f64 (sin.f64 kx)))))
(hypot.f64 (neg.f64 (sin.f64 ky)) (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1 binary64)))
(hypot.f64 (neg.f64 (sin.f64 ky)) (neg.f64 (fabs.f64 (sin.f64 kx))))
(hypot.f64 (neg.f64 (sin.f64 ky)) (neg.f64 (sin.f64 kx)))
(hypot.f64 (neg.f64 (sin.f64 ky)) (fabs.f64 (sin.f64 kx)))
(hypot.f64 (neg.f64 (sin.f64 ky)) (sin.f64 kx))
(hypot.f64 (neg.f64 (sin.f64 kx)) (fabs.f64 (fabs.f64 (sin.f64 ky))))
(hypot.f64 (neg.f64 (sin.f64 kx)) (neg.f64 (neg.f64 (sin.f64 ky))))
(hypot.f64 (neg.f64 (sin.f64 kx)) (exp.f64 (log.f64 (sin.f64 ky))))
(hypot.f64 (neg.f64 (sin.f64 kx)) (exp.f64 (log.f64 (fabs.f64 (sin.f64 ky)))))
(hypot.f64 (neg.f64 (sin.f64 kx)) (pow.f64 (neg.f64 (sin.f64 ky)) #s(literal 1 binary64)))
(hypot.f64 (neg.f64 (sin.f64 kx)) (neg.f64 (fabs.f64 (sin.f64 ky))))
(hypot.f64 (neg.f64 (sin.f64 kx)) (neg.f64 (sin.f64 ky)))
(hypot.f64 (neg.f64 (sin.f64 kx)) (fabs.f64 (sin.f64 ky)))
(hypot.f64 (neg.f64 (sin.f64 kx)) (sin.f64 ky))
(hypot.f64 (fabs.f64 (sin.f64 kx)) (fabs.f64 (fabs.f64 (sin.f64 ky))))
(hypot.f64 (fabs.f64 (sin.f64 kx)) (neg.f64 (neg.f64 (sin.f64 ky))))
(hypot.f64 (fabs.f64 (sin.f64 kx)) (exp.f64 (log.f64 (sin.f64 ky))))
(hypot.f64 (fabs.f64 (sin.f64 kx)) (exp.f64 (log.f64 (fabs.f64 (sin.f64 ky)))))
(hypot.f64 (fabs.f64 (sin.f64 kx)) (pow.f64 (neg.f64 (sin.f64 ky)) #s(literal 1 binary64)))
(hypot.f64 (fabs.f64 (sin.f64 kx)) (neg.f64 (fabs.f64 (sin.f64 ky))))
(hypot.f64 (fabs.f64 (sin.f64 kx)) (neg.f64 (sin.f64 ky)))
(hypot.f64 (fabs.f64 (sin.f64 kx)) (fabs.f64 (sin.f64 ky)))
(hypot.f64 (fabs.f64 (sin.f64 kx)) (sin.f64 ky))
(hypot.f64 (fabs.f64 (sin.f64 ky)) (fabs.f64 (fabs.f64 (sin.f64 kx))))
(hypot.f64 (fabs.f64 (sin.f64 ky)) (neg.f64 (neg.f64 (sin.f64 kx))))
(hypot.f64 (fabs.f64 (sin.f64 ky)) (exp.f64 (log.f64 (fabs.f64 (sin.f64 kx)))))
(hypot.f64 (fabs.f64 (sin.f64 ky)) (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1 binary64)))
(hypot.f64 (fabs.f64 (sin.f64 ky)) (neg.f64 (fabs.f64 (sin.f64 kx))))
(hypot.f64 (fabs.f64 (sin.f64 ky)) (neg.f64 (sin.f64 kx)))
(hypot.f64 (fabs.f64 (sin.f64 ky)) (fabs.f64 (sin.f64 kx)))
(hypot.f64 (fabs.f64 (sin.f64 ky)) (sin.f64 kx))
(hypot.f64 (sin.f64 kx) (fabs.f64 (fabs.f64 (sin.f64 ky))))
(hypot.f64 (sin.f64 kx) (neg.f64 (neg.f64 (sin.f64 ky))))
(hypot.f64 (sin.f64 kx) (exp.f64 (log.f64 (sin.f64 ky))))
(hypot.f64 (sin.f64 kx) (exp.f64 (log.f64 (fabs.f64 (sin.f64 ky)))))
(hypot.f64 (sin.f64 kx) (pow.f64 (neg.f64 (sin.f64 ky)) #s(literal 1 binary64)))
(hypot.f64 (sin.f64 kx) (neg.f64 (fabs.f64 (sin.f64 ky))))
(hypot.f64 (sin.f64 kx) (neg.f64 (sin.f64 ky)))
(hypot.f64 (sin.f64 kx) (fabs.f64 (sin.f64 ky)))
(hypot.f64 (sin.f64 kx) (sin.f64 ky))
(hypot.f64 (sin.f64 ky) (fabs.f64 (fabs.f64 (sin.f64 kx))))
(hypot.f64 (sin.f64 ky) (neg.f64 (neg.f64 (sin.f64 kx))))
(hypot.f64 (sin.f64 ky) (exp.f64 (log.f64 (fabs.f64 (sin.f64 kx)))))
(hypot.f64 (sin.f64 ky) (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1 binary64)))
(hypot.f64 (sin.f64 ky) (neg.f64 (fabs.f64 (sin.f64 kx))))
(hypot.f64 (sin.f64 ky) (neg.f64 (sin.f64 kx)))
(hypot.f64 (sin.f64 ky) (fabs.f64 (sin.f64 kx)))
(hypot.f64 (sin.f64 ky) (sin.f64 kx))
(exp.f64 (*.f64 (log.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 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))))) #s(literal 1/2 binary64)))
(/.f64 (-.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 (sin.f64 ky) #s(literal 4 binary64))) (-.f64 (-.f64 #s(literal 1/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 ky ky))))))
(/.f64 (+.f64 (exp.f64 (*.f64 (*.f64 (log.f64 (sin.f64 kx)) #s(literal 2 binary64)) #s(literal 3 binary64))) (exp.f64 (*.f64 (*.f64 (log.f64 (sin.f64 ky)) #s(literal 2 binary64)) #s(literal 3 binary64)))) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (*.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal 2 binary64)))))
(fma.f64 (fabs.f64 (fabs.f64 (sin.f64 kx))) (fabs.f64 (fabs.f64 (sin.f64 kx))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))))
(fma.f64 (fabs.f64 (fabs.f64 (sin.f64 ky))) (fabs.f64 (fabs.f64 (sin.f64 ky))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))
(fma.f64 (neg.f64 (neg.f64 (sin.f64 kx))) (neg.f64 (neg.f64 (sin.f64 kx))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))))
(fma.f64 (neg.f64 (neg.f64 (sin.f64 ky))) (neg.f64 (neg.f64 (sin.f64 ky))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))
(fma.f64 (exp.f64 (log.f64 (sin.f64 ky))) (exp.f64 (log.f64 (sin.f64 ky))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))
(fma.f64 (exp.f64 (log.f64 (fabs.f64 (sin.f64 kx)))) (exp.f64 (log.f64 (fabs.f64 (sin.f64 kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))))
(fma.f64 (exp.f64 (log.f64 (fabs.f64 (sin.f64 ky)))) (exp.f64 (log.f64 (fabs.f64 (sin.f64 ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))
(fma.f64 (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1 binary64)) (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))))
(fma.f64 (pow.f64 (neg.f64 (sin.f64 ky)) #s(literal 1 binary64)) (pow.f64 (neg.f64 (sin.f64 ky)) #s(literal 1 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))
(fma.f64 (neg.f64 (fabs.f64 (sin.f64 kx))) (neg.f64 (fabs.f64 (sin.f64 kx))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))))
(fma.f64 (neg.f64 (fabs.f64 (sin.f64 ky))) (neg.f64 (fabs.f64 (sin.f64 ky))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))
(fma.f64 (neg.f64 (sin.f64 ky)) (neg.f64 (sin.f64 ky)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))
(fma.f64 (neg.f64 (sin.f64 kx)) (neg.f64 (sin.f64 kx)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))))
(fma.f64 (fabs.f64 (sin.f64 kx)) (fabs.f64 (sin.f64 kx)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))))
(fma.f64 (fabs.f64 (sin.f64 ky)) (fabs.f64 (sin.f64 ky)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))
(fma.f64 (sin.f64 kx) (sin.f64 kx) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))))
(fma.f64 (sin.f64 ky) (sin.f64 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 (neg.f64 (sin.f64 ky)) (sin.f64 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/2 binary64) (cos.f64 (+.f64 ky ky)))))
(+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))
(*.f64 (fabs.f64 (fabs.f64 (sin.f64 kx))) (fabs.f64 (fabs.f64 (sin.f64 kx))))
(*.f64 (neg.f64 (neg.f64 (sin.f64 kx))) (neg.f64 (neg.f64 (sin.f64 kx))))
(*.f64 (exp.f64 (log.f64 (fabs.f64 (sin.f64 kx)))) (exp.f64 (log.f64 (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 (neg.f64 (fabs.f64 (sin.f64 kx))) (neg.f64 (fabs.f64 (sin.f64 kx))))
(*.f64 (neg.f64 (sin.f64 kx)) (neg.f64 (sin.f64 kx)))
(*.f64 (fabs.f64 (sin.f64 kx)) (fabs.f64 (sin.f64 kx)))
(*.f64 (sin.f64 kx) (sin.f64 kx))
(pow.f64 (exp.f64 #s(literal 2 binary64)) (log.f64 (sin.f64 kx)))
(pow.f64 (exp.f64 (log.f64 (fabs.f64 (sin.f64 kx)))) #s(literal 2 binary64))
(pow.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) #s(literal 1/2 binary64))
(pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 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 #s(literal 1/4 binary64) (pow.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #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/8 binary64) (*.f64 (pow.f64 (cos.f64 (+.f64 kx kx)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (+.f64 #s(literal 1/4 binary64) (+.f64 (pow.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))
(/.f64 (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx))) #s(literal 2 binary64))
(/.f64 #s(literal 1 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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))
(sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)))
(fabs.f64 (*.f64 (neg.f64 (sin.f64 kx)) (sin.f64 kx)))
(fabs.f64 (*.f64 (sin.f64 kx) (neg.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 (*.f64 (log.f64 (sin.f64 kx)) #s(literal 2 binary64)) #s(literal 1 binary64)))
(exp.f64 (*.f64 (log.f64 (sin.f64 kx)) #s(literal 2 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 (sin.f64 kx)) #s(literal 2 binary64))) (sinh.f64 (*.f64 (log.f64 (sin.f64 kx)) #s(literal 2 binary64))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx))))
(*.f64 (log.f64 (fabs.f64 (sin.f64 kx))) #s(literal 2 binary64))
(*.f64 (log.f64 (sin.f64 kx)) #s(literal 2 binary64))
(*.f64 #s(literal 1 binary64) (*.f64 (log.f64 (sin.f64 kx)) #s(literal 2 binary64)))
(*.f64 #s(literal 2 binary64) (log.f64 (fabs.f64 (sin.f64 kx))))
(*.f64 #s(literal 2 binary64) (log.f64 (sin.f64 kx)))
(fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sin.f64 kx)) #s(literal 2 binary64)) (log.f64 (fabs.f64 (sin.f64 kx))))
(-.f64 (log.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 2 binary64)))) (log.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))
(-.f64 (log.f64 (-.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (cos.f64 (+.f64 kx kx)) #s(literal 3 binary64)) #s(literal 1/8 binary64)))) (log.f64 (+.f64 #s(literal 1/4 binary64) (+.f64 (pow.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))))
(-.f64 (log.f64 (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx)))) (log.f64 #s(literal 2 binary64)))
(+.f64 (log.f64 (neg.f64 (sin.f64 kx))) (log.f64 (neg.f64 (sin.f64 kx))))
(+.f64 (log.f64 (fabs.f64 (sin.f64 kx))) (log.f64 (fabs.f64 (sin.f64 kx))))
(+.f64 (log.f64 (sin.f64 kx)) (log.f64 (sin.f64 kx)))
(log.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))
(log.f64 (sin.f64 kx))
(*.f64 (fabs.f64 (fabs.f64 (sin.f64 ky))) (fabs.f64 (fabs.f64 (sin.f64 ky))))
(*.f64 (neg.f64 (neg.f64 (sin.f64 ky))) (neg.f64 (neg.f64 (sin.f64 ky))))
(*.f64 (exp.f64 (log.f64 (sin.f64 ky))) (exp.f64 (log.f64 (sin.f64 ky))))
(*.f64 (exp.f64 (log.f64 (fabs.f64 (sin.f64 ky)))) (exp.f64 (log.f64 (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 (neg.f64 (fabs.f64 (sin.f64 ky))) (neg.f64 (fabs.f64 (sin.f64 ky))))
(*.f64 (neg.f64 (sin.f64 ky)) (neg.f64 (sin.f64 ky)))
(*.f64 (fabs.f64 (sin.f64 ky)) (fabs.f64 (sin.f64 ky)))
(*.f64 (sin.f64 ky) (sin.f64 ky))
(pow.f64 (exp.f64 (log.f64 (sin.f64 ky))) #s(literal 2 binary64))
(pow.f64 (exp.f64 (log.f64 (fabs.f64 (sin.f64 ky)))) #s(literal 2 binary64))
(pow.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) #s(literal 1/2 binary64))
(pow.f64 (neg.f64 (sin.f64 ky)) #s(literal 2 binary64))
(pow.f64 (fabs.f64 (sin.f64 ky)) #s(literal 2 binary64))
(pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 1 binary64))
(pow.f64 (sin.f64 ky) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 ky ky)) (cos.f64 (+.f64 ky ky))) #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))
(sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)))
(fabs.f64 (*.f64 (sin.f64 ky) (neg.f64 (sin.f64 ky))))
(fabs.f64 (*.f64 (neg.f64 (sin.f64 ky)) (sin.f64 ky)))
(fabs.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))))
(exp.f64 (*.f64 (*.f64 (log.f64 (fabs.f64 (sin.f64 ky))) #s(literal 2 binary64)) #s(literal 1 binary64)))
(exp.f64 (*.f64 (*.f64 (log.f64 (sin.f64 ky)) #s(literal 2 binary64)) #s(literal 1 binary64)))
(exp.f64 (*.f64 (log.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal 1 binary64)))
(exp.f64 (*.f64 (log.f64 (fabs.f64 (sin.f64 ky))) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (sin.f64 ky)) #s(literal 2 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 (fabs.f64 (sin.f64 ky))) #s(literal 2 binary64))) (sinh.f64 (*.f64 (log.f64 (fabs.f64 (sin.f64 ky))) #s(literal 2 binary64))))
(+.f64 (cosh.f64 (*.f64 (log.f64 (sin.f64 ky)) #s(literal 2 binary64))) (sinh.f64 (*.f64 (log.f64 (sin.f64 ky)) #s(literal 2 binary64))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.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)) (fma.f64 (/.f64 (*.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (*.f64 kx kx)) (pow.f64 (fabs.f64 (sin.f64 ky)) #s(literal 3 binary64))) #s(literal -1/2 binary64) (/.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)) (fma.f64 (fma.f64 (neg.f64 (*.f64 kx kx)) (fma.f64 (/.f64 (*.f64 (*.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal 1/3 binary64)) (sin.f64 th)) (sin.f64 ky)) (pow.f64 (fabs.f64 (sin.f64 ky)) #s(literal 3 binary64))) #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (pow.f64 (fabs.f64 (sin.f64 ky)) #s(literal 5 binary64))) #s(literal -1/4 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (pow.f64 (fabs.f64 (sin.f64 ky)) #s(literal 3 binary64))))) (*.f64 kx kx) (/.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)) (fma.f64 (fma.f64 (-.f64 (*.f64 (neg.f64 (*.f64 kx kx)) (fma.f64 (/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal 1/3 binary64)) (sin.f64 th)) (sin.f64 ky)) (pow.f64 (fabs.f64 (sin.f64 ky)) #s(literal 3 binary64))) #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (pow.f64 (fabs.f64 (sin.f64 ky)) #s(literal 5 binary64))) #s(literal -1/4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal -1/2 binary64) (fma.f64 (/.f64 (*.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (-.f64 #s(literal 2/45 binary64) (*.f64 (/.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal 1/3 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal -1/2 binary64)))) (pow.f64 (fabs.f64 (sin.f64 ky)) #s(literal 3 binary64))) #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal 1/3 binary64)) (sin.f64 th)) (sin.f64 ky)) (pow.f64 (fabs.f64 (sin.f64 ky)) #s(literal 5 binary64))) #s(literal 1/4 binary64))))) (fma.f64 (/.f64 (*.f64 (*.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal 1/3 binary64)) (sin.f64 th)) (sin.f64 ky)) (pow.f64 (fabs.f64 (sin.f64 ky)) #s(literal 3 binary64))) #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (pow.f64 (fabs.f64 (sin.f64 ky)) #s(literal 5 binary64))) #s(literal -1/4 binary64)))) (*.f64 kx kx) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (pow.f64 (fabs.f64 (sin.f64 ky)) #s(literal 3 binary64))))) (*.f64 kx kx) (/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (fabs.f64 (sin.f64 ky)))))
#s(approx (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 ky))))
#s(approx (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 kx kx) (sin.f64 th)) (pow.f64 (fabs.f64 (sin.f64 ky)) #s(literal 3 binary64))) (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 ky)))))
#s(approx (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (fma.f64 (fma.f64 (neg.f64 (*.f64 kx kx)) (fma.f64 (/.f64 (*.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal 1/3 binary64)) (sin.f64 th)) (pow.f64 (fabs.f64 (sin.f64 ky)) #s(literal 3 binary64))) #s(literal -1/2 binary64) (/.f64 (*.f64 #s(literal -1/4 binary64) (sin.f64 th)) (pow.f64 (fabs.f64 (sin.f64 ky)) #s(literal 5 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (fabs.f64 (sin.f64 ky)) #s(literal 3 binary64))))) (*.f64 kx kx) (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 ky)))))
#s(approx (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (fma.f64 (fma.f64 (-.f64 (*.f64 (neg.f64 (*.f64 kx kx)) (fma.f64 (/.f64 (fma.f64 (/.f64 (*.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal 1/3 binary64)) (sin.f64 th)) (pow.f64 (fabs.f64 (sin.f64 ky)) #s(literal 3 binary64))) #s(literal -1/2 binary64) (/.f64 (*.f64 #s(literal -1/4 binary64) (sin.f64 th)) (pow.f64 (fabs.f64 (sin.f64 ky)) #s(literal 5 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal -1/2 binary64) (fma.f64 (*.f64 (sin.f64 th) (/.f64 (-.f64 #s(literal 2/45 binary64) (*.f64 (/.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal 1/3 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal -1/2 binary64))) (pow.f64 (fabs.f64 (sin.f64 ky)) #s(literal 3 binary64)))) #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal 1/3 binary64)) (sin.f64 th)) (pow.f64 (fabs.f64 (sin.f64 ky)) #s(literal 5 binary64))) #s(literal 1/4 binary64))))) (fma.f64 (/.f64 (*.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal 1/3 binary64)) (sin.f64 th)) (pow.f64 (fabs.f64 (sin.f64 ky)) #s(literal 3 binary64))) #s(literal -1/2 binary64) (/.f64 (*.f64 #s(literal -1/4 binary64) (sin.f64 th)) (pow.f64 (fabs.f64 (sin.f64 ky)) #s(literal 5 binary64))))) (*.f64 kx kx) (*.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (fabs.f64 (sin.f64 ky)) #s(literal 3 binary64))))) (*.f64 kx kx) (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 ky)))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (fabs.f64 (sin.f64 ky)))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (fma.f64 (/.f64 (*.f64 kx kx) (fabs.f64 (sin.f64 ky))) #s(literal 1/2 binary64) (fabs.f64 (sin.f64 ky))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal 1/3 binary64)) (*.f64 kx kx)) (fabs.f64 (sin.f64 ky))) (/.f64 #s(literal 1/2 binary64) (fabs.f64 (sin.f64 ky)))) (*.f64 kx kx) (fabs.f64 (sin.f64 ky))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal 1/3 binary64)) (fabs.f64 (sin.f64 ky))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 #s(literal 2/45 binary64) (*.f64 (/.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal 1/3 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal -1/2 binary64))) (*.f64 kx kx))) (fabs.f64 (sin.f64 ky)))) (*.f64 kx kx) (/.f64 #s(literal 1/2 binary64) (fabs.f64 (sin.f64 ky)))) (*.f64 kx kx) (fabs.f64 (sin.f64 ky))))
#s(approx (sin kx) kx)
#s(approx (sin kx) (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 kx kx) #s(literal 1 binary64)) kx))
#s(approx (sin kx) (*.f64 (fma.f64 (-.f64 (*.f64 #s(literal 1/120 binary64) (*.f64 kx kx)) #s(literal 1/6 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) kx))
#s(approx (sin kx) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 kx kx) #s(literal 1/120 binary64)) (*.f64 kx kx)) #s(literal 1/6 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) kx))
#s(approx (/ (* (sin th) ky) (fabs (sin kx))) (*.f64 (sin.f64 th) (/.f64 ky (fabs.f64 (sin.f64 kx)))))
#s(approx (fabs (sin kx)) (fabs.f64 (sin.f64 kx)))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 (sin.f64 ky) (fabs.f64 (sin.f64 ky))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 kx kx) (sin.f64 ky)) (pow.f64 (fabs.f64 (sin.f64 ky)) #s(literal 3 binary64))) (/.f64 (sin.f64 ky) (fabs.f64 (sin.f64 ky)))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 (fma.f64 (neg.f64 (*.f64 kx kx)) (fma.f64 (/.f64 (*.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal 1/3 binary64)) (sin.f64 ky)) (pow.f64 (fabs.f64 (sin.f64 ky)) #s(literal 3 binary64))) #s(literal -1/2 binary64) (/.f64 (*.f64 #s(literal -1/4 binary64) (sin.f64 ky)) (pow.f64 (fabs.f64 (sin.f64 ky)) #s(literal 5 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 ky) (pow.f64 (fabs.f64 (sin.f64 ky)) #s(literal 3 binary64))))) (*.f64 kx kx) (/.f64 (sin.f64 ky) (fabs.f64 (sin.f64 ky)))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 (fma.f64 (-.f64 (*.f64 (neg.f64 (*.f64 kx kx)) (fma.f64 (/.f64 (fma.f64 (/.f64 (*.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal 1/3 binary64)) (sin.f64 ky)) (pow.f64 (fabs.f64 (sin.f64 ky)) #s(literal 3 binary64))) #s(literal -1/2 binary64) (/.f64 (*.f64 #s(literal -1/4 binary64) (sin.f64 ky)) (pow.f64 (fabs.f64 (sin.f64 ky)) #s(literal 5 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal -1/2 binary64) (fma.f64 (*.f64 (sin.f64 ky) (/.f64 (-.f64 #s(literal 2/45 binary64) (*.f64 (/.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal 1/3 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal -1/2 binary64))) (pow.f64 (fabs.f64 (sin.f64 ky)) #s(literal 3 binary64)))) #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal 1/3 binary64)) (sin.f64 ky)) (pow.f64 (fabs.f64 (sin.f64 ky)) #s(literal 5 binary64))) #s(literal 1/4 binary64))))) (fma.f64 (/.f64 (*.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal 1/3 binary64)) (sin.f64 ky)) (pow.f64 (fabs.f64 (sin.f64 ky)) #s(literal 3 binary64))) #s(literal -1/2 binary64) (/.f64 (*.f64 #s(literal -1/4 binary64) (sin.f64 ky)) (pow.f64 (fabs.f64 (sin.f64 ky)) #s(literal 5 binary64))))) (*.f64 kx kx) (*.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 ky) (pow.f64 (fabs.f64 (sin.f64 ky)) #s(literal 3 binary64))))) (*.f64 kx kx) (/.f64 (sin.f64 ky) (fabs.f64 (sin.f64 ky)))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 kx kx (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 (fma.f64 (-.f64 (*.f64 #s(literal 2/45 binary64) (*.f64 kx kx)) #s(literal 1/3 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))))
#s(approx (+ (* ky ky) (- 1/2 (* 1/2 (cos (* 2 kx))))) (*.f64 ky ky))
#s(approx (+ (* ky ky) (- 1/2 (* 1/2 (cos (* 2 kx))))) (fma.f64 kx kx (*.f64 ky ky)))
#s(approx (+ (* ky ky) (- 1/2 (* 1/2 (cos (* 2 kx))))) (fma.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx) (*.f64 ky ky)))
#s(approx (+ (* ky ky) (- 1/2 (* 1/2 (cos (* 2 kx))))) (fma.f64 (fma.f64 (-.f64 (*.f64 #s(literal 2/45 binary64) (*.f64 kx kx)) #s(literal 1/3 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx) (*.f64 ky ky)))
#s(approx (- 1/2 (* 1/2 (cos (* 2 kx)))) (*.f64 kx kx))
#s(approx (- 1/2 (* 1/2 (cos (* 2 kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))
#s(approx (- 1/2 (* 1/2 (cos (* 2 kx)))) (*.f64 (fma.f64 (-.f64 (*.f64 #s(literal 2/45 binary64) (*.f64 kx kx)) #s(literal 1/3 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))
#s(approx (- 1/2 (* 1/2 (cos (* 2 kx)))) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -1/315 binary64) (*.f64 kx kx) #s(literal 2/45 binary64)) (*.f64 kx kx)) #s(literal 1/3 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))
#s(approx (* 1/2 (cos (* 2 kx))) #s(literal 1/2 binary64))
#s(approx (* 1/2 (cos (* 2 kx))) (+.f64 (neg.f64 (*.f64 kx kx)) #s(literal 1/2 binary64)))
#s(approx (* 1/2 (cos (* 2 kx))) (fma.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 kx kx)) #s(literal 1 binary64)) (*.f64 kx kx) #s(literal 1/2 binary64)))
#s(approx (* 1/2 (cos (* 2 kx))) (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -2/45 binary64) (*.f64 kx kx) #s(literal 1/3 binary64)) (*.f64 kx kx)) #s(literal 1 binary64)) (*.f64 kx kx) #s(literal 1/2 binary64)))
#s(approx (cos (* 2 kx)) #s(literal 1 binary64))
#s(approx (cos (* 2 kx)) (fma.f64 #s(literal -2 binary64) (*.f64 kx kx) #s(literal 1 binary64)))
#s(approx (cos (* 2 kx)) (fma.f64 (-.f64 (*.f64 #s(literal 2/3 binary64) (*.f64 kx kx)) #s(literal 2 binary64)) (*.f64 kx kx) #s(literal 1 binary64)))
#s(approx (cos (* 2 kx)) (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -4/45 binary64) (*.f64 kx kx) #s(literal 2/3 binary64)) (*.f64 kx kx)) #s(literal 2 binary64)) (*.f64 kx kx) #s(literal 1 binary64)))
#s(approx (* 2 kx) (+.f64 kx kx))
#s(approx (* (log (sin kx)) 2) (*.f64 (log.f64 kx) #s(literal 2 binary64)))
#s(approx (* (log (sin kx)) 2) (fma.f64 (log.f64 kx) #s(literal 2 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 kx kx))))
#s(approx (* (log (sin kx)) 2) (fma.f64 (-.f64 (*.f64 #s(literal -1/90 binary64) (*.f64 kx kx)) #s(literal 1/3 binary64)) (*.f64 kx kx) (*.f64 (log.f64 kx) #s(literal 2 binary64))))
#s(approx (* (log (sin kx)) 2) (fma.f64 (-.f64 (*.f64 (-.f64 (*.f64 #s(literal -2/2835 binary64) (*.f64 kx kx)) #s(literal 1/90 binary64)) (*.f64 kx kx)) #s(literal 1/3 binary64)) (*.f64 kx kx) (*.f64 (log.f64 kx) #s(literal 2 binary64))))
#s(approx (log (sin kx)) (log.f64 kx))
#s(approx (log (sin kx)) (fma.f64 #s(literal -1/6 binary64) (*.f64 kx kx) (log.f64 kx)))
#s(approx (log (sin kx)) (fma.f64 (-.f64 (*.f64 #s(literal -1/180 binary64) (*.f64 kx kx)) #s(literal 1/6 binary64)) (*.f64 kx kx) (log.f64 kx)))
#s(approx (log (sin kx)) (fma.f64 (-.f64 (*.f64 (-.f64 (*.f64 #s(literal -1/2835 binary64) (*.f64 kx kx)) #s(literal 1/180 binary64)) (*.f64 kx kx)) #s(literal 1/6 binary64)) (*.f64 kx kx) (log.f64 kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (sin.f64 ky)))
#s(approx (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))
#s(approx (sin kx) (sin.f64 kx))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (+.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/2 binary64) (cos.f64 (+.f64 ky ky))))))
#s(approx (+ (* ky ky) (- 1/2 (* 1/2 (cos (* 2 kx))))) (-.f64 (fma.f64 ky ky #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))
#s(approx (- 1/2 (* 1/2 (cos (* 2 kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))
#s(approx (* 1/2 (cos (* 2 kx))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))
#s(approx (cos (* 2 kx)) (cos.f64 (+.f64 kx kx)))
#s(approx (- 1/2 (* 1/2 (cos (* 2 kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))
#s(approx (* (log (sin kx)) 2) (*.f64 (log.f64 (sin.f64 kx)) #s(literal 2 binary64)))
#s(approx (log (sin kx)) (log.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 (fma.f64 (fma.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx))) (*.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 3 binary64))))) (*.f64 ky ky) (/.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 (fma.f64 (-.f64 (fma.f64 (-.f64 (/.f64 (*.f64 #s(literal 1/120 binary64) (sin.f64 th)) (fabs.f64 (sin.f64 kx))) (fma.f64 (/.f64 (*.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal 1/3 binary64)) (sin.f64 th)) (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 3 binary64))) #s(literal -1/2 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx))) (*.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 3 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64)))) (*.f64 ky ky) (/.f64 (*.f64 #s(literal -1/6 binary64) (sin.f64 th)) (fabs.f64 (sin.f64 kx)))) (/.f64 (*.f64 #s(literal 1/2 binary64) (sin.f64 th)) (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 3 binary64)))) (*.f64 ky ky) (/.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 (fma.f64 (-.f64 (fma.f64 (-.f64 (fma.f64 (-.f64 (/.f64 (*.f64 #s(literal -1/5040 binary64) (sin.f64 th)) (fabs.f64 (sin.f64 kx))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 (sin.f64 th) (/.f64 (-.f64 #s(literal 2/45 binary64) (*.f64 (/.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal 1/3 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 3 binary64))) (/.f64 (-.f64 (/.f64 (*.f64 #s(literal 1/120 binary64) (sin.f64 th)) (fabs.f64 (sin.f64 kx))) (fma.f64 (/.f64 (*.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal 1/3 binary64)) (sin.f64 th)) (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 3 binary64))) #s(literal -1/2 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx))) (*.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 3 binary64))))) (-.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) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))) (*.f64 (*.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal 1/3 binary64)) (/.f64 (fma.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx))) (*.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 3 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))) #s(literal -1/2 binary64)))) (*.f64 ky ky) (/.f64 (*.f64 #s(literal 1/120 binary64) (sin.f64 th)) (fabs.f64 (sin.f64 kx)))) (fma.f64 (/.f64 (*.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal 1/3 binary64)) (sin.f64 th)) (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 3 binary64))) #s(literal -1/2 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx))) (*.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 3 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64)))) (*.f64 ky ky) (/.f64 (*.f64 #s(literal -1/6 binary64) (sin.f64 th)) (fabs.f64 (sin.f64 kx)))) (/.f64 (*.f64 #s(literal 1/2 binary64) (sin.f64 th)) (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 3 binary64)))) (*.f64 ky ky) (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx)))) ky))
#s(approx (sin ky) ky)
#s(approx (sin ky) (*.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky))
#s(approx (sin ky) (*.f64 (fma.f64 (-.f64 (*.f64 (*.f64 ky ky) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (*.f64 ky ky) #s(literal 1 binary64)) ky))
#s(approx (sin ky) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (*.f64 ky ky)) #s(literal 1/6 binary64)) (*.f64 ky ky) #s(literal 1 binary64)) ky))
#s(approx (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx))))
#s(approx (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 ky ky) (sin.f64 th)) (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 3 binary64))) (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx)))))
#s(approx (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (fma.f64 (-.f64 (neg.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal 1/3 binary64)) (sin.f64 th)) (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 3 binary64))) #s(literal -1/2 binary64) (/.f64 (*.f64 #s(literal -1/4 binary64) (sin.f64 th)) (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 5 binary64)))) (*.f64 ky ky))) (/.f64 (*.f64 #s(literal 1/2 binary64) (sin.f64 th)) (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 3 binary64)))) (*.f64 ky ky) (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx)))))
#s(approx (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (fma.f64 (fma.f64 (-.f64 (neg.f64 (*.f64 (*.f64 ky ky) (fma.f64 (/.f64 (fma.f64 (/.f64 (*.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal 1/3 binary64)) (sin.f64 th)) (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 3 binary64))) #s(literal -1/2 binary64) (/.f64 (*.f64 #s(literal -1/4 binary64) (sin.f64 th)) (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 5 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal -1/2 binary64) (fma.f64 (*.f64 (sin.f64 th) (/.f64 (-.f64 #s(literal 2/45 binary64) (*.f64 (/.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal 1/3 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 3 binary64)))) #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal 1/3 binary64)) (sin.f64 th)) (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 5 binary64))) #s(literal 1/4 binary64)))))) (fma.f64 (/.f64 (*.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal 1/3 binary64)) (sin.f64 th)) (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 3 binary64))) #s(literal -1/2 binary64) (/.f64 (*.f64 #s(literal -1/4 binary64) (sin.f64 th)) (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 5 binary64))))) (*.f64 ky ky) (*.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 3 binary64))))) (*.f64 ky ky) (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx)))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (fabs.f64 (sin.f64 kx)))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (fma.f64 (/.f64 (*.f64 ky ky) (fabs.f64 (sin.f64 kx))) #s(literal 1/2 binary64) (fabs.f64 (sin.f64 kx))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal 1/3 binary64)) (*.f64 ky ky)) (fabs.f64 (sin.f64 kx))) (/.f64 #s(literal 1/2 binary64) (fabs.f64 (sin.f64 kx)))) (*.f64 ky ky) (fabs.f64 (sin.f64 kx))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal 1/3 binary64)) (fabs.f64 (sin.f64 kx))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 #s(literal 2/45 binary64) (*.f64 (/.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal 1/3 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal -1/2 binary64))) (*.f64 ky ky))) (fabs.f64 (sin.f64 kx)))) (*.f64 ky ky) (/.f64 #s(literal 1/2 binary64) (fabs.f64 (sin.f64 kx)))) (*.f64 ky ky) (fabs.f64 (sin.f64 kx))))
#s(approx (* (sin th) ky) (*.f64 (sin.f64 th) ky))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (fabs.f64 (sin.f64 kx))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (*.f64 (+.f64 (neg.f64 (*.f64 (fma.f64 (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal -3 binary64)) #s(literal 1/2 binary64) (/.f64 #s(literal 1/6 binary64) (fabs.f64 (sin.f64 kx)))) (*.f64 ky ky))) (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx)))) ky))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (*.f64 (fma.f64 (-.f64 (*.f64 (-.f64 (/.f64 #s(literal 1/120 binary64) (fabs.f64 (sin.f64 kx))) (*.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal 1/3 binary64)) (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 3 binary64))) (/.f64 (fma.f64 (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal -3 binary64)) #s(literal 1/2 binary64) (/.f64 #s(literal 1/6 binary64) (fabs.f64 (sin.f64 kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))) (*.f64 ky ky)) (fma.f64 (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal -3 binary64)) #s(literal 1/2 binary64) (/.f64 #s(literal 1/6 binary64) (fabs.f64 (sin.f64 kx))))) (*.f64 ky ky) (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx)))) ky))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (*.f64 (fma.f64 (-.f64 (*.f64 (*.f64 ky ky) (-.f64 (+.f64 (neg.f64 (*.f64 (*.f64 ky ky) (+.f64 (fma.f64 (*.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal 1/3 binary64)) (/.f64 (fma.f64 (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal -3 binary64)) #s(literal 1/2 binary64) (/.f64 #s(literal 1/6 binary64) (fabs.f64 (sin.f64 kx)))) (-.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) (+.f64 (/.f64 (-.f64 #s(literal 2/45 binary64) (*.f64 (/.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal 1/3 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 3 binary64))) (/.f64 (-.f64 (/.f64 #s(literal 1/120 binary64) (fabs.f64 (sin.f64 kx))) (*.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal 1/3 binary64)) (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 3 binary64))) (/.f64 (fma.f64 (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal -3 binary64)) #s(literal 1/2 binary64) (/.f64 #s(literal 1/6 binary64) (fabs.f64 (sin.f64 kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))) (/.f64 #s(literal 1/5040 binary64) (fabs.f64 (sin.f64 kx)))))) (/.f64 #s(literal 1/120 binary64) (fabs.f64 (sin.f64 kx)))) (*.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal 1/3 binary64)) (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 3 binary64))) (/.f64 (fma.f64 (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal -3 binary64)) #s(literal 1/2 binary64) (/.f64 #s(literal 1/6 binary64) (fabs.f64 (sin.f64 kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))))) (fma.f64 (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal -3 binary64)) #s(literal 1/2 binary64) (/.f64 #s(literal 1/6 binary64) (fabs.f64 (sin.f64 kx))))) (*.f64 ky ky) (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx)))) ky))
#s(approx (fabs (sin ky)) (fabs.f64 (sin.f64 ky)))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 (fma.f64 ky ky #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 (fma.f64 (-.f64 (*.f64 (*.f64 ky ky) #s(literal 2/45 binary64)) #s(literal 1/3 binary64)) (*.f64 ky ky) #s(literal 1 binary64)) (*.f64 ky ky) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))
#s(approx (pow (sin ky) 2) (*.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky)))
#s(approx (pow (sin ky) 2) (*.f64 (fma.f64 (-.f64 (*.f64 (*.f64 ky ky) #s(literal 2/45 binary64)) #s(literal 1/3 binary64)) (*.f64 ky ky) #s(literal 1 binary64)) (*.f64 ky ky)))
#s(approx (pow (sin ky) 2) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -1/315 binary64) (*.f64 ky ky) #s(literal 2/45 binary64)) (*.f64 ky ky)) #s(literal 1/3 binary64)) (*.f64 ky ky) #s(literal 1 binary64)) (*.f64 ky ky)))
#s(approx (sin ky) (sin.f64 ky))
#s(approx (+ (* ky ky) (- 1/2 (* 1/2 (cos (* 2 kx))))) (*.f64 (-.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 ky ky)) #s(literal 1 binary64)) (*.f64 (/.f64 (cos.f64 (+.f64 kx kx)) (*.f64 ky ky)) #s(literal 1/2 binary64))) (*.f64 ky ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 ky) th) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (fma.f64 (*.f64 (*.f64 th th) (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) #s(literal -1/6 binary64) (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (fma.f64 (fma.f64 #s(literal 1/120 binary64) (*.f64 (*.f64 th th) (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) (/.f64 (*.f64 #s(literal -1/6 binary64) (sin.f64 ky)) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) (*.f64 th th) (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 (*.f64 th th) (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) (/.f64 (*.f64 #s(literal 1/120 binary64) (sin.f64 ky)) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) (*.f64 th th) (/.f64 (*.f64 #s(literal -1/6 binary64) (sin.f64 ky)) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) (*.f64 th th) (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) th))
#s(approx (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 th (hypot.f64 (sin.f64 kx) (sin.f64 ky))))
#s(approx (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (*.f64 (fma.f64 (/.f64 (*.f64 th th) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) #s(literal -1/6 binary64) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) th))
#s(approx (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (*.f64 (fma.f64 (-.f64 (/.f64 (*.f64 (*.f64 th th) #s(literal 1/120 binary64)) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (/.f64 #s(literal 1/6 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) (*.f64 th th) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) th))
#s(approx (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 (/.f64 (*.f64 th th) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) #s(literal -1/5040 binary64) (/.f64 #s(literal 1/120 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) (*.f64 th th)) (/.f64 #s(literal 1/6 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) (*.f64 th th) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) th))
#s(approx (sin th) th)
#s(approx (sin th) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) th))
#s(approx (sin th) (*.f64 (fma.f64 (-.f64 (*.f64 (*.f64 th th) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (*.f64 th th) #s(literal 1 binary64)) th))
#s(approx (sin th) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (*.f64 th th)) #s(literal 1/6 binary64)) (*.f64 th th) #s(literal 1 binary64)) th))
#s(approx (/ (* (sin th) ky) (fabs (sin kx))) (/.f64 (*.f64 th ky) (fabs.f64 (sin.f64 kx))))
#s(approx (/ (* (sin th) ky) (fabs (sin kx))) (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 th th) ky) (fabs.f64 (sin.f64 kx))) #s(literal -1/6 binary64) (/.f64 ky (fabs.f64 (sin.f64 kx)))) th))
#s(approx (/ (* (sin th) ky) (fabs (sin kx))) (*.f64 (fma.f64 (fma.f64 (/.f64 ky (fabs.f64 (sin.f64 kx))) #s(literal -1/6 binary64) (*.f64 (/.f64 (*.f64 (*.f64 th th) ky) (fabs.f64 (sin.f64 kx))) #s(literal 1/120 binary64))) (*.f64 th th) (/.f64 ky (fabs.f64 (sin.f64 kx)))) th))
#s(approx (/ (* (sin th) ky) (fabs (sin kx))) (*.f64 (fma.f64 (fma.f64 (/.f64 ky (fabs.f64 (sin.f64 kx))) #s(literal -1/6 binary64) (*.f64 (fma.f64 (/.f64 ky (fabs.f64 (sin.f64 kx))) #s(literal 1/120 binary64) (*.f64 (/.f64 (*.f64 (*.f64 th th) ky) (fabs.f64 (sin.f64 kx))) #s(literal -1/5040 binary64))) (*.f64 th th))) (*.f64 th th) (/.f64 ky (fabs.f64 (sin.f64 kx)))) th))
#s(approx (* (sin th) ky) (*.f64 th ky))
#s(approx (* (sin th) ky) (*.f64 (fma.f64 (*.f64 (*.f64 th th) ky) #s(literal -1/6 binary64) ky) th))
#s(approx (* (sin th) ky) (*.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 th th) ky) #s(literal 1/120 binary64) (*.f64 #s(literal -1/6 binary64) ky)) (*.f64 th th) ky) th))
#s(approx (* (sin th) ky) (*.f64 (fma.f64 (fma.f64 (*.f64 th th) (fma.f64 (*.f64 (*.f64 th th) ky) #s(literal -1/5040 binary64) (*.f64 #s(literal 1/120 binary64) ky)) (*.f64 #s(literal -1/6 binary64) ky)) (*.f64 th th) ky) th))
#s(approx (sin th) (sin.f64 th))

eval127.0ms (1.9%)

Memory
-9.4MiB live, 94.1MiB allocated; 21ms collecting garbage
Compiler

Compiled 6 796 to 2 562 computations (62.3% saved)

prune49.0ms (0.7%)

Memory
27.7MiB live, 73.1MiB allocated; 4ms collecting garbage
Pruning

42 alts after pruning (40 fresh and 2 done)

PrunedKeptTotal
New48635521
Fresh7512
Picked325
Done000
Total49642538
Accuracy
100.0%
Counts
538 → 42
Alt Table
Click to see full alt table
StatusAccuracyProgram
96.2%
(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))
49.6%
(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (fabs.f64 (sin.f64 ky))))
86.3%
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (fma.f64 (sin.f64 ky) (sin.f64 ky) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))) (sin.f64 th))
78.1%
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 (sin.f64 ky) #s(literal 4 binary64))) (-.f64 (-.f64 #s(literal 1/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 ky ky)))))))) (sin.f64 th))
50.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))))) #s(approx (sin th) th))
77.4%
(*.f64 (/.f64 (sin.f64 ky) (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 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))))) (sin.f64 th))
21.8%
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 ky ky (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))) #s(approx (sin th) th))
29.3%
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 ky ky #s(approx (- 1/2 (* 1/2 (cos (* 2 kx)))) (*.f64 kx kx)))))) (sin.f64 th))
31.7%
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))))) (sin.f64 th))
13.5%
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (+ (* ky ky) (- 1/2 (* 1/2 (cos (* 2 kx))))) (*.f64 ky ky))))) (sin.f64 th))
43.1%
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 ky)))))) (sin.f64 th))
29.4%
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (*.f64 (sqrt.f64 (sin.f64 ky)) (sqrt.f64 (sin.f64 ky))))) (sin.f64 th))
13.6%
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (*.f64 (sqrt.f64 (neg.f64 (sin.f64 ky))) (sqrt.f64 (neg.f64 (sin.f64 ky)))))) (sin.f64 th))
22.1%
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 (sin.f64 ky)))) #s(approx (sin th) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (*.f64 th th)) #s(literal 1/6 binary64)) (*.f64 th th) #s(literal 1 binary64)) th)))
22.1%
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 (sin.f64 ky)))) #s(approx (sin th) (*.f64 (fma.f64 (-.f64 (*.f64 (*.f64 th th) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (*.f64 th th) #s(literal 1 binary64)) th)))
22.1%
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 (sin.f64 ky)))) #s(approx (sin th) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) th)))
22.4%
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 (sin.f64 ky)))) #s(approx (sin th) th))
46.6%
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 (sin.f64 kx)))) (sin.f64 th))
31.6%
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (exp.f64 (*.f64 (log.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal 1/2 binary64))))) (sin.f64 th))
37.6%
(*.f64 (/.f64 #s(approx (sin ky) (*.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky)) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 ky ky (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))) (sin.f64 th))
17.7%
(*.f64 (/.f64 #s(approx (sin ky) (*.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky)) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 #s(approx (sin ky) (*.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky))))) (sin.f64 th))
40.3%
(*.f64 (/.f64 #s(approx (sin ky) ky) (sqrt.f64 (+.f64 (exp.f64 (*.f64 (log.f64 (sin.f64 kx)) #s(literal 2 binary64))) (pow.f64 #s(approx (sin ky) ky) #s(literal 2 binary64))))) (sin.f64 th))
30.3%
(*.f64 (/.f64 #s(approx (sin ky) ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 #s(approx (sin ky) ky)))) (sin.f64 th))
99.6%
(*.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 ky) #s(literal -1 binary64))) (/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 ky) #s(literal -1 binary64))))))
60.6%
(*.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (hypot.f64 (+.f64 (cosh.f64 (log.f64 (sin.f64 kx))) (sinh.f64 (log.f64 (sin.f64 kx)))) (sin.f64 ky))))
99.6%
(*.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))
46.6%
(*.f64 (sin.f64 ky) (/.f64 (sin.f64 th) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (fabs.f64 (sin.f64 kx)))))
52.4%
(*.f64 (sin.f64 ky) (/.f64 #s(approx (sin th) th) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))
43.2%
(*.f64 (sin.f64 ky) #s(approx (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 ky)))))
41.7%
(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (fabs.f64 (sin.f64 kx)))) (sin.f64 th))
64.2%
(*.f64 #s(approx (sin ky) ky) (/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) #s(approx (sin ky) ky))))
39.8%
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))))))
29.2%
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))
39.8%
#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))))
20.6%
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 #s(approx (sin kx) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 kx kx) #s(literal 1/120 binary64)) (*.f64 kx kx)) #s(literal 1/6 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) kx)))))
20.6%
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 #s(approx (sin kx) (*.f64 (fma.f64 (-.f64 (*.f64 #s(literal 1/120 binary64) (*.f64 kx kx)) #s(literal 1/6 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) kx)))))
20.7%
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 #s(approx (sin kx) (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 kx kx) #s(literal 1 binary64)) kx)))))
20.8%
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 #s(approx (sin kx) kx))))
49.0%
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 ky) th) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))
21.2%
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) th)) ky) (fabs.f64 (sin.f64 kx))))
21.6%
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (fabs.f64 (sin.f64 kx))))
41.8%
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 ky (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx)))))
Compiler

Compiled 1 714 to 1 568 computations (8.5% saved)

series152.0ms (2.2%)

Memory
-11.2MiB live, 185.1MiB allocated; 39ms collecting garbage
Counts
44 → 136
Calls
Call 1
Inputs
(*.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 ky) #s(literal -1 binary64))) (/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 ky) #s(literal -1 binary64))))))
(/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 ky) #s(literal -1 binary64)))
#s(literal 1 binary64)
(pow.f64 (sin.f64 ky) #s(literal -1 binary64))
(sin.f64 ky)
ky
#s(literal -1 binary64)
(/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 ky) #s(literal -1 binary64)))))
(sin.f64 th)
th
(hypot.f64 (sin.f64 kx) (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 ky) #s(literal -1 binary64))))
(sin.f64 kx)
kx
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (fabs.f64 (sin.f64 kx))))
(/.f64 (*.f64 #s(approx (sin th) th) ky) (fabs.f64 (sin.f64 kx)))
(*.f64 #s(approx (sin th) th) ky)
#s(approx (sin th) th)
(fabs.f64 (sin.f64 kx))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 (sin.f64 ky)))) #s(approx (sin th) th))
(/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 (sin.f64 ky))))
#s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 (sin.f64 ky)))
(fabs.f64 (sin.f64 ky))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 (sin.f64 ky)))) #s(approx (sin th) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (*.f64 th th)) #s(literal 1/6 binary64)) (*.f64 th th) #s(literal 1 binary64)) th)))
#s(approx (sin th) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (*.f64 th th)) #s(literal 1/6 binary64)) (*.f64 th th) #s(literal 1 binary64)) th))
(*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (*.f64 th th)) #s(literal 1/6 binary64)) (*.f64 th th) #s(literal 1 binary64)) th)
(fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (*.f64 th th)) #s(literal 1/6 binary64)) (*.f64 th th) #s(literal 1 binary64))
(-.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (*.f64 th th)) #s(literal 1/6 binary64))
(*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (*.f64 th th))
(fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64))
(*.f64 th th)
#s(literal -1/5040 binary64)
#s(literal 1/120 binary64)
#s(literal 1/6 binary64)
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (exp.f64 (*.f64 (log.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal 1/2 binary64))))) (sin.f64 th))
(/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (exp.f64 (*.f64 (log.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal 1/2 binary64)))))
#s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (exp.f64 (*.f64 (log.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal 1/2 binary64))))
(exp.f64 (*.f64 (log.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal 1/2 binary64)))
(*.f64 (log.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal 1/2 binary64))
(log.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))
#s(literal 1/2 binary64)
(*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))
(cos.f64 (+.f64 ky ky))
(+.f64 ky ky)
Outputs
#s(approx (* (/ 1 (pow (sin ky) -1)) (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))))) #s(hole binary64 (/ (* (sin ky) (sin th)) (sqrt (pow (sin ky) 2)))))
#s(approx (* (/ 1 (pow (sin ky) -1)) (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow kx 2) (* (sin ky) (sin th))) (pow (sqrt (pow (sin ky) 2)) 3))) (/ (* (sin ky) (sin th)) (sqrt (pow (sin ky) 2))))))
#s(approx (* (/ 1 (pow (sin ky) -1)) (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))))) #s(hole binary64 (+ (* (pow kx 2) (- (* -1 (* (pow kx 2) (+ (* -1/2 (/ (* (sin ky) (* (sin th) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2)))))) (pow (sqrt (pow (sin ky) 2)) 3))) (* -1/4 (/ (* (sin ky) (sin th)) (pow (sqrt (pow (sin ky) 2)) 5)))))) (* 1/2 (/ (* (sin ky) (sin th)) (pow (sqrt (pow (sin ky) 2)) 3))))) (/ (* (sin ky) (sin th)) (sqrt (pow (sin ky) 2))))))
#s(approx (* (/ 1 (pow (sin ky) -1)) (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))))) #s(hole binary64 (+ (* (pow kx 2) (- (* (pow kx 2) (- (* -1 (* (pow kx 2) (+ (* -1/2 (/ (+ (* -1/2 (/ (* (sin ky) (* (sin th) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2)))))) (pow (sqrt (pow (sin ky) 2)) 3))) (* -1/4 (/ (* (sin ky) (sin th)) (pow (sqrt (pow (sin ky) 2)) 5)))) (pow (sqrt (pow (sin ky) 2)) 2))) (+ (* 1/4 (/ (* (sin ky) (* (sin th) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2)))))) (pow (sqrt (pow (sin ky) 2)) 5))) (* 1/2 (/ (* (sin ky) (* (sin th) (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2)))) (pow (sqrt (pow (sin ky) 2)) 2)))))) (pow (sqrt (pow (sin ky) 2)) 3))))))) (+ (* -1/2 (/ (* (sin ky) (* (sin th) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2)))))) (pow (sqrt (pow (sin ky) 2)) 3))) (* -1/4 (/ (* (sin ky) (sin th)) (pow (sqrt (pow (sin ky) 2)) 5)))))) (* 1/2 (/ (* (sin ky) (sin th)) (pow (sqrt (pow (sin ky) 2)) 3))))) (/ (* (sin ky) (sin th)) (sqrt (pow (sin ky) 2))))))
#s(approx (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1)))))) #s(hole binary64 (/ (sin th) (sqrt (pow (sin ky) 2)))))
#s(approx (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1)))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sqrt (pow (sin ky) 2)) 3))) (/ (sin th) (sqrt (pow (sin ky) 2))))))
#s(approx (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1)))))) #s(hole binary64 (+ (* (pow kx 2) (- (* -1 (* (pow kx 2) (+ (* -1/2 (/ (* (sin th) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2))))) (pow (sqrt (pow (sin ky) 2)) 3))) (* -1/4 (/ (sin th) (pow (sqrt (pow (sin ky) 2)) 5)))))) (* 1/2 (/ (sin th) (pow (sqrt (pow (sin ky) 2)) 3))))) (/ (sin th) (sqrt (pow (sin ky) 2))))))
#s(approx (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1)))))) #s(hole binary64 (+ (* (pow kx 2) (- (* (pow kx 2) (- (* -1 (* (pow kx 2) (+ (* -1/2 (/ (+ (* -1/2 (/ (* (sin th) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2))))) (pow (sqrt (pow (sin ky) 2)) 3))) (* -1/4 (/ (sin th) (pow (sqrt (pow (sin ky) 2)) 5)))) (pow (sqrt (pow (sin ky) 2)) 2))) (+ (* 1/4 (/ (* (sin th) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2))))) (pow (sqrt (pow (sin ky) 2)) 5))) (* 1/2 (/ (* (sin th) (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2)))) (pow (sqrt (pow (sin ky) 2)) 2))))) (pow (sqrt (pow (sin ky) 2)) 3))))))) (+ (* -1/2 (/ (* (sin th) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2))))) (pow (sqrt (pow (sin ky) 2)) 3))) (* -1/4 (/ (sin th) (pow (sqrt (pow (sin ky) 2)) 5)))))) (* 1/2 (/ (sin th) (pow (sqrt (pow (sin ky) 2)) 3))))) (/ (sin th) (sqrt (pow (sin ky) 2))))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) #s(hole binary64 (sqrt (pow (sin ky) 2))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) #s(hole binary64 (+ (sqrt (pow (sin ky) 2)) (* 1/2 (/ (pow kx 2) (sqrt (pow (sin ky) 2)))))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) #s(hole binary64 (+ (sqrt (pow (sin ky) 2)) (* (pow kx 2) (+ (* -1/2 (/ (* (pow kx 2) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2))))) (sqrt (pow (sin ky) 2)))) (* 1/2 (/ 1 (sqrt (pow (sin ky) 2)))))))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) #s(hole binary64 (+ (sqrt (pow (sin ky) 2)) (* (pow kx 2) (+ (* (pow kx 2) (+ (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2)))) (sqrt (pow (sin ky) 2)))) (* 1/2 (/ (* (pow kx 2) (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2)))) (pow (sqrt (pow (sin ky) 2)) 2))))) (sqrt (pow (sin ky) 2)))))) (* 1/2 (/ 1 (sqrt (pow (sin ky) 2)))))))))
#s(approx (sin kx) #s(hole binary64 kx))
#s(approx (sin kx) #s(hole binary64 (* kx (+ 1 (* -1/6 (pow kx 2))))))
#s(approx (sin kx) #s(hole binary64 (* kx (+ 1 (* (pow kx 2) (- (* 1/120 (pow kx 2)) 1/6))))))
#s(approx (sin kx) #s(hole binary64 (* kx (+ 1 (* (pow kx 2) (- (* (pow kx 2) (+ 1/120 (* -1/5040 (pow kx 2)))) 1/6))))))
#s(approx (/ (* (sin th) ky) (fabs (sin kx))) #s(hole binary64 (/ (* ky (sin th)) (fabs (sin kx)))))
#s(approx (fabs (sin kx)) #s(hole binary64 (fabs (sin kx))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (/ (sin ky) (sqrt (pow (sin ky) 2)))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow kx 2) (sin ky)) (pow (sqrt (pow (sin ky) 2)) 3))) (/ (sin ky) (sqrt (pow (sin ky) 2))))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ (* (pow kx 2) (- (* -1 (* (pow kx 2) (+ (* -1/2 (/ (* (sin ky) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2))))) (pow (sqrt (pow (sin ky) 2)) 3))) (* -1/4 (/ (sin ky) (pow (sqrt (pow (sin ky) 2)) 5)))))) (* 1/2 (/ (sin ky) (pow (sqrt (pow (sin ky) 2)) 3))))) (/ (sin ky) (sqrt (pow (sin ky) 2))))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ (* (pow kx 2) (- (* (pow kx 2) (- (* -1 (* (pow kx 2) (+ (* -1/2 (/ (+ (* -1/2 (/ (* (sin ky) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2))))) (pow (sqrt (pow (sin ky) 2)) 3))) (* -1/4 (/ (sin ky) (pow (sqrt (pow (sin ky) 2)) 5)))) (pow (sqrt (pow (sin ky) 2)) 2))) (+ (* 1/4 (/ (* (sin ky) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2))))) (pow (sqrt (pow (sin ky) 2)) 5))) (* 1/2 (/ (* (sin ky) (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2)))) (pow (sqrt (pow (sin ky) 2)) 2))))) (pow (sqrt (pow (sin ky) 2)) 3))))))) (+ (* -1/2 (/ (* (sin ky) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2))))) (pow (sqrt (pow (sin ky) 2)) 3))) (* -1/4 (/ (sin ky) (pow (sqrt (pow (sin ky) 2)) 5)))))) (* 1/2 (/ (sin ky) (pow (sqrt (pow (sin ky) 2)) 3))))) (/ (sin ky) (sqrt (pow (sin ky) 2))))))
#s(approx (* (/ 1 (pow (sin ky) -1)) (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))))) #s(hole binary64 (/ (* (sin ky) (sin th)) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))
#s(approx (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1)))))) #s(hole binary64 (/ (sin th) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) #s(hole binary64 (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
#s(approx (sin kx) #s(hole binary64 (sin kx)))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))
#s(approx (* (/ 1 (pow (sin ky) -1)) (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))))) #s(hole binary64 (/ (* ky (sin th)) (sqrt (pow (sin kx) 2)))))
#s(approx (* (/ 1 (pow (sin ky) -1)) (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))))) #s(hole binary64 (* ky (+ (* (pow ky 2) (- (* -1/6 (/ (sin th) (sqrt (pow (sin kx) 2)))) (* 1/2 (/ (sin th) (pow (sqrt (pow (sin kx) 2)) 3))))) (/ (sin th) (sqrt (pow (sin kx) 2)))))))
#s(approx (* (/ 1 (pow (sin ky) -1)) (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))))) #s(hole binary64 (* ky (+ (* (pow ky 2) (- (+ (* -1/6 (/ (sin th) (sqrt (pow (sin kx) 2)))) (* (pow ky 2) (- (* 1/120 (/ (sin th) (sqrt (pow (sin kx) 2)))) (+ (* -1/2 (/ (* (sin th) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2))))) (pow (sqrt (pow (sin kx) 2)) 3))) (* 1/2 (/ (- (* -1/6 (/ (sin th) (sqrt (pow (sin kx) 2)))) (* 1/2 (/ (sin th) (pow (sqrt (pow (sin kx) 2)) 3)))) (pow (sqrt (pow (sin kx) 2)) 2))))))) (* 1/2 (/ (sin th) (pow (sqrt (pow (sin kx) 2)) 3))))) (/ (sin th) (sqrt (pow (sin kx) 2)))))))
#s(approx (* (/ 1 (pow (sin ky) -1)) (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))))) #s(hole binary64 (* ky (+ (* (pow ky 2) (- (+ (* -1/6 (/ (sin th) (sqrt (pow (sin kx) 2)))) (* (pow ky 2) (- (+ (* 1/120 (/ (sin th) (sqrt (pow (sin kx) 2)))) (* (pow ky 2) (- (* -1/5040 (/ (sin th) (sqrt (pow (sin kx) 2)))) (+ (* -1/2 (/ (* (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2)))) (- (* -1/6 (/ (sin th) (sqrt (pow (sin kx) 2)))) (* 1/2 (/ (sin th) (pow (sqrt (pow (sin kx) 2)) 3))))) (pow (sqrt (pow (sin kx) 2)) 2))) (+ (* 1/2 (/ (* (sin th) (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2)))) (pow (sqrt (pow (sin kx) 2)) 2))))) (pow (sqrt (pow (sin kx) 2)) 3))) (* 1/2 (/ (- (* 1/120 (/ (sin th) (sqrt (pow (sin kx) 2)))) (+ (* -1/2 (/ (* (sin th) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2))))) (pow (sqrt (pow (sin kx) 2)) 3))) (* 1/2 (/ (- (* -1/6 (/ (sin th) (sqrt (pow (sin kx) 2)))) (* 1/2 (/ (sin th) (pow (sqrt (pow (sin kx) 2)) 3)))) (pow (sqrt (pow (sin kx) 2)) 2))))) (pow (sqrt (pow (sin kx) 2)) 2)))))))) (+ (* -1/2 (/ (* (sin th) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2))))) (pow (sqrt (pow (sin kx) 2)) 3))) (* 1/2 (/ (- (* -1/6 (/ (sin th) (sqrt (pow (sin kx) 2)))) (* 1/2 (/ (sin th) (pow (sqrt (pow (sin kx) 2)) 3)))) (pow (sqrt (pow (sin kx) 2)) 2))))))) (* 1/2 (/ (sin th) (pow (sqrt (pow (sin kx) 2)) 3))))) (/ (sin th) (sqrt (pow (sin kx) 2)))))))
#s(approx (/ 1 (pow (sin ky) -1)) #s(hole binary64 ky))
#s(approx (/ 1 (pow (sin ky) -1)) #s(hole binary64 (* ky (+ 1 (* -1/6 (pow ky 2))))))
#s(approx (/ 1 (pow (sin ky) -1)) #s(hole binary64 (* ky (+ 1 (* (pow ky 2) (- (* 1/120 (pow ky 2)) 1/6))))))
#s(approx (/ 1 (pow (sin ky) -1)) #s(hole binary64 (* ky (+ 1 (* (pow ky 2) (- (* (pow ky 2) (+ 1/120 (* -1/5040 (pow ky 2)))) 1/6))))))
#s(approx (pow (sin ky) -1) #s(hole binary64 (/ 1 ky)))
#s(approx (pow (sin ky) -1) #s(hole binary64 (/ (+ 1 (* 1/6 (pow ky 2))) ky)))
#s(approx (pow (sin ky) -1) #s(hole binary64 (/ (+ 1 (* (pow ky 2) (+ 1/6 (* 7/360 (pow ky 2))))) ky)))
#s(approx (pow (sin ky) -1) #s(hole binary64 (/ (+ 1 (* (pow ky 2) (+ 1/6 (* (pow ky 2) (+ 7/360 (* 31/15120 (pow ky 2))))))) ky)))
#s(approx (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1)))))) #s(hole binary64 (/ (sin th) (sqrt (pow (sin kx) 2)))))
#s(approx (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1)))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sqrt (pow (sin kx) 2)) 3))) (/ (sin th) (sqrt (pow (sin kx) 2))))))
#s(approx (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1)))))) #s(hole binary64 (+ (* (pow ky 2) (- (* -1 (* (pow ky 2) (+ (* -1/2 (/ (* (sin th) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2))))) (pow (sqrt (pow (sin kx) 2)) 3))) (* -1/4 (/ (sin th) (pow (sqrt (pow (sin kx) 2)) 5)))))) (* 1/2 (/ (sin th) (pow (sqrt (pow (sin kx) 2)) 3))))) (/ (sin th) (sqrt (pow (sin kx) 2))))))
#s(approx (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1)))))) #s(hole binary64 (+ (* (pow ky 2) (- (* (pow ky 2) (- (* -1 (* (pow ky 2) (+ (* -1/2 (/ (+ (* -1/2 (/ (* (sin th) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2))))) (pow (sqrt (pow (sin kx) 2)) 3))) (* -1/4 (/ (sin th) (pow (sqrt (pow (sin kx) 2)) 5)))) (pow (sqrt (pow (sin kx) 2)) 2))) (+ (* 1/4 (/ (* (sin th) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2))))) (pow (sqrt (pow (sin kx) 2)) 5))) (* 1/2 (/ (* (sin th) (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2)))) (pow (sqrt (pow (sin kx) 2)) 2))))) (pow (sqrt (pow (sin kx) 2)) 3))))))) (+ (* -1/2 (/ (* (sin th) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2))))) (pow (sqrt (pow (sin kx) 2)) 3))) (* -1/4 (/ (sin th) (pow (sqrt (pow (sin kx) 2)) 5)))))) (* 1/2 (/ (sin th) (pow (sqrt (pow (sin kx) 2)) 3))))) (/ (sin th) (sqrt (pow (sin kx) 2))))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) #s(hole binary64 (sqrt (pow (sin kx) 2))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) #s(hole binary64 (+ (sqrt (pow (sin kx) 2)) (* 1/2 (/ (pow ky 2) (sqrt (pow (sin kx) 2)))))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) #s(hole binary64 (+ (sqrt (pow (sin kx) 2)) (* (pow ky 2) (+ (* -1/2 (/ (* (pow ky 2) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2))))) (sqrt (pow (sin kx) 2)))) (* 1/2 (/ 1 (sqrt (pow (sin kx) 2)))))))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) #s(hole binary64 (+ (sqrt (pow (sin kx) 2)) (* (pow ky 2) (+ (* (pow ky 2) (+ (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2)))) (sqrt (pow (sin kx) 2)))) (* 1/2 (/ (* (pow ky 2) (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2)))) (pow (sqrt (pow (sin kx) 2)) 2))))) (sqrt (pow (sin kx) 2)))))) (* 1/2 (/ 1 (sqrt (pow (sin kx) 2)))))))))
#s(approx (* (sin th) ky) #s(hole binary64 (* ky (sin th))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (/ ky (sqrt (pow (sin kx) 2)))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (* ky (+ (* -1 (* (pow ky 2) (+ (* 1/6 (/ 1 (sqrt (pow (sin kx) 2)))) (* 1/2 (/ 1 (pow (sqrt (pow (sin kx) 2)) 3)))))) (/ 1 (sqrt (pow (sin kx) 2)))))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (* ky (+ (* (pow ky 2) (- (* (pow ky 2) (- (* 1/120 (/ 1 (sqrt (pow (sin kx) 2)))) (+ (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2)))) (pow (sqrt (pow (sin kx) 2)) 3))) (* -1/2 (/ (+ (* 1/6 (/ 1 (sqrt (pow (sin kx) 2)))) (* 1/2 (/ 1 (pow (sqrt (pow (sin kx) 2)) 3)))) (pow (sqrt (pow (sin kx) 2)) 2)))))) (+ (* 1/6 (/ 1 (sqrt (pow (sin kx) 2)))) (* 1/2 (/ 1 (pow (sqrt (pow (sin kx) 2)) 3)))))) (/ 1 (sqrt (pow (sin kx) 2)))))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (* ky (+ (* (pow ky 2) (- (* (pow ky 2) (- (+ (* -1 (* (pow ky 2) (+ (* 1/5040 (/ 1 (sqrt (pow (sin kx) 2)))) (+ (* 1/2 (/ (* (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2)))) (+ (* 1/6 (/ 1 (sqrt (pow (sin kx) 2)))) (* 1/2 (/ 1 (pow (sqrt (pow (sin kx) 2)) 3))))) (pow (sqrt (pow (sin kx) 2)) 2))) (+ (* 1/2 (/ (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2)))) (pow (sqrt (pow (sin kx) 2)) 2)))) (pow (sqrt (pow (sin kx) 2)) 3))) (* 1/2 (/ (- (* 1/120 (/ 1 (sqrt (pow (sin kx) 2)))) (+ (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2)))) (pow (sqrt (pow (sin kx) 2)) 3))) (* -1/2 (/ (+ (* 1/6 (/ 1 (sqrt (pow (sin kx) 2)))) (* 1/2 (/ 1 (pow (sqrt (pow (sin kx) 2)) 3)))) (pow (sqrt (pow (sin kx) 2)) 2))))) (pow (sqrt (pow (sin kx) 2)) 2)))))))) (* 1/120 (/ 1 (sqrt (pow (sin kx) 2))))) (+ (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2)))) (pow (sqrt (pow (sin kx) 2)) 3))) (* -1/2 (/ (+ (* 1/6 (/ 1 (sqrt (pow (sin kx) 2)))) (* 1/2 (/ 1 (pow (sqrt (pow (sin kx) 2)) 3)))) (pow (sqrt (pow (sin kx) 2)) 2)))))) (+ (* 1/6 (/ 1 (sqrt (pow (sin kx) 2)))) (* 1/2 (/ 1 (pow (sqrt (pow (sin kx) 2)) 3)))))) (/ 1 (sqrt (pow (sin kx) 2)))))))
#s(approx (fabs (sin ky)) #s(hole binary64 (fabs (sin ky))))
#s(approx (* (log (- 1/2 (* 1/2 (cos (+ ky ky))))) 1/2) #s(hole binary64 (log ky)))
#s(approx (* (log (- 1/2 (* 1/2 (cos (+ ky ky))))) 1/2) #s(hole binary64 (+ (log ky) (* -1/6 (pow ky 2)))))
#s(approx (* (log (- 1/2 (* 1/2 (cos (+ ky ky))))) 1/2) #s(hole binary64 (+ (log ky) (* (pow ky 2) (- (* -1/180 (pow ky 2)) 1/6)))))
#s(approx (* (log (- 1/2 (* 1/2 (cos (+ ky ky))))) 1/2) #s(hole binary64 (+ (log ky) (* (pow ky 2) (- (* (pow ky 2) (- (* -1/2835 (pow ky 2)) 1/180)) 1/6)))))
#s(approx (log (- 1/2 (* 1/2 (cos (+ ky ky))))) #s(hole binary64 (* 2 (log ky))))
#s(approx (log (- 1/2 (* 1/2 (cos (+ ky ky))))) #s(hole binary64 (+ (* -1/3 (pow ky 2)) (* 2 (log ky)))))
#s(approx (log (- 1/2 (* 1/2 (cos (+ ky ky))))) #s(hole binary64 (+ (* 2 (log ky)) (* (pow ky 2) (- (* -1/90 (pow ky 2)) 1/3)))))
#s(approx (log (- 1/2 (* 1/2 (cos (+ ky ky))))) #s(hole binary64 (+ (* 2 (log ky)) (* (pow ky 2) (- (* (pow ky 2) (- (* -2/2835 (pow ky 2)) 1/90)) 1/3)))))
#s(approx (- 1/2 (* 1/2 (cos (+ ky ky)))) #s(hole binary64 (pow ky 2)))
#s(approx (- 1/2 (* 1/2 (cos (+ ky ky)))) #s(hole binary64 (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2))))))
#s(approx (- 1/2 (* 1/2 (cos (+ ky ky)))) #s(hole binary64 (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3))))))
#s(approx (- 1/2 (* 1/2 (cos (+ ky ky)))) #s(hole binary64 (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* (pow ky 2) (+ 2/45 (* -1/315 (pow ky 2)))) 1/3))))))
#s(approx (* 1/2 (cos (+ ky ky))) #s(hole binary64 1/2))
#s(approx (* 1/2 (cos (+ ky ky))) #s(hole binary64 (+ 1/2 (* -1 (pow ky 2)))))
#s(approx (* 1/2 (cos (+ ky ky))) #s(hole binary64 (+ 1/2 (* (pow ky 2) (- (* 1/3 (pow ky 2)) 1)))))
#s(approx (* 1/2 (cos (+ ky ky))) #s(hole binary64 (+ 1/2 (* (pow ky 2) (- (* (pow ky 2) (+ 1/3 (* -2/45 (pow ky 2)))) 1)))))
#s(approx (cos (+ ky ky)) #s(hole binary64 1))
#s(approx (cos (+ ky ky)) #s(hole binary64 (+ 1 (* -2 (pow ky 2)))))
#s(approx (cos (+ ky ky)) #s(hole binary64 (+ 1 (* (pow ky 2) (- (* 2/3 (pow ky 2)) 2)))))
#s(approx (cos (+ ky ky)) #s(hole binary64 (+ 1 (* (pow ky 2) (- (* (pow ky 2) (+ 2/3 (* -4/45 (pow ky 2)))) 2)))))
#s(approx (+ ky ky) #s(hole binary64 (* 2 ky)))
#s(approx (/ 1 (pow (sin ky) -1)) #s(hole binary64 (sin ky)))
#s(approx (pow (sin ky) -1) #s(hole binary64 (/ 1 (sin ky))))
#s(approx (exp (* (log (- 1/2 (* 1/2 (cos (+ ky ky))))) 1/2)) #s(hole binary64 (sqrt (- 1/2 (* 1/2 (cos (* 2 ky)))))))
#s(approx (* (log (- 1/2 (* 1/2 (cos (+ ky ky))))) 1/2) #s(hole binary64 (* 1/2 (log (- 1/2 (* 1/2 (cos (* 2 ky))))))))
#s(approx (log (- 1/2 (* 1/2 (cos (+ ky ky))))) #s(hole binary64 (log (- 1/2 (* 1/2 (cos (* 2 ky)))))))
#s(approx (- 1/2 (* 1/2 (cos (+ ky ky)))) #s(hole binary64 (- 1/2 (* 1/2 (cos (* 2 ky))))))
#s(approx (* 1/2 (cos (+ ky ky))) #s(hole binary64 (* 1/2 (cos (* 2 ky)))))
#s(approx (cos (+ ky ky)) #s(hole binary64 (cos (* 2 ky))))
#s(approx (exp (* (log (- 1/2 (* 1/2 (cos (+ ky ky))))) 1/2)) #s(hole binary64 (sqrt (- 1/2 (* 1/2 (cos (neg (* -2 ky))))))))
#s(approx (* (log (- 1/2 (* 1/2 (cos (+ ky ky))))) 1/2) #s(hole binary64 (* 1/2 (log (- 1/2 (* 1/2 (cos (neg (* -2 ky)))))))))
#s(approx (log (- 1/2 (* 1/2 (cos (+ ky ky))))) #s(hole binary64 (log (- 1/2 (* 1/2 (cos (neg (* -2 ky))))))))
#s(approx (- 1/2 (* 1/2 (cos (+ ky ky)))) #s(hole binary64 (- 1/2 (* 1/2 (cos (neg (* -2 ky)))))))
#s(approx (* 1/2 (cos (+ ky ky))) #s(hole binary64 (* 1/2 (cos (neg (* -2 ky))))))
#s(approx (cos (+ ky ky)) #s(hole binary64 (cos (neg (* -2 ky)))))
#s(approx (* (/ 1 (pow (sin ky) -1)) (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))))) #s(hole binary64 (/ (* th (sin ky)) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))
#s(approx (* (/ 1 (pow (sin ky) -1)) (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))))) #s(hole binary64 (* th (+ (* -1/6 (/ (* (pow th 2) (sin ky)) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))
#s(approx (* (/ 1 (pow (sin ky) -1)) (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))))) #s(hole binary64 (* th (+ (* (pow th 2) (+ (* -1/6 (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 1/120 (/ (* (pow th 2) (sin ky)) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))
#s(approx (* (/ 1 (pow (sin ky) -1)) (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))))) #s(hole binary64 (* th (+ (* (pow th 2) (+ (* -1/6 (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* (pow th 2) (+ (* -1/5040 (/ (* (pow th 2) (sin ky)) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 1/120 (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))
#s(approx (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1)))))) #s(hole binary64 (/ th (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))
#s(approx (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1)))))) #s(hole binary64 (* th (+ (* -1/6 (/ (pow th 2) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (/ 1 (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))
#s(approx (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1)))))) #s(hole binary64 (* th (+ (* (pow th 2) (- (* 1/120 (/ (pow th 2) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 1/6 (/ 1 (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (/ 1 (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))
#s(approx (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1)))))) #s(hole binary64 (* th (+ (* (pow th 2) (- (* (pow th 2) (+ (* -1/5040 (/ (pow th 2) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 1/120 (/ 1 (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (* 1/6 (/ 1 (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (/ 1 (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))
#s(approx (sin th) #s(hole binary64 th))
#s(approx (sin th) #s(hole binary64 (* th (+ 1 (* -1/6 (pow th 2))))))
#s(approx (sin th) #s(hole binary64 (* th (+ 1 (* (pow th 2) (- (* 1/120 (pow th 2)) 1/6))))))
#s(approx (sin th) #s(hole binary64 (* th (+ 1 (* (pow th 2) (- (* (pow th 2) (+ 1/120 (* -1/5040 (pow th 2)))) 1/6))))))
#s(approx (/ (* (sin th) ky) (fabs (sin kx))) #s(hole binary64 (/ (* ky th) (fabs (sin kx)))))
#s(approx (/ (* (sin th) ky) (fabs (sin kx))) #s(hole binary64 (* th (+ (* -1/6 (/ (* ky (pow th 2)) (fabs (sin kx)))) (/ ky (fabs (sin kx)))))))
#s(approx (/ (* (sin th) ky) (fabs (sin kx))) #s(hole binary64 (* th (+ (* (pow th 2) (+ (* -1/6 (/ ky (fabs (sin kx)))) (* 1/120 (/ (* ky (pow th 2)) (fabs (sin kx)))))) (/ ky (fabs (sin kx)))))))
#s(approx (/ (* (sin th) ky) (fabs (sin kx))) #s(hole binary64 (* th (+ (* (pow th 2) (+ (* -1/6 (/ ky (fabs (sin kx)))) (* (pow th 2) (+ (* -1/5040 (/ (* ky (pow th 2)) (fabs (sin kx)))) (* 1/120 (/ ky (fabs (sin kx)))))))) (/ ky (fabs (sin kx)))))))
#s(approx (* (sin th) ky) #s(hole binary64 (* ky th)))
#s(approx (* (sin th) ky) #s(hole binary64 (* th (+ ky (* -1/6 (* ky (pow th 2)))))))
#s(approx (* (sin th) ky) #s(hole binary64 (* th (+ ky (* (pow th 2) (+ (* -1/6 ky) (* 1/120 (* ky (pow th 2)))))))))
#s(approx (* (sin th) ky) #s(hole binary64 (* th (+ ky (* (pow th 2) (+ (* -1/6 ky) (* (pow th 2) (+ (* -1/5040 (* ky (pow th 2))) (* 1/120 ky)))))))))
#s(approx (+ (* (- (* (+ (* (* th th) -1/5040) 1/120) (* th th)) 1/6) (* th th)) 1) #s(hole binary64 (+ 1 (* -1/6 (pow th 2)))))
#s(approx (+ (* (- (* (+ (* (* th th) -1/5040) 1/120) (* th th)) 1/6) (* th th)) 1) #s(hole binary64 (+ 1 (* (pow th 2) (- (* 1/120 (pow th 2)) 1/6)))))
#s(approx (+ (* (- (* (+ (* (* th th) -1/5040) 1/120) (* th th)) 1/6) (* th th)) 1) #s(hole binary64 (+ 1 (* (pow th 2) (- (* (pow th 2) (+ 1/120 (* -1/5040 (pow th 2)))) 1/6)))))
#s(approx (- (* (+ (* (* th th) -1/5040) 1/120) (* th th)) 1/6) #s(hole binary64 -1/6))
#s(approx (- (* (+ (* (* th th) -1/5040) 1/120) (* th th)) 1/6) #s(hole binary64 (- (* 1/120 (pow th 2)) 1/6)))
#s(approx (- (* (+ (* (* th th) -1/5040) 1/120) (* th th)) 1/6) #s(hole binary64 (- (* (pow th 2) (+ 1/120 (* -1/5040 (pow th 2)))) 1/6)))
#s(approx (* (+ (* (* th th) -1/5040) 1/120) (* th th)) #s(hole binary64 (* 1/120 (pow th 2))))
#s(approx (* (+ (* (* th th) -1/5040) 1/120) (* th th)) #s(hole binary64 (* (pow th 2) (+ 1/120 (* -1/5040 (pow th 2))))))
#s(approx (+ (* (* th th) -1/5040) 1/120) #s(hole binary64 1/120))
#s(approx (+ (* (* th th) -1/5040) 1/120) #s(hole binary64 (+ 1/120 (* -1/5040 (pow th 2)))))
#s(approx (* th th) #s(hole binary64 (pow th 2)))
#s(approx (sin th) #s(hole binary64 (sin th)))
#s(approx (* (+ (* (- (* (+ (* (* th th) -1/5040) 1/120) (* th th)) 1/6) (* th th)) 1) th) #s(hole binary64 (* -1/5040 (pow th 7))))
#s(approx (* (+ (* (- (* (+ (* (* th th) -1/5040) 1/120) (* th th)) 1/6) (* th th)) 1) th) #s(hole binary64 (* (pow th 7) (- (* 1/120 (/ 1 (pow th 2))) 1/5040))))
#s(approx (* (+ (* (- (* (+ (* (* th th) -1/5040) 1/120) (* th th)) 1/6) (* th th)) 1) th) #s(hole binary64 (* (pow th 7) (- (* 1/120 (/ 1 (pow th 2))) (+ 1/5040 (/ 1/6 (pow th 4)))))))
#s(approx (* (+ (* (- (* (+ (* (* th th) -1/5040) 1/120) (* th th)) 1/6) (* th th)) 1) th) #s(hole binary64 (* (pow th 7) (- (+ (* 1/120 (/ 1 (pow th 2))) (/ 1 (pow th 6))) (+ 1/5040 (/ 1/6 (pow th 4)))))))
#s(approx (+ (* (- (* (+ (* (* th th) -1/5040) 1/120) (* th th)) 1/6) (* th th)) 1) #s(hole binary64 (* -1/5040 (pow th 6))))
#s(approx (+ (* (- (* (+ (* (* th th) -1/5040) 1/120) (* th th)) 1/6) (* th th)) 1) #s(hole binary64 (* (pow th 6) (- (* 1/120 (/ 1 (pow th 2))) 1/5040))))
#s(approx (+ (* (- (* (+ (* (* th th) -1/5040) 1/120) (* th th)) 1/6) (* th th)) 1) #s(hole binary64 (* (pow th 6) (- (* 1/120 (/ 1 (pow th 2))) (+ 1/5040 (/ 1/6 (pow th 4)))))))
#s(approx (+ (* (- (* (+ (* (* th th) -1/5040) 1/120) (* th th)) 1/6) (* th th)) 1) #s(hole binary64 (* (pow th 6) (- (+ (* 1/120 (/ 1 (pow th 2))) (/ 1 (pow th 6))) (+ 1/5040 (/ 1/6 (pow th 4)))))))
#s(approx (- (* (+ (* (* th th) -1/5040) 1/120) (* th th)) 1/6) #s(hole binary64 (* -1/5040 (pow th 4))))
#s(approx (- (* (+ (* (* th th) -1/5040) 1/120) (* th th)) 1/6) #s(hole binary64 (* (pow th 4) (- (* 1/120 (/ 1 (pow th 2))) 1/5040))))
#s(approx (- (* (+ (* (* th th) -1/5040) 1/120) (* th th)) 1/6) #s(hole binary64 (* (pow th 4) (- (* 1/120 (/ 1 (pow th 2))) (+ 1/5040 (/ 1/6 (pow th 4)))))))
#s(approx (+ (* (* th th) -1/5040) 1/120) #s(hole binary64 (* -1/5040 (pow th 2))))
#s(approx (+ (* (* th th) -1/5040) 1/120) #s(hole binary64 (* (pow th 2) (- (* 1/120 (/ 1 (pow th 2))) 1/5040))))
#s(approx (* (+ (* (- (* (+ (* (* th th) -1/5040) 1/120) (* th th)) 1/6) (* th th)) 1) th) #s(hole binary64 (* -1 (* (pow th 7) (- 1/5040 (* 1/120 (/ 1 (pow th 2))))))))
#s(approx (* (+ (* (- (* (+ (* (* th th) -1/5040) 1/120) (* th th)) 1/6) (* th th)) 1) th) #s(hole binary64 (* -1 (* (pow th 7) (- (+ 1/5040 (/ 1/6 (pow th 4))) (* 1/120 (/ 1 (pow th 2))))))))
#s(approx (* (+ (* (- (* (+ (* (* th th) -1/5040) 1/120) (* th th)) 1/6) (* th th)) 1) th) #s(hole binary64 (* -1 (* (pow th 7) (- (+ 1/5040 (/ 1/6 (pow th 4))) (+ (* 1/120 (/ 1 (pow th 2))) (/ 1 (pow th 6))))))))
Calls

9 calls:

TimeVariablePointExpression
58.0ms
ky
@-inf
((* (/ 1 (pow (sin ky) -1)) (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))))) (/ 1 (pow (sin ky) -1)) 1 (pow (sin ky) -1) (sin ky) ky -1 (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1)))))) (sin th) th (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) (sin kx) kx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (* (sin th) ky) (fabs (sin kx))) (* (sin th) ky) (sin th) (fabs (sin kx)) (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs (sin ky)) (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin th) (* (+ (* (- (* (+ (* (* th th) -1/5040) 1/120) (* th th)) 1/6) (* th th)) 1) th) (+ (* (- (* (+ (* (* th th) -1/5040) 1/120) (* th th)) 1/6) (* th th)) 1) (- (* (+ (* (* th th) -1/5040) 1/120) (* th th)) 1/6) (* (+ (* (* th th) -1/5040) 1/120) (* th th)) (+ (* (* th th) -1/5040) 1/120) (* th th) -1/5040 1/120 1/6 (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (exp (* (log (- 1/2 (* 1/2 (cos (+ ky ky))))) 1/2)) (* (log (- 1/2 (* 1/2 (cos (+ ky ky))))) 1/2) (log (- 1/2 (* 1/2 (cos (+ ky ky))))) (- 1/2 (* 1/2 (cos (+ ky ky)))) 1/2 (* 1/2 (cos (+ ky ky))) (cos (+ ky ky)) (+ ky ky))
43.0ms
ky
@inf
((* (/ 1 (pow (sin ky) -1)) (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))))) (/ 1 (pow (sin ky) -1)) 1 (pow (sin ky) -1) (sin ky) ky -1 (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1)))))) (sin th) th (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) (sin kx) kx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (* (sin th) ky) (fabs (sin kx))) (* (sin th) ky) (sin th) (fabs (sin kx)) (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs (sin ky)) (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin th) (* (+ (* (- (* (+ (* (* th th) -1/5040) 1/120) (* th th)) 1/6) (* th th)) 1) th) (+ (* (- (* (+ (* (* th th) -1/5040) 1/120) (* th th)) 1/6) (* th th)) 1) (- (* (+ (* (* th th) -1/5040) 1/120) (* th th)) 1/6) (* (+ (* (* th th) -1/5040) 1/120) (* th th)) (+ (* (* th th) -1/5040) 1/120) (* th th) -1/5040 1/120 1/6 (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (exp (* (log (- 1/2 (* 1/2 (cos (+ ky ky))))) 1/2)) (* (log (- 1/2 (* 1/2 (cos (+ ky ky))))) 1/2) (log (- 1/2 (* 1/2 (cos (+ ky ky))))) (- 1/2 (* 1/2 (cos (+ ky ky)))) 1/2 (* 1/2 (cos (+ ky ky))) (cos (+ ky ky)) (+ ky ky))
24.0ms
th
@-inf
((* (/ 1 (pow (sin ky) -1)) (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))))) (/ 1 (pow (sin ky) -1)) 1 (pow (sin ky) -1) (sin ky) ky -1 (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1)))))) (sin th) th (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) (sin kx) kx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (* (sin th) ky) (fabs (sin kx))) (* (sin th) ky) (sin th) (fabs (sin kx)) (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs (sin ky)) (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin th) (* (+ (* (- (* (+ (* (* th th) -1/5040) 1/120) (* th th)) 1/6) (* th th)) 1) th) (+ (* (- (* (+ (* (* th th) -1/5040) 1/120) (* th th)) 1/6) (* th th)) 1) (- (* (+ (* (* th th) -1/5040) 1/120) (* th th)) 1/6) (* (+ (* (* th th) -1/5040) 1/120) (* th th)) (+ (* (* th th) -1/5040) 1/120) (* th th) -1/5040 1/120 1/6 (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (exp (* (log (- 1/2 (* 1/2 (cos (+ ky ky))))) 1/2)) (* (log (- 1/2 (* 1/2 (cos (+ ky ky))))) 1/2) (log (- 1/2 (* 1/2 (cos (+ ky ky))))) (- 1/2 (* 1/2 (cos (+ ky ky)))) 1/2 (* 1/2 (cos (+ ky ky))) (cos (+ ky ky)) (+ ky ky))
5.0ms
kx
@-inf
((* (/ 1 (pow (sin ky) -1)) (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))))) (/ 1 (pow (sin ky) -1)) 1 (pow (sin ky) -1) (sin ky) ky -1 (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1)))))) (sin th) th (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) (sin kx) kx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (* (sin th) ky) (fabs (sin kx))) (* (sin th) ky) (sin th) (fabs (sin kx)) (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs (sin ky)) (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin th) (* (+ (* (- (* (+ (* (* th th) -1/5040) 1/120) (* th th)) 1/6) (* th th)) 1) th) (+ (* (- (* (+ (* (* th th) -1/5040) 1/120) (* th th)) 1/6) (* th th)) 1) (- (* (+ (* (* th th) -1/5040) 1/120) (* th th)) 1/6) (* (+ (* (* th th) -1/5040) 1/120) (* th th)) (+ (* (* th th) -1/5040) 1/120) (* th th) -1/5040 1/120 1/6 (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (exp (* (log (- 1/2 (* 1/2 (cos (+ ky ky))))) 1/2)) (* (log (- 1/2 (* 1/2 (cos (+ ky ky))))) 1/2) (log (- 1/2 (* 1/2 (cos (+ ky ky))))) (- 1/2 (* 1/2 (cos (+ ky ky)))) 1/2 (* 1/2 (cos (+ ky ky))) (cos (+ ky ky)) (+ ky ky))
4.0ms
th
@inf
((* (/ 1 (pow (sin ky) -1)) (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))))) (/ 1 (pow (sin ky) -1)) 1 (pow (sin ky) -1) (sin ky) ky -1 (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1)))))) (sin th) th (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) (sin kx) kx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (* (sin th) ky) (fabs (sin kx))) (* (sin th) ky) (sin th) (fabs (sin kx)) (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs (sin ky)) (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin th) (* (+ (* (- (* (+ (* (* th th) -1/5040) 1/120) (* th th)) 1/6) (* th th)) 1) th) (+ (* (- (* (+ (* (* th th) -1/5040) 1/120) (* th th)) 1/6) (* th th)) 1) (- (* (+ (* (* th th) -1/5040) 1/120) (* th th)) 1/6) (* (+ (* (* th th) -1/5040) 1/120) (* th th)) (+ (* (* th th) -1/5040) 1/120) (* th th) -1/5040 1/120 1/6 (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (exp (* (log (- 1/2 (* 1/2 (cos (+ ky ky))))) 1/2)) (* (log (- 1/2 (* 1/2 (cos (+ ky ky))))) 1/2) (log (- 1/2 (* 1/2 (cos (+ ky ky))))) (- 1/2 (* 1/2 (cos (+ ky ky)))) 1/2 (* 1/2 (cos (+ ky ky))) (cos (+ ky ky)) (+ ky ky))

rewrite216.0ms (3.2%)

Memory
21.5MiB live, 344.3MiB allocated; 61ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
07775773
08374727
144814429
085954256
Stop Event
iter-limit
node-limit
iter-limit
Counts
180 → 535
Calls
Call 1
Inputs
(*.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 ky) #s(literal -1 binary64))) (/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 ky) #s(literal -1 binary64))))))
(/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 ky) #s(literal -1 binary64)))
#s(literal 1 binary64)
(pow.f64 (sin.f64 ky) #s(literal -1 binary64))
(sin.f64 ky)
ky
#s(literal -1 binary64)
(/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 ky) #s(literal -1 binary64)))))
(sin.f64 th)
th
(hypot.f64 (sin.f64 kx) (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 ky) #s(literal -1 binary64))))
(sin.f64 kx)
kx
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (fabs.f64 (sin.f64 kx))))
(/.f64 (*.f64 #s(approx (sin th) th) ky) (fabs.f64 (sin.f64 kx)))
(*.f64 #s(approx (sin th) th) ky)
#s(approx (sin th) th)
(fabs.f64 (sin.f64 kx))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 (sin.f64 ky)))) #s(approx (sin th) th))
(/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 (sin.f64 ky))))
#s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 (sin.f64 ky)))
(fabs.f64 (sin.f64 ky))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 (sin.f64 ky)))) #s(approx (sin th) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (*.f64 th th)) #s(literal 1/6 binary64)) (*.f64 th th) #s(literal 1 binary64)) th)))
#s(approx (sin th) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (*.f64 th th)) #s(literal 1/6 binary64)) (*.f64 th th) #s(literal 1 binary64)) th))
(*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (*.f64 th th)) #s(literal 1/6 binary64)) (*.f64 th th) #s(literal 1 binary64)) th)
(fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (*.f64 th th)) #s(literal 1/6 binary64)) (*.f64 th th) #s(literal 1 binary64))
(-.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (*.f64 th th)) #s(literal 1/6 binary64))
(*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (*.f64 th th))
(fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64))
(*.f64 th th)
#s(literal -1/5040 binary64)
#s(literal 1/120 binary64)
#s(literal 1/6 binary64)
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (exp.f64 (*.f64 (log.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal 1/2 binary64))))) (sin.f64 th))
(/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (exp.f64 (*.f64 (log.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal 1/2 binary64)))))
#s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (exp.f64 (*.f64 (log.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal 1/2 binary64))))
(exp.f64 (*.f64 (log.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal 1/2 binary64)))
(*.f64 (log.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal 1/2 binary64))
(log.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))
#s(literal 1/2 binary64)
(*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))
(cos.f64 (+.f64 ky ky))
(+.f64 ky ky)
#s(approx (* (/ 1 (pow (sin ky) -1)) (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))))) #s(hole binary64 (/ (* (sin ky) (sin th)) (sqrt (pow (sin ky) 2)))))
#s(approx (* (/ 1 (pow (sin ky) -1)) (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow kx 2) (* (sin ky) (sin th))) (pow (sqrt (pow (sin ky) 2)) 3))) (/ (* (sin ky) (sin th)) (sqrt (pow (sin ky) 2))))))
#s(approx (* (/ 1 (pow (sin ky) -1)) (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))))) #s(hole binary64 (+ (* (pow kx 2) (- (* -1 (* (pow kx 2) (+ (* -1/2 (/ (* (sin ky) (* (sin th) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2)))))) (pow (sqrt (pow (sin ky) 2)) 3))) (* -1/4 (/ (* (sin ky) (sin th)) (pow (sqrt (pow (sin ky) 2)) 5)))))) (* 1/2 (/ (* (sin ky) (sin th)) (pow (sqrt (pow (sin ky) 2)) 3))))) (/ (* (sin ky) (sin th)) (sqrt (pow (sin ky) 2))))))
#s(approx (* (/ 1 (pow (sin ky) -1)) (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))))) #s(hole binary64 (+ (* (pow kx 2) (- (* (pow kx 2) (- (* -1 (* (pow kx 2) (+ (* -1/2 (/ (+ (* -1/2 (/ (* (sin ky) (* (sin th) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2)))))) (pow (sqrt (pow (sin ky) 2)) 3))) (* -1/4 (/ (* (sin ky) (sin th)) (pow (sqrt (pow (sin ky) 2)) 5)))) (pow (sqrt (pow (sin ky) 2)) 2))) (+ (* 1/4 (/ (* (sin ky) (* (sin th) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2)))))) (pow (sqrt (pow (sin ky) 2)) 5))) (* 1/2 (/ (* (sin ky) (* (sin th) (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2)))) (pow (sqrt (pow (sin ky) 2)) 2)))))) (pow (sqrt (pow (sin ky) 2)) 3))))))) (+ (* -1/2 (/ (* (sin ky) (* (sin th) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2)))))) (pow (sqrt (pow (sin ky) 2)) 3))) (* -1/4 (/ (* (sin ky) (sin th)) (pow (sqrt (pow (sin ky) 2)) 5)))))) (* 1/2 (/ (* (sin ky) (sin th)) (pow (sqrt (pow (sin ky) 2)) 3))))) (/ (* (sin ky) (sin th)) (sqrt (pow (sin ky) 2))))))
#s(approx (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1)))))) #s(hole binary64 (/ (sin th) (sqrt (pow (sin ky) 2)))))
#s(approx (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1)))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sqrt (pow (sin ky) 2)) 3))) (/ (sin th) (sqrt (pow (sin ky) 2))))))
#s(approx (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1)))))) #s(hole binary64 (+ (* (pow kx 2) (- (* -1 (* (pow kx 2) (+ (* -1/2 (/ (* (sin th) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2))))) (pow (sqrt (pow (sin ky) 2)) 3))) (* -1/4 (/ (sin th) (pow (sqrt (pow (sin ky) 2)) 5)))))) (* 1/2 (/ (sin th) (pow (sqrt (pow (sin ky) 2)) 3))))) (/ (sin th) (sqrt (pow (sin ky) 2))))))
#s(approx (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1)))))) #s(hole binary64 (+ (* (pow kx 2) (- (* (pow kx 2) (- (* -1 (* (pow kx 2) (+ (* -1/2 (/ (+ (* -1/2 (/ (* (sin th) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2))))) (pow (sqrt (pow (sin ky) 2)) 3))) (* -1/4 (/ (sin th) (pow (sqrt (pow (sin ky) 2)) 5)))) (pow (sqrt (pow (sin ky) 2)) 2))) (+ (* 1/4 (/ (* (sin th) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2))))) (pow (sqrt (pow (sin ky) 2)) 5))) (* 1/2 (/ (* (sin th) (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2)))) (pow (sqrt (pow (sin ky) 2)) 2))))) (pow (sqrt (pow (sin ky) 2)) 3))))))) (+ (* -1/2 (/ (* (sin th) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2))))) (pow (sqrt (pow (sin ky) 2)) 3))) (* -1/4 (/ (sin th) (pow (sqrt (pow (sin ky) 2)) 5)))))) (* 1/2 (/ (sin th) (pow (sqrt (pow (sin ky) 2)) 3))))) (/ (sin th) (sqrt (pow (sin ky) 2))))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) #s(hole binary64 (sqrt (pow (sin ky) 2))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) #s(hole binary64 (+ (sqrt (pow (sin ky) 2)) (* 1/2 (/ (pow kx 2) (sqrt (pow (sin ky) 2)))))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) #s(hole binary64 (+ (sqrt (pow (sin ky) 2)) (* (pow kx 2) (+ (* -1/2 (/ (* (pow kx 2) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2))))) (sqrt (pow (sin ky) 2)))) (* 1/2 (/ 1 (sqrt (pow (sin ky) 2)))))))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) #s(hole binary64 (+ (sqrt (pow (sin ky) 2)) (* (pow kx 2) (+ (* (pow kx 2) (+ (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2)))) (sqrt (pow (sin ky) 2)))) (* 1/2 (/ (* (pow kx 2) (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2)))) (pow (sqrt (pow (sin ky) 2)) 2))))) (sqrt (pow (sin ky) 2)))))) (* 1/2 (/ 1 (sqrt (pow (sin ky) 2)))))))))
#s(approx (sin kx) #s(hole binary64 kx))
#s(approx (sin kx) #s(hole binary64 (* kx (+ 1 (* -1/6 (pow kx 2))))))
#s(approx (sin kx) #s(hole binary64 (* kx (+ 1 (* (pow kx 2) (- (* 1/120 (pow kx 2)) 1/6))))))
#s(approx (sin kx) #s(hole binary64 (* kx (+ 1 (* (pow kx 2) (- (* (pow kx 2) (+ 1/120 (* -1/5040 (pow kx 2)))) 1/6))))))
#s(approx (/ (* (sin th) ky) (fabs (sin kx))) #s(hole binary64 (/ (* ky (sin th)) (fabs (sin kx)))))
#s(approx (fabs (sin kx)) #s(hole binary64 (fabs (sin kx))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (/ (sin ky) (sqrt (pow (sin ky) 2)))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow kx 2) (sin ky)) (pow (sqrt (pow (sin ky) 2)) 3))) (/ (sin ky) (sqrt (pow (sin ky) 2))))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ (* (pow kx 2) (- (* -1 (* (pow kx 2) (+ (* -1/2 (/ (* (sin ky) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2))))) (pow (sqrt (pow (sin ky) 2)) 3))) (* -1/4 (/ (sin ky) (pow (sqrt (pow (sin ky) 2)) 5)))))) (* 1/2 (/ (sin ky) (pow (sqrt (pow (sin ky) 2)) 3))))) (/ (sin ky) (sqrt (pow (sin ky) 2))))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ (* (pow kx 2) (- (* (pow kx 2) (- (* -1 (* (pow kx 2) (+ (* -1/2 (/ (+ (* -1/2 (/ (* (sin ky) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2))))) (pow (sqrt (pow (sin ky) 2)) 3))) (* -1/4 (/ (sin ky) (pow (sqrt (pow (sin ky) 2)) 5)))) (pow (sqrt (pow (sin ky) 2)) 2))) (+ (* 1/4 (/ (* (sin ky) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2))))) (pow (sqrt (pow (sin ky) 2)) 5))) (* 1/2 (/ (* (sin ky) (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2)))) (pow (sqrt (pow (sin ky) 2)) 2))))) (pow (sqrt (pow (sin ky) 2)) 3))))))) (+ (* -1/2 (/ (* (sin ky) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2))))) (pow (sqrt (pow (sin ky) 2)) 3))) (* -1/4 (/ (sin ky) (pow (sqrt (pow (sin ky) 2)) 5)))))) (* 1/2 (/ (sin ky) (pow (sqrt (pow (sin ky) 2)) 3))))) (/ (sin ky) (sqrt (pow (sin ky) 2))))))
#s(approx (* (/ 1 (pow (sin ky) -1)) (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))))) #s(hole binary64 (/ (* (sin ky) (sin th)) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))
#s(approx (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1)))))) #s(hole binary64 (/ (sin th) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) #s(hole binary64 (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
#s(approx (sin kx) #s(hole binary64 (sin kx)))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))
#s(approx (* (/ 1 (pow (sin ky) -1)) (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))))) #s(hole binary64 (/ (* ky (sin th)) (sqrt (pow (sin kx) 2)))))
#s(approx (* (/ 1 (pow (sin ky) -1)) (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))))) #s(hole binary64 (* ky (+ (* (pow ky 2) (- (* -1/6 (/ (sin th) (sqrt (pow (sin kx) 2)))) (* 1/2 (/ (sin th) (pow (sqrt (pow (sin kx) 2)) 3))))) (/ (sin th) (sqrt (pow (sin kx) 2)))))))
#s(approx (* (/ 1 (pow (sin ky) -1)) (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))))) #s(hole binary64 (* ky (+ (* (pow ky 2) (- (+ (* -1/6 (/ (sin th) (sqrt (pow (sin kx) 2)))) (* (pow ky 2) (- (* 1/120 (/ (sin th) (sqrt (pow (sin kx) 2)))) (+ (* -1/2 (/ (* (sin th) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2))))) (pow (sqrt (pow (sin kx) 2)) 3))) (* 1/2 (/ (- (* -1/6 (/ (sin th) (sqrt (pow (sin kx) 2)))) (* 1/2 (/ (sin th) (pow (sqrt (pow (sin kx) 2)) 3)))) (pow (sqrt (pow (sin kx) 2)) 2))))))) (* 1/2 (/ (sin th) (pow (sqrt (pow (sin kx) 2)) 3))))) (/ (sin th) (sqrt (pow (sin kx) 2)))))))
#s(approx (* (/ 1 (pow (sin ky) -1)) (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))))) #s(hole binary64 (* ky (+ (* (pow ky 2) (- (+ (* -1/6 (/ (sin th) (sqrt (pow (sin kx) 2)))) (* (pow ky 2) (- (+ (* 1/120 (/ (sin th) (sqrt (pow (sin kx) 2)))) (* (pow ky 2) (- (* -1/5040 (/ (sin th) (sqrt (pow (sin kx) 2)))) (+ (* -1/2 (/ (* (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2)))) (- (* -1/6 (/ (sin th) (sqrt (pow (sin kx) 2)))) (* 1/2 (/ (sin th) (pow (sqrt (pow (sin kx) 2)) 3))))) (pow (sqrt (pow (sin kx) 2)) 2))) (+ (* 1/2 (/ (* (sin th) (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2)))) (pow (sqrt (pow (sin kx) 2)) 2))))) (pow (sqrt (pow (sin kx) 2)) 3))) (* 1/2 (/ (- (* 1/120 (/ (sin th) (sqrt (pow (sin kx) 2)))) (+ (* -1/2 (/ (* (sin th) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2))))) (pow (sqrt (pow (sin kx) 2)) 3))) (* 1/2 (/ (- (* -1/6 (/ (sin th) (sqrt (pow (sin kx) 2)))) (* 1/2 (/ (sin th) (pow (sqrt (pow (sin kx) 2)) 3)))) (pow (sqrt (pow (sin kx) 2)) 2))))) (pow (sqrt (pow (sin kx) 2)) 2)))))))) (+ (* -1/2 (/ (* (sin th) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2))))) (pow (sqrt (pow (sin kx) 2)) 3))) (* 1/2 (/ (- (* -1/6 (/ (sin th) (sqrt (pow (sin kx) 2)))) (* 1/2 (/ (sin th) (pow (sqrt (pow (sin kx) 2)) 3)))) (pow (sqrt (pow (sin kx) 2)) 2))))))) (* 1/2 (/ (sin th) (pow (sqrt (pow (sin kx) 2)) 3))))) (/ (sin th) (sqrt (pow (sin kx) 2)))))))
#s(approx (/ 1 (pow (sin ky) -1)) #s(hole binary64 ky))
#s(approx (/ 1 (pow (sin ky) -1)) #s(hole binary64 (* ky (+ 1 (* -1/6 (pow ky 2))))))
#s(approx (/ 1 (pow (sin ky) -1)) #s(hole binary64 (* ky (+ 1 (* (pow ky 2) (- (* 1/120 (pow ky 2)) 1/6))))))
#s(approx (/ 1 (pow (sin ky) -1)) #s(hole binary64 (* ky (+ 1 (* (pow ky 2) (- (* (pow ky 2) (+ 1/120 (* -1/5040 (pow ky 2)))) 1/6))))))
#s(approx (pow (sin ky) -1) #s(hole binary64 (/ 1 ky)))
#s(approx (pow (sin ky) -1) #s(hole binary64 (/ (+ 1 (* 1/6 (pow ky 2))) ky)))
#s(approx (pow (sin ky) -1) #s(hole binary64 (/ (+ 1 (* (pow ky 2) (+ 1/6 (* 7/360 (pow ky 2))))) ky)))
#s(approx (pow (sin ky) -1) #s(hole binary64 (/ (+ 1 (* (pow ky 2) (+ 1/6 (* (pow ky 2) (+ 7/360 (* 31/15120 (pow ky 2))))))) ky)))
#s(approx (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1)))))) #s(hole binary64 (/ (sin th) (sqrt (pow (sin kx) 2)))))
#s(approx (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1)))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sqrt (pow (sin kx) 2)) 3))) (/ (sin th) (sqrt (pow (sin kx) 2))))))
#s(approx (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1)))))) #s(hole binary64 (+ (* (pow ky 2) (- (* -1 (* (pow ky 2) (+ (* -1/2 (/ (* (sin th) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2))))) (pow (sqrt (pow (sin kx) 2)) 3))) (* -1/4 (/ (sin th) (pow (sqrt (pow (sin kx) 2)) 5)))))) (* 1/2 (/ (sin th) (pow (sqrt (pow (sin kx) 2)) 3))))) (/ (sin th) (sqrt (pow (sin kx) 2))))))
#s(approx (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1)))))) #s(hole binary64 (+ (* (pow ky 2) (- (* (pow ky 2) (- (* -1 (* (pow ky 2) (+ (* -1/2 (/ (+ (* -1/2 (/ (* (sin th) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2))))) (pow (sqrt (pow (sin kx) 2)) 3))) (* -1/4 (/ (sin th) (pow (sqrt (pow (sin kx) 2)) 5)))) (pow (sqrt (pow (sin kx) 2)) 2))) (+ (* 1/4 (/ (* (sin th) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2))))) (pow (sqrt (pow (sin kx) 2)) 5))) (* 1/2 (/ (* (sin th) (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2)))) (pow (sqrt (pow (sin kx) 2)) 2))))) (pow (sqrt (pow (sin kx) 2)) 3))))))) (+ (* -1/2 (/ (* (sin th) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2))))) (pow (sqrt (pow (sin kx) 2)) 3))) (* -1/4 (/ (sin th) (pow (sqrt (pow (sin kx) 2)) 5)))))) (* 1/2 (/ (sin th) (pow (sqrt (pow (sin kx) 2)) 3))))) (/ (sin th) (sqrt (pow (sin kx) 2))))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) #s(hole binary64 (sqrt (pow (sin kx) 2))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) #s(hole binary64 (+ (sqrt (pow (sin kx) 2)) (* 1/2 (/ (pow ky 2) (sqrt (pow (sin kx) 2)))))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) #s(hole binary64 (+ (sqrt (pow (sin kx) 2)) (* (pow ky 2) (+ (* -1/2 (/ (* (pow ky 2) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2))))) (sqrt (pow (sin kx) 2)))) (* 1/2 (/ 1 (sqrt (pow (sin kx) 2)))))))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) #s(hole binary64 (+ (sqrt (pow (sin kx) 2)) (* (pow ky 2) (+ (* (pow ky 2) (+ (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2)))) (sqrt (pow (sin kx) 2)))) (* 1/2 (/ (* (pow ky 2) (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2)))) (pow (sqrt (pow (sin kx) 2)) 2))))) (sqrt (pow (sin kx) 2)))))) (* 1/2 (/ 1 (sqrt (pow (sin kx) 2)))))))))
#s(approx (* (sin th) ky) #s(hole binary64 (* ky (sin th))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (/ ky (sqrt (pow (sin kx) 2)))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (* ky (+ (* -1 (* (pow ky 2) (+ (* 1/6 (/ 1 (sqrt (pow (sin kx) 2)))) (* 1/2 (/ 1 (pow (sqrt (pow (sin kx) 2)) 3)))))) (/ 1 (sqrt (pow (sin kx) 2)))))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (* ky (+ (* (pow ky 2) (- (* (pow ky 2) (- (* 1/120 (/ 1 (sqrt (pow (sin kx) 2)))) (+ (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2)))) (pow (sqrt (pow (sin kx) 2)) 3))) (* -1/2 (/ (+ (* 1/6 (/ 1 (sqrt (pow (sin kx) 2)))) (* 1/2 (/ 1 (pow (sqrt (pow (sin kx) 2)) 3)))) (pow (sqrt (pow (sin kx) 2)) 2)))))) (+ (* 1/6 (/ 1 (sqrt (pow (sin kx) 2)))) (* 1/2 (/ 1 (pow (sqrt (pow (sin kx) 2)) 3)))))) (/ 1 (sqrt (pow (sin kx) 2)))))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (* ky (+ (* (pow ky 2) (- (* (pow ky 2) (- (+ (* -1 (* (pow ky 2) (+ (* 1/5040 (/ 1 (sqrt (pow (sin kx) 2)))) (+ (* 1/2 (/ (* (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2)))) (+ (* 1/6 (/ 1 (sqrt (pow (sin kx) 2)))) (* 1/2 (/ 1 (pow (sqrt (pow (sin kx) 2)) 3))))) (pow (sqrt (pow (sin kx) 2)) 2))) (+ (* 1/2 (/ (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2)))) (pow (sqrt (pow (sin kx) 2)) 2)))) (pow (sqrt (pow (sin kx) 2)) 3))) (* 1/2 (/ (- (* 1/120 (/ 1 (sqrt (pow (sin kx) 2)))) (+ (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2)))) (pow (sqrt (pow (sin kx) 2)) 3))) (* -1/2 (/ (+ (* 1/6 (/ 1 (sqrt (pow (sin kx) 2)))) (* 1/2 (/ 1 (pow (sqrt (pow (sin kx) 2)) 3)))) (pow (sqrt (pow (sin kx) 2)) 2))))) (pow (sqrt (pow (sin kx) 2)) 2)))))))) (* 1/120 (/ 1 (sqrt (pow (sin kx) 2))))) (+ (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2)))) (pow (sqrt (pow (sin kx) 2)) 3))) (* -1/2 (/ (+ (* 1/6 (/ 1 (sqrt (pow (sin kx) 2)))) (* 1/2 (/ 1 (pow (sqrt (pow (sin kx) 2)) 3)))) (pow (sqrt (pow (sin kx) 2)) 2)))))) (+ (* 1/6 (/ 1 (sqrt (pow (sin kx) 2)))) (* 1/2 (/ 1 (pow (sqrt (pow (sin kx) 2)) 3)))))) (/ 1 (sqrt (pow (sin kx) 2)))))))
#s(approx (fabs (sin ky)) #s(hole binary64 (fabs (sin ky))))
#s(approx (* (log (- 1/2 (* 1/2 (cos (+ ky ky))))) 1/2) #s(hole binary64 (log ky)))
#s(approx (* (log (- 1/2 (* 1/2 (cos (+ ky ky))))) 1/2) #s(hole binary64 (+ (log ky) (* -1/6 (pow ky 2)))))
#s(approx (* (log (- 1/2 (* 1/2 (cos (+ ky ky))))) 1/2) #s(hole binary64 (+ (log ky) (* (pow ky 2) (- (* -1/180 (pow ky 2)) 1/6)))))
#s(approx (* (log (- 1/2 (* 1/2 (cos (+ ky ky))))) 1/2) #s(hole binary64 (+ (log ky) (* (pow ky 2) (- (* (pow ky 2) (- (* -1/2835 (pow ky 2)) 1/180)) 1/6)))))
#s(approx (log (- 1/2 (* 1/2 (cos (+ ky ky))))) #s(hole binary64 (* 2 (log ky))))
#s(approx (log (- 1/2 (* 1/2 (cos (+ ky ky))))) #s(hole binary64 (+ (* -1/3 (pow ky 2)) (* 2 (log ky)))))
#s(approx (log (- 1/2 (* 1/2 (cos (+ ky ky))))) #s(hole binary64 (+ (* 2 (log ky)) (* (pow ky 2) (- (* -1/90 (pow ky 2)) 1/3)))))
#s(approx (log (- 1/2 (* 1/2 (cos (+ ky ky))))) #s(hole binary64 (+ (* 2 (log ky)) (* (pow ky 2) (- (* (pow ky 2) (- (* -2/2835 (pow ky 2)) 1/90)) 1/3)))))
#s(approx (- 1/2 (* 1/2 (cos (+ ky ky)))) #s(hole binary64 (pow ky 2)))
#s(approx (- 1/2 (* 1/2 (cos (+ ky ky)))) #s(hole binary64 (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2))))))
#s(approx (- 1/2 (* 1/2 (cos (+ ky ky)))) #s(hole binary64 (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3))))))
#s(approx (- 1/2 (* 1/2 (cos (+ ky ky)))) #s(hole binary64 (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* (pow ky 2) (+ 2/45 (* -1/315 (pow ky 2)))) 1/3))))))
#s(approx (* 1/2 (cos (+ ky ky))) #s(hole binary64 1/2))
#s(approx (* 1/2 (cos (+ ky ky))) #s(hole binary64 (+ 1/2 (* -1 (pow ky 2)))))
#s(approx (* 1/2 (cos (+ ky ky))) #s(hole binary64 (+ 1/2 (* (pow ky 2) (- (* 1/3 (pow ky 2)) 1)))))
#s(approx (* 1/2 (cos (+ ky ky))) #s(hole binary64 (+ 1/2 (* (pow ky 2) (- (* (pow ky 2) (+ 1/3 (* -2/45 (pow ky 2)))) 1)))))
#s(approx (cos (+ ky ky)) #s(hole binary64 1))
#s(approx (cos (+ ky ky)) #s(hole binary64 (+ 1 (* -2 (pow ky 2)))))
#s(approx (cos (+ ky ky)) #s(hole binary64 (+ 1 (* (pow ky 2) (- (* 2/3 (pow ky 2)) 2)))))
#s(approx (cos (+ ky ky)) #s(hole binary64 (+ 1 (* (pow ky 2) (- (* (pow ky 2) (+ 2/3 (* -4/45 (pow ky 2)))) 2)))))
#s(approx (+ ky ky) #s(hole binary64 (* 2 ky)))
#s(approx (/ 1 (pow (sin ky) -1)) #s(hole binary64 (sin ky)))
#s(approx (pow (sin ky) -1) #s(hole binary64 (/ 1 (sin ky))))
#s(approx (exp (* (log (- 1/2 (* 1/2 (cos (+ ky ky))))) 1/2)) #s(hole binary64 (sqrt (- 1/2 (* 1/2 (cos (* 2 ky)))))))
#s(approx (* (log (- 1/2 (* 1/2 (cos (+ ky ky))))) 1/2) #s(hole binary64 (* 1/2 (log (- 1/2 (* 1/2 (cos (* 2 ky))))))))
#s(approx (log (- 1/2 (* 1/2 (cos (+ ky ky))))) #s(hole binary64 (log (- 1/2 (* 1/2 (cos (* 2 ky)))))))
#s(approx (- 1/2 (* 1/2 (cos (+ ky ky)))) #s(hole binary64 (- 1/2 (* 1/2 (cos (* 2 ky))))))
#s(approx (* 1/2 (cos (+ ky ky))) #s(hole binary64 (* 1/2 (cos (* 2 ky)))))
#s(approx (cos (+ ky ky)) #s(hole binary64 (cos (* 2 ky))))
#s(approx (exp (* (log (- 1/2 (* 1/2 (cos (+ ky ky))))) 1/2)) #s(hole binary64 (sqrt (- 1/2 (* 1/2 (cos (neg (* -2 ky))))))))
#s(approx (* (log (- 1/2 (* 1/2 (cos (+ ky ky))))) 1/2) #s(hole binary64 (* 1/2 (log (- 1/2 (* 1/2 (cos (neg (* -2 ky)))))))))
#s(approx (log (- 1/2 (* 1/2 (cos (+ ky ky))))) #s(hole binary64 (log (- 1/2 (* 1/2 (cos (neg (* -2 ky))))))))
#s(approx (- 1/2 (* 1/2 (cos (+ ky ky)))) #s(hole binary64 (- 1/2 (* 1/2 (cos (neg (* -2 ky)))))))
#s(approx (* 1/2 (cos (+ ky ky))) #s(hole binary64 (* 1/2 (cos (neg (* -2 ky))))))
#s(approx (cos (+ ky ky)) #s(hole binary64 (cos (neg (* -2 ky)))))
#s(approx (* (/ 1 (pow (sin ky) -1)) (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))))) #s(hole binary64 (/ (* th (sin ky)) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))
#s(approx (* (/ 1 (pow (sin ky) -1)) (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))))) #s(hole binary64 (* th (+ (* -1/6 (/ (* (pow th 2) (sin ky)) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))
#s(approx (* (/ 1 (pow (sin ky) -1)) (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))))) #s(hole binary64 (* th (+ (* (pow th 2) (+ (* -1/6 (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 1/120 (/ (* (pow th 2) (sin ky)) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))
#s(approx (* (/ 1 (pow (sin ky) -1)) (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))))) #s(hole binary64 (* th (+ (* (pow th 2) (+ (* -1/6 (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* (pow th 2) (+ (* -1/5040 (/ (* (pow th 2) (sin ky)) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 1/120 (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))
#s(approx (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1)))))) #s(hole binary64 (/ th (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))
#s(approx (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1)))))) #s(hole binary64 (* th (+ (* -1/6 (/ (pow th 2) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (/ 1 (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))
#s(approx (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1)))))) #s(hole binary64 (* th (+ (* (pow th 2) (- (* 1/120 (/ (pow th 2) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 1/6 (/ 1 (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (/ 1 (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))
#s(approx (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1)))))) #s(hole binary64 (* th (+ (* (pow th 2) (- (* (pow th 2) (+ (* -1/5040 (/ (pow th 2) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 1/120 (/ 1 (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (* 1/6 (/ 1 (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (/ 1 (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))
#s(approx (sin th) #s(hole binary64 th))
#s(approx (sin th) #s(hole binary64 (* th (+ 1 (* -1/6 (pow th 2))))))
#s(approx (sin th) #s(hole binary64 (* th (+ 1 (* (pow th 2) (- (* 1/120 (pow th 2)) 1/6))))))
#s(approx (sin th) #s(hole binary64 (* th (+ 1 (* (pow th 2) (- (* (pow th 2) (+ 1/120 (* -1/5040 (pow th 2)))) 1/6))))))
#s(approx (/ (* (sin th) ky) (fabs (sin kx))) #s(hole binary64 (/ (* ky th) (fabs (sin kx)))))
#s(approx (/ (* (sin th) ky) (fabs (sin kx))) #s(hole binary64 (* th (+ (* -1/6 (/ (* ky (pow th 2)) (fabs (sin kx)))) (/ ky (fabs (sin kx)))))))
#s(approx (/ (* (sin th) ky) (fabs (sin kx))) #s(hole binary64 (* th (+ (* (pow th 2) (+ (* -1/6 (/ ky (fabs (sin kx)))) (* 1/120 (/ (* ky (pow th 2)) (fabs (sin kx)))))) (/ ky (fabs (sin kx)))))))
#s(approx (/ (* (sin th) ky) (fabs (sin kx))) #s(hole binary64 (* th (+ (* (pow th 2) (+ (* -1/6 (/ ky (fabs (sin kx)))) (* (pow th 2) (+ (* -1/5040 (/ (* ky (pow th 2)) (fabs (sin kx)))) (* 1/120 (/ ky (fabs (sin kx)))))))) (/ ky (fabs (sin kx)))))))
#s(approx (* (sin th) ky) #s(hole binary64 (* ky th)))
#s(approx (* (sin th) ky) #s(hole binary64 (* th (+ ky (* -1/6 (* ky (pow th 2)))))))
#s(approx (* (sin th) ky) #s(hole binary64 (* th (+ ky (* (pow th 2) (+ (* -1/6 ky) (* 1/120 (* ky (pow th 2)))))))))
#s(approx (* (sin th) ky) #s(hole binary64 (* th (+ ky (* (pow th 2) (+ (* -1/6 ky) (* (pow th 2) (+ (* -1/5040 (* ky (pow th 2))) (* 1/120 ky)))))))))
#s(approx (+ (* (- (* (+ (* (* th th) -1/5040) 1/120) (* th th)) 1/6) (* th th)) 1) #s(hole binary64 (+ 1 (* -1/6 (pow th 2)))))
#s(approx (+ (* (- (* (+ (* (* th th) -1/5040) 1/120) (* th th)) 1/6) (* th th)) 1) #s(hole binary64 (+ 1 (* (pow th 2) (- (* 1/120 (pow th 2)) 1/6)))))
#s(approx (+ (* (- (* (+ (* (* th th) -1/5040) 1/120) (* th th)) 1/6) (* th th)) 1) #s(hole binary64 (+ 1 (* (pow th 2) (- (* (pow th 2) (+ 1/120 (* -1/5040 (pow th 2)))) 1/6)))))
#s(approx (- (* (+ (* (* th th) -1/5040) 1/120) (* th th)) 1/6) #s(hole binary64 -1/6))
#s(approx (- (* (+ (* (* th th) -1/5040) 1/120) (* th th)) 1/6) #s(hole binary64 (- (* 1/120 (pow th 2)) 1/6)))
#s(approx (- (* (+ (* (* th th) -1/5040) 1/120) (* th th)) 1/6) #s(hole binary64 (- (* (pow th 2) (+ 1/120 (* -1/5040 (pow th 2)))) 1/6)))
#s(approx (* (+ (* (* th th) -1/5040) 1/120) (* th th)) #s(hole binary64 (* 1/120 (pow th 2))))
#s(approx (* (+ (* (* th th) -1/5040) 1/120) (* th th)) #s(hole binary64 (* (pow th 2) (+ 1/120 (* -1/5040 (pow th 2))))))
#s(approx (+ (* (* th th) -1/5040) 1/120) #s(hole binary64 1/120))
#s(approx (+ (* (* th th) -1/5040) 1/120) #s(hole binary64 (+ 1/120 (* -1/5040 (pow th 2)))))
#s(approx (* th th) #s(hole binary64 (pow th 2)))
#s(approx (sin th) #s(hole binary64 (sin th)))
#s(approx (* (+ (* (- (* (+ (* (* th th) -1/5040) 1/120) (* th th)) 1/6) (* th th)) 1) th) #s(hole binary64 (* -1/5040 (pow th 7))))
#s(approx (* (+ (* (- (* (+ (* (* th th) -1/5040) 1/120) (* th th)) 1/6) (* th th)) 1) th) #s(hole binary64 (* (pow th 7) (- (* 1/120 (/ 1 (pow th 2))) 1/5040))))
#s(approx (* (+ (* (- (* (+ (* (* th th) -1/5040) 1/120) (* th th)) 1/6) (* th th)) 1) th) #s(hole binary64 (* (pow th 7) (- (* 1/120 (/ 1 (pow th 2))) (+ 1/5040 (/ 1/6 (pow th 4)))))))
#s(approx (* (+ (* (- (* (+ (* (* th th) -1/5040) 1/120) (* th th)) 1/6) (* th th)) 1) th) #s(hole binary64 (* (pow th 7) (- (+ (* 1/120 (/ 1 (pow th 2))) (/ 1 (pow th 6))) (+ 1/5040 (/ 1/6 (pow th 4)))))))
#s(approx (+ (* (- (* (+ (* (* th th) -1/5040) 1/120) (* th th)) 1/6) (* th th)) 1) #s(hole binary64 (* -1/5040 (pow th 6))))
#s(approx (+ (* (- (* (+ (* (* th th) -1/5040) 1/120) (* th th)) 1/6) (* th th)) 1) #s(hole binary64 (* (pow th 6) (- (* 1/120 (/ 1 (pow th 2))) 1/5040))))
#s(approx (+ (* (- (* (+ (* (* th th) -1/5040) 1/120) (* th th)) 1/6) (* th th)) 1) #s(hole binary64 (* (pow th 6) (- (* 1/120 (/ 1 (pow th 2))) (+ 1/5040 (/ 1/6 (pow th 4)))))))
#s(approx (+ (* (- (* (+ (* (* th th) -1/5040) 1/120) (* th th)) 1/6) (* th th)) 1) #s(hole binary64 (* (pow th 6) (- (+ (* 1/120 (/ 1 (pow th 2))) (/ 1 (pow th 6))) (+ 1/5040 (/ 1/6 (pow th 4)))))))
#s(approx (- (* (+ (* (* th th) -1/5040) 1/120) (* th th)) 1/6) #s(hole binary64 (* -1/5040 (pow th 4))))
#s(approx (- (* (+ (* (* th th) -1/5040) 1/120) (* th th)) 1/6) #s(hole binary64 (* (pow th 4) (- (* 1/120 (/ 1 (pow th 2))) 1/5040))))
#s(approx (- (* (+ (* (* th th) -1/5040) 1/120) (* th th)) 1/6) #s(hole binary64 (* (pow th 4) (- (* 1/120 (/ 1 (pow th 2))) (+ 1/5040 (/ 1/6 (pow th 4)))))))
#s(approx (+ (* (* th th) -1/5040) 1/120) #s(hole binary64 (* -1/5040 (pow th 2))))
#s(approx (+ (* (* th th) -1/5040) 1/120) #s(hole binary64 (* (pow th 2) (- (* 1/120 (/ 1 (pow th 2))) 1/5040))))
#s(approx (* (+ (* (- (* (+ (* (* th th) -1/5040) 1/120) (* th th)) 1/6) (* th th)) 1) th) #s(hole binary64 (* -1 (* (pow th 7) (- 1/5040 (* 1/120 (/ 1 (pow th 2))))))))
#s(approx (* (+ (* (- (* (+ (* (* th th) -1/5040) 1/120) (* th th)) 1/6) (* th th)) 1) th) #s(hole binary64 (* -1 (* (pow th 7) (- (+ 1/5040 (/ 1/6 (pow th 4))) (* 1/120 (/ 1 (pow th 2))))))))
#s(approx (* (+ (* (- (* (+ (* (* th th) -1/5040) 1/120) (* th th)) 1/6) (* th th)) 1) th) #s(hole binary64 (* -1 (* (pow th 7) (- (+ 1/5040 (/ 1/6 (pow th 4))) (+ (* 1/120 (/ 1 (pow th 2))) (/ 1 (pow th 6))))))))
Outputs
(*.f64 (/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (sin.f64 ky))
(*.f64 (sin.f64 th) (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))
(*.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (sin.f64 th))
(*.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))
(/.f64 (*.f64 #s(literal 1 binary64) (/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) (/.f64 #s(literal 1 binary64) (sin.f64 ky)))
(/.f64 (*.f64 #s(literal 1 binary64) (sin.f64 th)) (*.f64 (/.f64 #s(literal 1 binary64) (sin.f64 ky)) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))
(/.f64 (neg.f64 (*.f64 (sin.f64 th) (sin.f64 ky))) (neg.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky))))
(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))
(*.f64 (sqrt.f64 (neg.f64 (sin.f64 ky))) (sqrt.f64 (neg.f64 (sin.f64 ky))))
(*.f64 (sqrt.f64 (sin.f64 ky)) (sqrt.f64 (sin.f64 ky)))
(*.f64 (pow.f64 (neg.f64 (sin.f64 ky)) #s(literal 1/2 binary64)) (pow.f64 (neg.f64 (sin.f64 ky)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (sin.f64 ky) #s(literal 1/2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (pow.f64 (sin.f64 ky) #s(literal -1/2 binary64)) #s(literal -1 binary64)) (pow.f64 (pow.f64 (sin.f64 ky) #s(literal -1/2 binary64)) #s(literal -1 binary64)))
(pow.f64 (exp.f64 #s(literal 1/2 binary64)) (*.f64 (log.f64 (sin.f64 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 1/2 binary64))
(pow.f64 (/.f64 #s(literal 1 binary64) (sin.f64 ky)) #s(literal -1 binary64))
(pow.f64 (sin.f64 ky) #s(literal 1 binary64))
(/.f64 (sqrt.f64 (*.f64 (sin.f64 ky) #s(literal 1 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (sin.f64 ky))))
(/.f64 (sqrt.f64 (*.f64 #s(literal 1 binary64) (sin.f64 ky))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (sin.f64 ky))))
(/.f64 (sqrt.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))
(/.f64 (sqrt.f64 (-.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (cos.f64 (+.f64 ky ky)) #s(literal 3 binary64)) #s(literal 1/8 binary64)))) (sqrt.f64 (+.f64 #s(literal 1/4 binary64) (+.f64 (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 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (sin.f64 ky))))
(/.f64 #s(literal 1 binary64) (fabs.f64 (neg.f64 (/.f64 #s(literal 1 binary64) (sin.f64 ky)))))
(/.f64 #s(literal 1 binary64) (fabs.f64 (/.f64 #s(literal 1 binary64) (sin.f64 ky))))
(/.f64 #s(literal 1 binary64) (sqrt.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 binary64) (pow.f64 (/.f64 #s(literal 1 binary64) (sin.f64 ky)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky)))
(sin.f64 ky)
(sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))
(fabs.f64 (neg.f64 (neg.f64 (sin.f64 ky))))
(fabs.f64 (neg.f64 (sin.f64 ky)))
(fabs.f64 (sin.f64 ky))
(exp.f64 (neg.f64 (*.f64 (log.f64 (sin.f64 ky)) #s(literal -1 binary64))))
(exp.f64 (-.f64 #s(literal 0 binary64) (*.f64 (log.f64 (sin.f64 ky)) #s(literal -1 binary64))))
(exp.f64 (/.f64 (*.f64 (log.f64 (sin.f64 ky)) #s(literal 2 binary64)) #s(literal 2 binary64)))
(exp.f64 (*.f64 (*.f64 (log.f64 (sin.f64 ky)) #s(literal -1 binary64)) #s(literal -1 binary64)))
(exp.f64 (*.f64 (log.f64 (sin.f64 ky)) #s(literal 1 binary64)))
(exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(literal -1 binary64)))
(exp.f64 (log.f64 (sin.f64 ky)))
(+.f64 (cosh.f64 (log.f64 (sin.f64 ky))) (sinh.f64 (log.f64 (sin.f64 ky))))
#s(literal 1 binary64)
(*.f64 (fabs.f64 (pow.f64 (sin.f64 ky) #s(literal -1/2 binary64))) (fabs.f64 (pow.f64 (sin.f64 ky) #s(literal -1/2 binary64))))
(*.f64 (neg.f64 (pow.f64 (sin.f64 ky) #s(literal -1/2 binary64))) (neg.f64 (pow.f64 (sin.f64 ky) #s(literal -1/2 binary64))))
(*.f64 (pow.f64 (sin.f64 ky) #s(literal -1/2 binary64)) (pow.f64 (sin.f64 ky) #s(literal -1/2 binary64)))
(pow.f64 (pow.f64 (sin.f64 ky) #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))) #s(literal -1/2 binary64))
(pow.f64 (sin.f64 ky) #s(literal -1 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (sin.f64 ky)))
(/.f64 #s(literal 1 binary64) (sin.f64 ky))
(exp.f64 (-.f64 #s(literal 0 binary64) (log.f64 (sin.f64 ky))))
(exp.f64 (neg.f64 (log.f64 (sin.f64 ky))))
(exp.f64 (*.f64 (log.f64 (sin.f64 ky)) #s(literal -1 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 (sin.f64 ky)) #s(literal -1 binary64))) (sinh.f64 (*.f64 (log.f64 (sin.f64 ky)) #s(literal -1 binary64))))
(*.f64 (sqrt.f64 (neg.f64 (sin.f64 ky))) (sqrt.f64 (neg.f64 (sin.f64 ky))))
(*.f64 (sqrt.f64 (sin.f64 ky)) (sqrt.f64 (sin.f64 ky)))
(*.f64 (pow.f64 (neg.f64 (sin.f64 ky)) #s(literal 1/2 binary64)) (pow.f64 (neg.f64 (sin.f64 ky)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (sin.f64 ky) #s(literal 1/2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (pow.f64 (sin.f64 ky) #s(literal -1/2 binary64)) #s(literal -1 binary64)) (pow.f64 (pow.f64 (sin.f64 ky) #s(literal -1/2 binary64)) #s(literal -1 binary64)))
(pow.f64 (exp.f64 #s(literal 1/2 binary64)) (*.f64 (log.f64 (sin.f64 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 1/2 binary64))
(pow.f64 (/.f64 #s(literal 1 binary64) (sin.f64 ky)) #s(literal -1 binary64))
(pow.f64 (sin.f64 ky) #s(literal 1 binary64))
(/.f64 (sqrt.f64 (*.f64 (sin.f64 ky) #s(literal 1 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (sin.f64 ky))))
(/.f64 (sqrt.f64 (*.f64 #s(literal 1 binary64) (sin.f64 ky))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (sin.f64 ky))))
(/.f64 (sqrt.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))
(/.f64 (sqrt.f64 (-.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (cos.f64 (+.f64 ky ky)) #s(literal 3 binary64)) #s(literal 1/8 binary64)))) (sqrt.f64 (+.f64 #s(literal 1/4 binary64) (+.f64 (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 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (sin.f64 ky))))
(/.f64 #s(literal 1 binary64) (fabs.f64 (neg.f64 (/.f64 #s(literal 1 binary64) (sin.f64 ky)))))
(/.f64 #s(literal 1 binary64) (fabs.f64 (/.f64 #s(literal 1 binary64) (sin.f64 ky))))
(/.f64 #s(literal 1 binary64) (sqrt.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 binary64) (pow.f64 (/.f64 #s(literal 1 binary64) (sin.f64 ky)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky)))
(sin.f64 ky)
(sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))
(fabs.f64 (neg.f64 (neg.f64 (sin.f64 ky))))
(fabs.f64 (neg.f64 (sin.f64 ky)))
(fabs.f64 (sin.f64 ky))
(exp.f64 (neg.f64 (*.f64 (log.f64 (sin.f64 ky)) #s(literal -1 binary64))))
(exp.f64 (-.f64 #s(literal 0 binary64) (*.f64 (log.f64 (sin.f64 ky)) #s(literal -1 binary64))))
(exp.f64 (/.f64 (*.f64 (log.f64 (sin.f64 ky)) #s(literal 2 binary64)) #s(literal 2 binary64)))
(exp.f64 (*.f64 (*.f64 (log.f64 (sin.f64 ky)) #s(literal -1 binary64)) #s(literal -1 binary64)))
(exp.f64 (*.f64 (log.f64 (sin.f64 ky)) #s(literal 1 binary64)))
(exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(literal -1 binary64)))
(exp.f64 (log.f64 (sin.f64 ky)))
(+.f64 (cosh.f64 (log.f64 (sin.f64 ky))) (sinh.f64 (log.f64 (sin.f64 ky))))
ky
#s(literal -1 binary64)
(/.f64 (neg.f64 (sin.f64 th)) (neg.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky))))
(/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))
(sin.f64 th)
th
(pow.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/2 binary64) (cos.f64 (+.f64 kx kx))))) #s(literal 1/2 binary64))
(/.f64 (sqrt.f64 (-.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 (sin.f64 ky) #s(literal 4 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))
(/.f64 (hypot.f64 (pow.f64 (sin.f64 kx) #s(literal 3 binary64)) (pow.f64 (sin.f64 ky) #s(literal 3 binary64))) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (*.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal 2 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))
(sqrt.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/2 binary64) (cos.f64 (+.f64 kx kx))))))
(hypot.f64 (fabs.f64 (fabs.f64 (sin.f64 kx))) (neg.f64 (neg.f64 (sin.f64 ky))))
(hypot.f64 (fabs.f64 (fabs.f64 (sin.f64 kx))) (pow.f64 (neg.f64 (sin.f64 ky)) #s(literal 1 binary64)))
(hypot.f64 (fabs.f64 (fabs.f64 (sin.f64 kx))) (neg.f64 (sin.f64 ky)))
(hypot.f64 (fabs.f64 (fabs.f64 (sin.f64 kx))) (sin.f64 ky))
(hypot.f64 (neg.f64 (neg.f64 (sin.f64 ky))) (fabs.f64 (fabs.f64 (sin.f64 kx))))
(hypot.f64 (neg.f64 (neg.f64 (sin.f64 ky))) (neg.f64 (neg.f64 (sin.f64 kx))))
(hypot.f64 (neg.f64 (neg.f64 (sin.f64 ky))) (exp.f64 (log.f64 (sin.f64 kx))))
(hypot.f64 (neg.f64 (neg.f64 (sin.f64 ky))) (exp.f64 (log.f64 (fabs.f64 (sin.f64 kx)))))
(hypot.f64 (neg.f64 (neg.f64 (sin.f64 ky))) (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1 binary64)))
(hypot.f64 (neg.f64 (neg.f64 (sin.f64 ky))) (neg.f64 (fabs.f64 (sin.f64 kx))))
(hypot.f64 (neg.f64 (neg.f64 (sin.f64 ky))) (neg.f64 (sin.f64 kx)))
(hypot.f64 (neg.f64 (neg.f64 (sin.f64 ky))) (fabs.f64 (sin.f64 kx)))
(hypot.f64 (neg.f64 (neg.f64 (sin.f64 ky))) (sin.f64 kx))
(hypot.f64 (neg.f64 (neg.f64 (sin.f64 kx))) (neg.f64 (neg.f64 (sin.f64 ky))))
(hypot.f64 (neg.f64 (neg.f64 (sin.f64 kx))) (pow.f64 (neg.f64 (sin.f64 ky)) #s(literal 1 binary64)))
(hypot.f64 (neg.f64 (neg.f64 (sin.f64 kx))) (neg.f64 (sin.f64 ky)))
(hypot.f64 (neg.f64 (neg.f64 (sin.f64 kx))) (sin.f64 ky))
(hypot.f64 (exp.f64 (log.f64 (sin.f64 kx))) (neg.f64 (neg.f64 (sin.f64 ky))))
(hypot.f64 (exp.f64 (log.f64 (sin.f64 kx))) (pow.f64 (neg.f64 (sin.f64 ky)) #s(literal 1 binary64)))
(hypot.f64 (exp.f64 (log.f64 (sin.f64 kx))) (neg.f64 (sin.f64 ky)))
(hypot.f64 (exp.f64 (log.f64 (sin.f64 kx))) (sin.f64 ky))
(hypot.f64 (exp.f64 (log.f64 (fabs.f64 (sin.f64 kx)))) (neg.f64 (neg.f64 (sin.f64 ky))))
(hypot.f64 (exp.f64 (log.f64 (fabs.f64 (sin.f64 kx)))) (pow.f64 (neg.f64 (sin.f64 ky)) #s(literal 1 binary64)))
(hypot.f64 (exp.f64 (log.f64 (fabs.f64 (sin.f64 kx)))) (neg.f64 (sin.f64 ky)))
(hypot.f64 (exp.f64 (log.f64 (fabs.f64 (sin.f64 kx)))) (sin.f64 ky))
(hypot.f64 (pow.f64 (neg.f64 (sin.f64 ky)) #s(literal 1 binary64)) (fabs.f64 (fabs.f64 (sin.f64 kx))))
(hypot.f64 (pow.f64 (neg.f64 (sin.f64 ky)) #s(literal 1 binary64)) (neg.f64 (neg.f64 (sin.f64 kx))))
(hypot.f64 (pow.f64 (neg.f64 (sin.f64 ky)) #s(literal 1 binary64)) (exp.f64 (log.f64 (sin.f64 kx))))
(hypot.f64 (pow.f64 (neg.f64 (sin.f64 ky)) #s(literal 1 binary64)) (exp.f64 (log.f64 (fabs.f64 (sin.f64 kx)))))
(hypot.f64 (pow.f64 (neg.f64 (sin.f64 ky)) #s(literal 1 binary64)) (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1 binary64)))
(hypot.f64 (pow.f64 (neg.f64 (sin.f64 ky)) #s(literal 1 binary64)) (neg.f64 (fabs.f64 (sin.f64 kx))))
(hypot.f64 (pow.f64 (neg.f64 (sin.f64 ky)) #s(literal 1 binary64)) (neg.f64 (sin.f64 kx)))
(hypot.f64 (pow.f64 (neg.f64 (sin.f64 ky)) #s(literal 1 binary64)) (fabs.f64 (sin.f64 kx)))
(hypot.f64 (pow.f64 (neg.f64 (sin.f64 ky)) #s(literal 1 binary64)) (sin.f64 kx))
(hypot.f64 (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1 binary64)) (neg.f64 (neg.f64 (sin.f64 ky))))
(hypot.f64 (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1 binary64)) (pow.f64 (neg.f64 (sin.f64 ky)) #s(literal 1 binary64)))
(hypot.f64 (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1 binary64)) (neg.f64 (sin.f64 ky)))
(hypot.f64 (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1 binary64)) (sin.f64 ky))
(hypot.f64 (neg.f64 (fabs.f64 (sin.f64 kx))) (neg.f64 (neg.f64 (sin.f64 ky))))
(hypot.f64 (neg.f64 (fabs.f64 (sin.f64 kx))) (pow.f64 (neg.f64 (sin.f64 ky)) #s(literal 1 binary64)))
(hypot.f64 (neg.f64 (fabs.f64 (sin.f64 kx))) (neg.f64 (sin.f64 ky)))
(hypot.f64 (neg.f64 (fabs.f64 (sin.f64 kx))) (sin.f64 ky))
(hypot.f64 (neg.f64 (sin.f64 kx)) (neg.f64 (neg.f64 (sin.f64 ky))))
(hypot.f64 (neg.f64 (sin.f64 kx)) (pow.f64 (neg.f64 (sin.f64 ky)) #s(literal 1 binary64)))
(hypot.f64 (neg.f64 (sin.f64 kx)) (neg.f64 (sin.f64 ky)))
(hypot.f64 (neg.f64 (sin.f64 kx)) (sin.f64 ky))
(hypot.f64 (neg.f64 (sin.f64 ky)) (fabs.f64 (fabs.f64 (sin.f64 kx))))
(hypot.f64 (neg.f64 (sin.f64 ky)) (neg.f64 (neg.f64 (sin.f64 kx))))
(hypot.f64 (neg.f64 (sin.f64 ky)) (exp.f64 (log.f64 (sin.f64 kx))))
(hypot.f64 (neg.f64 (sin.f64 ky)) (exp.f64 (log.f64 (fabs.f64 (sin.f64 kx)))))
(hypot.f64 (neg.f64 (sin.f64 ky)) (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1 binary64)))
(hypot.f64 (neg.f64 (sin.f64 ky)) (neg.f64 (fabs.f64 (sin.f64 kx))))
(hypot.f64 (neg.f64 (sin.f64 ky)) (neg.f64 (sin.f64 kx)))
(hypot.f64 (neg.f64 (sin.f64 ky)) (fabs.f64 (sin.f64 kx)))
(hypot.f64 (neg.f64 (sin.f64 ky)) (sin.f64 kx))
(hypot.f64 (fabs.f64 (sin.f64 kx)) (neg.f64 (neg.f64 (sin.f64 ky))))
(hypot.f64 (fabs.f64 (sin.f64 kx)) (pow.f64 (neg.f64 (sin.f64 ky)) #s(literal 1 binary64)))
(hypot.f64 (fabs.f64 (sin.f64 kx)) (neg.f64 (sin.f64 ky)))
(hypot.f64 (fabs.f64 (sin.f64 kx)) (sin.f64 ky))
(hypot.f64 (sin.f64 kx) (neg.f64 (neg.f64 (sin.f64 ky))))
(hypot.f64 (sin.f64 kx) (pow.f64 (neg.f64 (sin.f64 ky)) #s(literal 1 binary64)))
(hypot.f64 (sin.f64 kx) (neg.f64 (sin.f64 ky)))
(hypot.f64 (sin.f64 kx) (sin.f64 ky))
(hypot.f64 (sin.f64 ky) (fabs.f64 (fabs.f64 (sin.f64 kx))))
(hypot.f64 (sin.f64 ky) (neg.f64 (neg.f64 (sin.f64 kx))))
(hypot.f64 (sin.f64 ky) (exp.f64 (log.f64 (sin.f64 kx))))
(hypot.f64 (sin.f64 ky) (exp.f64 (log.f64 (fabs.f64 (sin.f64 kx)))))
(hypot.f64 (sin.f64 ky) (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1 binary64)))
(hypot.f64 (sin.f64 ky) (neg.f64 (fabs.f64 (sin.f64 kx))))
(hypot.f64 (sin.f64 ky) (neg.f64 (sin.f64 kx)))
(hypot.f64 (sin.f64 ky) (fabs.f64 (sin.f64 kx)))
(hypot.f64 (sin.f64 ky) (sin.f64 kx))
(exp.f64 (*.f64 (log.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/2 binary64) (cos.f64 (+.f64 kx kx)))))) #s(literal 1/2 binary64)))
(pow.f64 (sin.f64 kx) #s(literal 1 binary64))
(/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 kx) #s(literal -1 binary64)))
(sin.f64 kx)
(exp.f64 (*.f64 (log.f64 (sin.f64 kx)) #s(literal 1 binary64)))
kx
#s(approx (* (/ 1 (pow (sin ky) -1)) (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))))) (/.f64 (*.f64 #s(approx (sin th) th) ky) (fabs.f64 (sin.f64 kx))))
(*.f64 #s(approx (sin th) th) (/.f64 ky (fabs.f64 (sin.f64 kx))))
(/.f64 (neg.f64 (*.f64 #s(approx (sin th) th) ky)) (neg.f64 (fabs.f64 (sin.f64 kx))))
(/.f64 (*.f64 #s(approx (sin th) th) ky) (fabs.f64 (sin.f64 kx)))
(*.f64 #s(approx (sin th) th) ky)
(*.f64 ky #s(approx (sin th) th))
#s(approx (sin th) 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 (sqrt.f64 (sin.f64 kx)) (sqrt.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 (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 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(literal 1/2 binary64))
(pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 1 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 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))
(fabs.f64 (neg.f64 (neg.f64 (sin.f64 kx))))
(fabs.f64 (neg.f64 (sin.f64 kx)))
(fabs.f64 (sin.f64 kx))
(exp.f64 (/.f64 (*.f64 (log.f64 (fabs.f64 (sin.f64 kx))) #s(literal 2 binary64)) #s(literal 2 binary64)))
(exp.f64 (/.f64 (*.f64 (log.f64 (sin.f64 kx)) #s(literal 2 binary64)) #s(literal 2 binary64)))
(exp.f64 (*.f64 (*.f64 (log.f64 (fabs.f64 (sin.f64 kx))) #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(exp.f64 (*.f64 (*.f64 (log.f64 (sin.f64 kx)) #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(exp.f64 (*.f64 (log.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx))))) #s(literal 1/2 binary64)))
(exp.f64 (*.f64 (log.f64 (fabs.f64 (sin.f64 kx))) #s(literal 1 binary64)))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) (sin.f64 ky))) #s(approx (sin th) th))
(*.f64 #s(approx (sin th) th) (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) (sin.f64 ky))))
(/.f64 (*.f64 (sin.f64 ky) #s(approx (sin th) th)) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) (sin.f64 ky)))
(/.f64 (neg.f64 (sin.f64 ky)) (neg.f64 #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) (sin.f64 ky))))
(/.f64 (sin.f64 ky) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) (sin.f64 ky)))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) (sin.f64 ky))
(*.f64 (sqrt.f64 (neg.f64 (sin.f64 ky))) (sqrt.f64 (neg.f64 (sin.f64 ky))))
(*.f64 (sqrt.f64 (sin.f64 ky)) (sqrt.f64 (sin.f64 ky)))
(*.f64 (pow.f64 (neg.f64 (sin.f64 ky)) #s(literal 1/2 binary64)) (pow.f64 (neg.f64 (sin.f64 ky)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (sin.f64 ky) #s(literal 1/2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (pow.f64 (sin.f64 ky) #s(literal -1/2 binary64)) #s(literal -1 binary64)) (pow.f64 (pow.f64 (sin.f64 ky) #s(literal -1/2 binary64)) #s(literal -1 binary64)))
(pow.f64 (exp.f64 #s(literal 1/2 binary64)) (*.f64 (log.f64 (sin.f64 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 1/2 binary64))
(pow.f64 (/.f64 #s(literal 1 binary64) (sin.f64 ky)) #s(literal -1 binary64))
(pow.f64 (sin.f64 ky) #s(literal 1 binary64))
(/.f64 (sqrt.f64 (*.f64 (sin.f64 ky) #s(literal 1 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (sin.f64 ky))))
(/.f64 (sqrt.f64 (*.f64 #s(literal 1 binary64) (sin.f64 ky))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (sin.f64 ky))))
(/.f64 (sqrt.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))
(/.f64 (sqrt.f64 (-.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (cos.f64 (+.f64 ky ky)) #s(literal 3 binary64)) #s(literal 1/8 binary64)))) (sqrt.f64 (+.f64 #s(literal 1/4 binary64) (+.f64 (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 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (sin.f64 ky))))
(/.f64 #s(literal 1 binary64) (fabs.f64 (neg.f64 (/.f64 #s(literal 1 binary64) (sin.f64 ky)))))
(/.f64 #s(literal 1 binary64) (fabs.f64 (/.f64 #s(literal 1 binary64) (sin.f64 ky))))
(/.f64 #s(literal 1 binary64) (sqrt.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 binary64) (pow.f64 (/.f64 #s(literal 1 binary64) (sin.f64 ky)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky)))
(sin.f64 ky)
(sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))
(fabs.f64 (neg.f64 (neg.f64 (sin.f64 ky))))
(fabs.f64 (neg.f64 (sin.f64 ky)))
(fabs.f64 (sin.f64 ky))
(exp.f64 (neg.f64 (*.f64 (log.f64 (sin.f64 ky)) #s(literal -1 binary64))))
(exp.f64 (-.f64 #s(literal 0 binary64) (*.f64 (log.f64 (sin.f64 ky)) #s(literal -1 binary64))))
(exp.f64 (/.f64 (*.f64 (log.f64 (sin.f64 ky)) #s(literal 2 binary64)) #s(literal 2 binary64)))
(exp.f64 (*.f64 (*.f64 (log.f64 (sin.f64 ky)) #s(literal -1 binary64)) #s(literal -1 binary64)))
(exp.f64 (*.f64 (log.f64 (sin.f64 ky)) #s(literal 1 binary64)))
(exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(literal -1 binary64)))
(exp.f64 (log.f64 (sin.f64 ky)))
(+.f64 (cosh.f64 (log.f64 (sin.f64 ky))) (sinh.f64 (log.f64 (sin.f64 ky))))
(*.f64 #s(approx (sin th) (*.f64 (fma.f64 (*.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) th) th) #s(literal 1/6 binary64)) th) th #s(literal 1 binary64)) th)) (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) (sin.f64 ky))))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) (sin.f64 ky))) #s(approx (sin th) (*.f64 (fma.f64 (*.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) th) th) #s(literal 1/6 binary64)) th) th #s(literal 1 binary64)) th)))
(/.f64 (*.f64 (sin.f64 ky) #s(approx (sin th) (*.f64 (fma.f64 (*.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) th) th) #s(literal 1/6 binary64)) th) th #s(literal 1 binary64)) th))) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) (sin.f64 ky)))
#s(approx (sin th) (*.f64 (fma.f64 (*.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) th) th) #s(literal 1/6 binary64)) th) th #s(literal 1 binary64)) th))
(*.f64 (fma.f64 (*.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) th) th) #s(literal 1/6 binary64)) th) th #s(literal 1 binary64)) th)
(*.f64 th (fma.f64 (*.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) th) th) #s(literal 1/6 binary64)) th) th #s(literal 1 binary64)))
(fma.f64 th #s(literal 1 binary64) (*.f64 th (*.f64 (*.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) th) th) #s(literal 1/6 binary64)) th) th)))
(fma.f64 #s(literal 1 binary64) th (*.f64 (*.f64 (*.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) th) th) #s(literal 1/6 binary64)) th) th) th))
(+.f64 (*.f64 th #s(literal 1 binary64)) (*.f64 th (*.f64 (*.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) th) th) #s(literal 1/6 binary64)) th) th)))
(+.f64 (*.f64 #s(literal 1 binary64) th) (*.f64 (*.f64 (*.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) th) th) #s(literal 1/6 binary64)) th) th) th))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) th) th) #s(literal 1/6 binary64)) th) th) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (*.f64 (*.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) th) th) #s(literal 1/6 binary64)) th) th) #s(literal 1 binary64)))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (*.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) th) th) #s(literal 1/6 binary64)) th) th) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) th) th) #s(literal 1/6 binary64)) th) th)))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) th) th) #s(literal 1/6 binary64)) th) th) #s(literal 3 binary64)) #s(literal 1 binary64)) (+.f64 (pow.f64 (*.f64 (*.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) th) th) #s(literal 1/6 binary64)) th) th) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) th) th) #s(literal 1/6 binary64)) th) th) #s(literal 1 binary64)))))
(/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (*.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) th) th) #s(literal 1/6 binary64)) th) th) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (*.f64 (*.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) th) th) #s(literal 1/6 binary64)) th) th) #s(literal 2 binary64)) (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) th) th) #s(literal 1/6 binary64)) th) th)))))
(fma.f64 (*.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) th) th) #s(literal 1/6 binary64)) th) th #s(literal 1 binary64))
(fma.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) th) th) #s(literal 1/6 binary64)) (*.f64 th th) #s(literal 1 binary64))
(fma.f64 (*.f64 th th) (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) th) th) #s(literal 1/6 binary64)) #s(literal 1 binary64))
(-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (*.f64 th th)) (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) th) th) #s(literal 1/6 binary64))))
(+.f64 (*.f64 (*.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) th) th) #s(literal 1/6 binary64)) th) th) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) th) th) #s(literal 1/6 binary64)) th) th))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) th) th) #s(literal 2 binary64)) #s(literal 1/36 binary64)) (fma.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (*.f64 th th) #s(literal 1/6 binary64)))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) th) th) #s(literal 3 binary64)) #s(literal 1/216 binary64)) (+.f64 (pow.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) th) th) #s(literal 2 binary64)) (+.f64 #s(literal 1/36 binary64) (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) th) th) #s(literal 1/6 binary64)))))
(-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) th) th) #s(literal 1/6 binary64))
(*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) th) th)
(*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (*.f64 th th))
(*.f64 (*.f64 th th) (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)))
(fma.f64 (*.f64 th th) #s(literal 1/120 binary64) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) #s(literal -1/5040 binary64))))
(fma.f64 (*.f64 th th) #s(literal 1/120 binary64) (*.f64 (*.f64 (*.f64 th th) #s(literal -1/5040 binary64)) (*.f64 th th)))
(fma.f64 #s(literal 1/120 binary64) (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) #s(literal -1/5040 binary64))))
(fma.f64 #s(literal 1/120 binary64) (*.f64 th th) (*.f64 (*.f64 (*.f64 th th) #s(literal -1/5040 binary64)) (*.f64 th th)))
(+.f64 (*.f64 (*.f64 th th) #s(literal 1/120 binary64)) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) #s(literal -1/5040 binary64))))
(+.f64 (*.f64 (*.f64 th th) #s(literal 1/120 binary64)) (*.f64 (*.f64 (*.f64 th th) #s(literal -1/5040 binary64)) (*.f64 th th)))
(/.f64 (-.f64 #s(literal 1/14400 binary64) (*.f64 (*.f64 (*.f64 th th) #s(literal -1/5040 binary64)) (*.f64 (*.f64 th th) #s(literal -1/5040 binary64)))) (-.f64 #s(literal 1/120 binary64) (*.f64 (*.f64 th th) #s(literal -1/5040 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 th th) #s(literal -1/5040 binary64)) (*.f64 (*.f64 th th) #s(literal -1/5040 binary64))) #s(literal 1/14400 binary64)) (-.f64 (*.f64 (*.f64 th th) #s(literal -1/5040 binary64)) #s(literal 1/120 binary64)))
(/.f64 (+.f64 #s(literal 1/1728000 binary64) (*.f64 (*.f64 (*.f64 (*.f64 th th) th) (*.f64 (*.f64 th th) th)) #s(literal -1/128024064000 binary64))) (+.f64 #s(literal 1/14400 binary64) (-.f64 (*.f64 (*.f64 (*.f64 th th) #s(literal -1/5040 binary64)) (*.f64 (*.f64 th th) #s(literal -1/5040 binary64))) (*.f64 #s(literal 1/120 binary64) (*.f64 (*.f64 th th) #s(literal -1/5040 binary64))))))
(/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 th th) th) (*.f64 (*.f64 th th) th)) #s(literal -1/128024064000 binary64) #s(literal 1/1728000 binary64)) (fma.f64 (*.f64 (*.f64 th th) #s(literal -1/5040 binary64)) (*.f64 (*.f64 th th) #s(literal -1/5040 binary64)) (-.f64 #s(literal 1/14400 binary64) (*.f64 (*.f64 (*.f64 th th) #s(literal -1/5040 binary64)) #s(literal 1/120 binary64)))))
(fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64))
(fma.f64 #s(literal -1/5040 binary64) (*.f64 th th) #s(literal 1/120 binary64))
(fma.f64 th (*.f64 th #s(literal -1/5040 binary64)) #s(literal 1/120 binary64))
(-.f64 #s(literal 1/120 binary64) (*.f64 #s(literal 1/5040 binary64) (*.f64 th th)))
(+.f64 (*.f64 (*.f64 th th) #s(literal -1/5040 binary64)) #s(literal 1/120 binary64))
(+.f64 #s(literal 1/120 binary64) (*.f64 (*.f64 th th) #s(literal -1/5040 binary64)))
(*.f64 (fabs.f64 (fabs.f64 th)) (fabs.f64 (fabs.f64 th)))
(*.f64 (neg.f64 (fabs.f64 th)) (neg.f64 (fabs.f64 th)))
(*.f64 (neg.f64 (neg.f64 th)) (neg.f64 (neg.f64 th)))
(*.f64 (exp.f64 (log.f64 th)) (exp.f64 (log.f64 th)))
(*.f64 (fabs.f64 th) (fabs.f64 th))
(*.f64 (neg.f64 th) (neg.f64 th))
(*.f64 th th)
(pow.f64 (exp.f64 (log.f64 th)) #s(literal 2 binary64))
(pow.f64 (fabs.f64 th) #s(literal 2 binary64))
(pow.f64 (neg.f64 th) #s(literal 2 binary64))
(pow.f64 (*.f64 th th) #s(literal 1 binary64))
(pow.f64 th #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 th th)))
(fabs.f64 (*.f64 th th))
(exp.f64 (*.f64 (log.f64 th) #s(literal 2 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 th) #s(literal 2 binary64))) (sinh.f64 (*.f64 (log.f64 th) #s(literal 2 binary64))))
#s(literal -1/5040 binary64)
#s(literal 1/120 binary64)
#s(literal 1/6 binary64)
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) (sin.f64 ky))) (sin.f64 th))
(*.f64 (sin.f64 th) (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) (sin.f64 ky))))
(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) (sin.f64 ky)))
(/.f64 (neg.f64 (sin.f64 ky)) (neg.f64 #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) (sin.f64 ky))))
(/.f64 (sin.f64 ky) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) (sin.f64 ky)))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) (sin.f64 ky))
(*.f64 (sqrt.f64 (neg.f64 (sin.f64 ky))) (sqrt.f64 (neg.f64 (sin.f64 ky))))
(*.f64 (sqrt.f64 (sin.f64 ky)) (sqrt.f64 (sin.f64 ky)))
(*.f64 (pow.f64 (neg.f64 (sin.f64 ky)) #s(literal 1/2 binary64)) (pow.f64 (neg.f64 (sin.f64 ky)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (sin.f64 ky) #s(literal 1/2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (pow.f64 (sin.f64 ky) #s(literal -1/2 binary64)) #s(literal -1 binary64)) (pow.f64 (pow.f64 (sin.f64 ky) #s(literal -1/2 binary64)) #s(literal -1 binary64)))
(pow.f64 (exp.f64 #s(literal 1/2 binary64)) (*.f64 (log.f64 (sin.f64 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 1/2 binary64))
(pow.f64 (/.f64 #s(literal 1 binary64) (sin.f64 ky)) #s(literal -1 binary64))
(pow.f64 (sin.f64 ky) #s(literal 1 binary64))
(/.f64 (sqrt.f64 (*.f64 (sin.f64 ky) #s(literal 1 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (sin.f64 ky))))
(/.f64 (sqrt.f64 (*.f64 #s(literal 1 binary64) (sin.f64 ky))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (sin.f64 ky))))
(/.f64 (sqrt.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))
(/.f64 (sqrt.f64 (-.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (cos.f64 (+.f64 ky ky)) #s(literal 3 binary64)) #s(literal 1/8 binary64)))) (sqrt.f64 (+.f64 #s(literal 1/4 binary64) (+.f64 (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 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (sin.f64 ky))))
(/.f64 #s(literal 1 binary64) (fabs.f64 (neg.f64 (/.f64 #s(literal 1 binary64) (sin.f64 ky)))))
(/.f64 #s(literal 1 binary64) (fabs.f64 (/.f64 #s(literal 1 binary64) (sin.f64 ky))))
(/.f64 #s(literal 1 binary64) (sqrt.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 binary64) (pow.f64 (/.f64 #s(literal 1 binary64) (sin.f64 ky)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky)))
(sin.f64 ky)
(sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))
(fabs.f64 (neg.f64 (neg.f64 (sin.f64 ky))))
(fabs.f64 (neg.f64 (sin.f64 ky)))
(fabs.f64 (sin.f64 ky))
(exp.f64 (neg.f64 (*.f64 (log.f64 (sin.f64 ky)) #s(literal -1 binary64))))
(exp.f64 (-.f64 #s(literal 0 binary64) (*.f64 (log.f64 (sin.f64 ky)) #s(literal -1 binary64))))
(exp.f64 (/.f64 (*.f64 (log.f64 (sin.f64 ky)) #s(literal 2 binary64)) #s(literal 2 binary64)))
(exp.f64 (*.f64 (*.f64 (log.f64 (sin.f64 ky)) #s(literal -1 binary64)) #s(literal -1 binary64)))
(exp.f64 (*.f64 (log.f64 (sin.f64 ky)) #s(literal 1 binary64)))
(exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(literal -1 binary64)))
(exp.f64 (log.f64 (sin.f64 ky)))
(+.f64 (cosh.f64 (log.f64 (sin.f64 ky))) (sinh.f64 (log.f64 (sin.f64 ky))))
(*.f64 (*.f64 (log.f64 (sin.f64 ky)) #s(literal 2 binary64)) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sin.f64 ky)) #s(literal 2 binary64)))
(log.f64 (sin.f64 ky))
(*.f64 (log.f64 (sin.f64 ky)) #s(literal 2 binary64))
(*.f64 #s(literal 2 binary64) (log.f64 (sin.f64 ky)))
(neg.f64 (log.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))
(fma.f64 (*.f64 (log.f64 (sin.f64 ky)) #s(literal 2 binary64)) #s(literal 1/2 binary64) (log.f64 (sin.f64 ky)))
(fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sin.f64 ky)) #s(literal 2 binary64)) (log.f64 (sin.f64 ky)))
(-.f64 (log.f64 (*.f64 (sin.f64 ky) #s(literal 1 binary64))) (log.f64 (/.f64 #s(literal 1 binary64) (sin.f64 ky))))
(-.f64 (log.f64 (*.f64 #s(literal 1 binary64) (sin.f64 ky))) (log.f64 (/.f64 #s(literal 1 binary64) (sin.f64 ky))))
(-.f64 (log.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) #s(literal 2 binary64)))) (log.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))
(-.f64 (log.f64 (-.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (cos.f64 (+.f64 ky ky)) #s(literal 3 binary64)) #s(literal 1/8 binary64)))) (log.f64 (+.f64 #s(literal 1/4 binary64) (+.f64 (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 #s(literal 0 binary64) (log.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))
(+.f64 (log.f64 (neg.f64 (sin.f64 ky))) (log.f64 (neg.f64 (sin.f64 ky))))
(+.f64 (log.f64 (sin.f64 ky)) (log.f64 (sin.f64 ky)))
(log.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))
(*.f64 (neg.f64 (neg.f64 (sin.f64 ky))) (neg.f64 (neg.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 (neg.f64 (sin.f64 ky)) (neg.f64 (sin.f64 ky)))
(*.f64 (sin.f64 ky) (sin.f64 ky))
(pow.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) #s(literal 1/2 binary64))
(pow.f64 (neg.f64 (sin.f64 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 1 binary64))
(pow.f64 (/.f64 #s(literal 1 binary64) (-.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 binary64) (sin.f64 ky)) #s(literal -2 binary64))
(pow.f64 (sin.f64 ky) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 ky ky)) (cos.f64 (+.f64 ky ky))) #s(literal 2 binary64))
(/.f64 (*.f64 (sin.f64 ky) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (sin.f64 ky)))
(/.f64 (*.f64 #s(literal 1 binary64) (sin.f64 ky)) (/.f64 #s(literal 1 binary64) (sin.f64 ky)))
(/.f64 (-.f64 #s(literal 1/4 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 #s(literal 1/8 binary64) (*.f64 (pow.f64 (cos.f64 (+.f64 ky ky)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (+.f64 #s(literal 1/4 binary64) (+.f64 (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 #s(literal 1 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 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))
(sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)))
(fabs.f64 (*.f64 (neg.f64 (sin.f64 ky)) (sin.f64 ky)))
(fabs.f64 (*.f64 (sin.f64 ky) (neg.f64 (sin.f64 ky))))
(fabs.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))
(exp.f64 (*.f64 (*.f64 (log.f64 (sin.f64 ky)) #s(literal 2 binary64)) #s(literal 1 binary64)))
(exp.f64 (*.f64 (log.f64 (sin.f64 ky)) #s(literal 2 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 (sin.f64 ky)) #s(literal 2 binary64))) (sinh.f64 (*.f64 (log.f64 (sin.f64 ky)) #s(literal 2 binary64))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky))))
#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)))
(sin.f64 (+.f64 (neg.f64 (+.f64 ky ky)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (fma.f64 #s(literal -2 binary64) ky (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (fma.f64 #s(literal 2 binary64) ky (/.f64 (PI.f64) #s(literal 2 binary64))))
(fma.f64 (sin.f64 (+.f64 ky ky)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (+.f64 ky ky)) (sin.f64 (/.f64 (PI.f64) #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))))
(cos.f64 (neg.f64 (neg.f64 (+.f64 ky ky))))
(cos.f64 (neg.f64 (+.f64 ky ky)))
(cos.f64 (*.f64 #s(literal -2 binary64) ky))
(cos.f64 (+.f64 ky ky))
(+.f64 (*.f64 (sin.f64 (+.f64 ky ky)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 (+.f64 ky ky)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(*.f64 #s(literal -2 binary64) (neg.f64 ky))
(*.f64 #s(literal 2 binary64) ky)
(*.f64 ky #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 ky ky) (*.f64 ky ky)) (-.f64 ky ky))
(/.f64 (fma.f64 (*.f64 ky ky) ky (*.f64 (*.f64 ky ky) ky)) (fma.f64 ky ky (-.f64 (*.f64 ky ky) (*.f64 ky ky))))
(neg.f64 (*.f64 #s(literal -2 binary64) ky))
(+.f64 ky ky)
#s(approx (* (/ 1 (pow (sin ky) -1)) (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))))) (/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (sin.f64 ky)))
#s(approx (* (/ 1 (pow (sin ky) -1)) (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))))) (fma.f64 (/.f64 (*.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (*.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 3 binary64))) #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (sin.f64 ky))))
#s(approx (* (/ 1 (pow (sin ky) -1)) (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))))) (fma.f64 (-.f64 (neg.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) #s(literal 1/3 binary64)) (sin.f64 th)) (sin.f64 ky)) (pow.f64 (sin.f64 ky) #s(literal 3 binary64))) #s(literal -1/2 binary64) (*.f64 (*.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 ky) #s(literal 5 binary64)))) #s(literal -1/4 binary64))) (*.f64 kx kx))) (*.f64 (*.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 ky) #s(literal 3 binary64)))) #s(literal 1/2 binary64))) (*.f64 kx kx) (/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (sin.f64 ky))))
#s(approx (* (/ 1 (pow (sin ky) -1)) (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))))) (fma.f64 (fma.f64 (-.f64 (neg.f64 (*.f64 (*.f64 kx kx) (fma.f64 (/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) #s(literal 1/3 binary64)) (sin.f64 th)) (sin.f64 ky)) (pow.f64 (sin.f64 ky) #s(literal 3 binary64))) #s(literal -1/2 binary64) (*.f64 (*.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 ky) #s(literal 5 binary64)))) #s(literal -1/4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) #s(literal -1/2 binary64) (fma.f64 (*.f64 (sin.f64 ky) (*.f64 (sin.f64 th) (/.f64 (-.f64 #s(literal 2/45 binary64) (*.f64 (/.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) #s(literal 1/3 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) #s(literal -1/2 binary64))) (pow.f64 (sin.f64 ky) #s(literal 3 binary64))))) #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) #s(literal 1/3 binary64)) (sin.f64 th)) (sin.f64 ky)) (pow.f64 (sin.f64 ky) #s(literal 5 binary64))) #s(literal 1/4 binary64)))))) (fma.f64 (/.f64 (*.f64 (*.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) #s(literal 1/3 binary64)) (sin.f64 th)) (sin.f64 ky)) (pow.f64 (sin.f64 ky) #s(literal 3 binary64))) #s(literal -1/2 binary64) (*.f64 (*.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 ky) #s(literal 5 binary64)))) #s(literal -1/4 binary64)))) (*.f64 kx kx) (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 ky) #s(literal 3 binary64)))))) (*.f64 kx kx) (/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (sin.f64 ky))))
#s(approx (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1)))))) (/.f64 (sin.f64 th) (sin.f64 ky)))
#s(approx (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1)))))) (fma.f64 (/.f64 (*.f64 (*.f64 kx kx) (sin.f64 th)) (pow.f64 (sin.f64 ky) #s(literal 3 binary64))) #s(literal -1/2 binary64) (/.f64 (sin.f64 th) (sin.f64 ky))))
#s(approx (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1)))))) (fma.f64 (-.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 th) (/.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) #s(literal 1/3 binary64)) (pow.f64 (sin.f64 ky) #s(literal 3 binary64)))) #s(literal -1/2 binary64) (/.f64 (*.f64 #s(literal -1/4 binary64) (sin.f64 th)) (pow.f64 (sin.f64 ky) #s(literal 5 binary64)))) (*.f64 kx kx))) (/.f64 (*.f64 #s(literal 1/2 binary64) (sin.f64 th)) (pow.f64 (sin.f64 ky) #s(literal 3 binary64)))) (*.f64 kx kx) (/.f64 (sin.f64 th) (sin.f64 ky))))
#s(approx (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1)))))) (fma.f64 (fma.f64 (-.f64 (neg.f64 (*.f64 (*.f64 kx kx) (fma.f64 (/.f64 (fma.f64 (*.f64 (sin.f64 th) (/.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) #s(literal 1/3 binary64)) (pow.f64 (sin.f64 ky) #s(literal 3 binary64)))) #s(literal -1/2 binary64) (/.f64 (*.f64 #s(literal -1/4 binary64) (sin.f64 th)) (pow.f64 (sin.f64 ky) #s(literal 5 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) #s(literal -1/2 binary64) (fma.f64 (*.f64 (sin.f64 th) (/.f64 (-.f64 #s(literal 2/45 binary64) (*.f64 (/.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) #s(literal 1/3 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) #s(literal -1/2 binary64))) (pow.f64 (sin.f64 ky) #s(literal 3 binary64)))) #s(literal 1/2 binary64) (*.f64 (*.f64 (sin.f64 th) (/.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) #s(literal 1/3 binary64)) (pow.f64 (sin.f64 ky) #s(literal 5 binary64)))) #s(literal 1/4 binary64)))))) (fma.f64 (*.f64 (sin.f64 th) (/.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) #s(literal 1/3 binary64)) (pow.f64 (sin.f64 ky) #s(literal 3 binary64)))) #s(literal -1/2 binary64) (/.f64 (*.f64 #s(literal -1/4 binary64) (sin.f64 th)) (pow.f64 (sin.f64 ky) #s(literal 5 binary64))))) (*.f64 kx kx) (*.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 ky) #s(literal 3 binary64))))) (*.f64 kx kx) (/.f64 (sin.f64 th) (sin.f64 ky))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) (sin.f64 ky))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) (fma.f64 (/.f64 (*.f64 kx kx) (sin.f64 ky)) #s(literal 1/2 binary64) (sin.f64 ky)))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 kx kx) (/.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) #s(literal 1/3 binary64)) (sin.f64 ky))) (/.f64 #s(literal 1/2 binary64) (sin.f64 ky))) (*.f64 kx kx) (sin.f64 ky)))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) (fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 kx kx) (/.f64 (-.f64 #s(literal 2/45 binary64) (*.f64 (/.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) #s(literal 1/3 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) #s(literal -1/2 binary64))) (sin.f64 ky))) #s(literal 1/2 binary64) (*.f64 (/.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) #s(literal 1/3 binary64)) (sin.f64 ky)) #s(literal -1/2 binary64))) (*.f64 kx kx) (/.f64 #s(literal 1/2 binary64) (sin.f64 ky))) (*.f64 kx kx) (sin.f64 ky)))
#s(approx (sin kx) kx)
#s(approx (sin kx) (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 kx kx) #s(literal 1 binary64)) kx))
#s(approx (sin kx) (*.f64 (fma.f64 (-.f64 (*.f64 (*.f64 kx kx) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) kx))
#s(approx (sin kx) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (*.f64 kx kx)) #s(literal 1/6 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) kx))
#s(approx (/ (* (sin th) ky) (fabs (sin kx))) (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 (sin.f64 kx))))
#s(approx (fabs (sin kx)) (fabs.f64 (sin.f64 kx)))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 (sin.f64 ky) (sin.f64 ky)))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 (/.f64 (*.f64 (*.f64 kx kx) (sin.f64 ky)) (pow.f64 (sin.f64 ky) #s(literal 3 binary64))) #s(literal -1/2 binary64) (/.f64 (sin.f64 ky) (sin.f64 ky))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 (-.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 ky) (/.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) #s(literal 1/3 binary64)) (pow.f64 (sin.f64 ky) #s(literal 3 binary64)))) #s(literal -1/2 binary64) (/.f64 (*.f64 #s(literal -1/4 binary64) (sin.f64 ky)) (pow.f64 (sin.f64 ky) #s(literal 5 binary64)))) (*.f64 kx kx))) (/.f64 (*.f64 #s(literal 1/2 binary64) (sin.f64 ky)) (pow.f64 (sin.f64 ky) #s(literal 3 binary64)))) (*.f64 kx kx) (/.f64 (sin.f64 ky) (sin.f64 ky))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 (fma.f64 (-.f64 (neg.f64 (*.f64 (*.f64 kx kx) (fma.f64 (/.f64 (fma.f64 (*.f64 (sin.f64 ky) (/.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) #s(literal 1/3 binary64)) (pow.f64 (sin.f64 ky) #s(literal 3 binary64)))) #s(literal -1/2 binary64) (/.f64 (*.f64 #s(literal -1/4 binary64) (sin.f64 ky)) (pow.f64 (sin.f64 ky) #s(literal 5 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) #s(literal -1/2 binary64) (fma.f64 (*.f64 (sin.f64 ky) (/.f64 (-.f64 #s(literal 2/45 binary64) (*.f64 (/.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) #s(literal 1/3 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) #s(literal -1/2 binary64))) (pow.f64 (sin.f64 ky) #s(literal 3 binary64)))) #s(literal 1/2 binary64) (*.f64 (*.f64 (sin.f64 ky) (/.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) #s(literal 1/3 binary64)) (pow.f64 (sin.f64 ky) #s(literal 5 binary64)))) #s(literal 1/4 binary64)))))) (fma.f64 (*.f64 (sin.f64 ky) (/.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) #s(literal 1/3 binary64)) (pow.f64 (sin.f64 ky) #s(literal 3 binary64)))) #s(literal -1/2 binary64) (/.f64 (*.f64 #s(literal -1/4 binary64) (sin.f64 ky)) (pow.f64 (sin.f64 ky) #s(literal 5 binary64))))) (*.f64 kx kx) (*.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 ky) (pow.f64 (sin.f64 ky) #s(literal 3 binary64))))) (*.f64 kx kx) (/.f64 (sin.f64 ky) (sin.f64 ky))))
#s(approx (* (/ 1 (pow (sin ky) -1)) (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))))) (*.f64 (/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (sin.f64 ky)))
#s(approx (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1)))))) (/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))
#s(approx (sin kx) (sin.f64 kx))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))
#s(approx (* (/ 1 (pow (sin ky) -1)) (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))))) (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 (sin.f64 kx))))
#s(approx (* (/ 1 (pow (sin ky) -1)) (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))))) (*.f64 (fma.f64 (fma.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx))) (*.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 3 binary64))))) (*.f64 ky ky) (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx)))) ky))
#s(approx (* (/ 1 (pow (sin ky) -1)) (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))))) (*.f64 (fma.f64 (-.f64 (fma.f64 (-.f64 (/.f64 (*.f64 #s(literal 1/120 binary64) (sin.f64 th)) (fabs.f64 (sin.f64 kx))) (fma.f64 (/.f64 (*.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx))))) #s(literal 1/3 binary64)) (sin.f64 th)) (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 3 binary64))) #s(literal -1/2 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx))) (*.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 3 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx))))) #s(literal 1/2 binary64)))) (*.f64 ky ky) (/.f64 (*.f64 #s(literal -1/6 binary64) (sin.f64 th)) (fabs.f64 (sin.f64 kx)))) (*.f64 (/.f64 (sin.f64 th) (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 3 binary64))) #s(literal 1/2 binary64))) (*.f64 ky ky) (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx)))) ky))
#s(approx (* (/ 1 (pow (sin ky) -1)) (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))))) (*.f64 (fma.f64 (-.f64 (fma.f64 (-.f64 (fma.f64 (-.f64 (/.f64 (*.f64 #s(literal -1/5040 binary64) (sin.f64 th)) (fabs.f64 (sin.f64 kx))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 (sin.f64 th) (/.f64 (-.f64 #s(literal 2/45 binary64) (*.f64 (/.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx))))) #s(literal 1/3 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx))))) #s(literal -1/2 binary64))) (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 3 binary64))) (/.f64 (-.f64 (/.f64 (*.f64 #s(literal 1/120 binary64) (sin.f64 th)) (fabs.f64 (sin.f64 kx))) (fma.f64 (/.f64 (*.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx))))) #s(literal 1/3 binary64)) (sin.f64 th)) (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 3 binary64))) #s(literal -1/2 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx))) (*.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 3 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx))))) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))) (*.f64 (*.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx))))) #s(literal 1/3 binary64)) (/.f64 (fma.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx))) (*.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 3 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))) #s(literal -1/2 binary64)))) (*.f64 ky ky) (/.f64 (*.f64 #s(literal 1/120 binary64) (sin.f64 th)) (fabs.f64 (sin.f64 kx)))) (fma.f64 (/.f64 (*.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx))))) #s(literal 1/3 binary64)) (sin.f64 th)) (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 3 binary64))) #s(literal -1/2 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx))) (*.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 3 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx))))) #s(literal 1/2 binary64)))) (*.f64 ky ky) (/.f64 (*.f64 #s(literal -1/6 binary64) (sin.f64 th)) (fabs.f64 (sin.f64 kx)))) (*.f64 (/.f64 (sin.f64 th) (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 3 binary64))) #s(literal 1/2 binary64))) (*.f64 ky ky) (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx)))) ky))
#s(approx (/ 1 (pow (sin ky) -1)) ky)
#s(approx (/ 1 (pow (sin ky) -1)) (*.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky))
#s(approx (/ 1 (pow (sin ky) -1)) (*.f64 (fma.f64 (-.f64 (*.f64 (*.f64 ky ky) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (*.f64 ky ky) #s(literal 1 binary64)) ky))
#s(approx (/ 1 (pow (sin ky) -1)) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (*.f64 ky ky)) #s(literal 1/6 binary64)) (*.f64 ky ky) #s(literal 1 binary64)) ky))
#s(approx (pow (sin ky) -1) (/.f64 #s(literal 1 binary64) ky))
#s(approx (pow (sin ky) -1) (/.f64 (fma.f64 (*.f64 ky ky) #s(literal 1/6 binary64) #s(literal 1 binary64)) ky))
#s(approx (pow (sin ky) -1) (/.f64 (fma.f64 (fma.f64 #s(literal 7/360 binary64) (*.f64 ky ky) #s(literal 1/6 binary64)) (*.f64 ky ky) #s(literal 1 binary64)) ky))
#s(approx (pow (sin ky) -1) (/.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 31/15120 binary64) (*.f64 ky ky) #s(literal 7/360 binary64)) (*.f64 ky ky) #s(literal 1/6 binary64)) (*.f64 ky ky) #s(literal 1 binary64)) ky))
#s(approx (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1)))))) (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx))))
#s(approx (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1)))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 ky ky) (sin.f64 th)) (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 3 binary64))) (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx)))))
#s(approx (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1)))))) (fma.f64 (fma.f64 (neg.f64 (*.f64 ky ky)) (fma.f64 (/.f64 (*.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx))))) #s(literal 1/3 binary64)) (sin.f64 th)) (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 3 binary64))) #s(literal -1/2 binary64) (/.f64 (*.f64 #s(literal -1/4 binary64) (sin.f64 th)) (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 5 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 3 binary64))))) (*.f64 ky ky) (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx)))))
#s(approx (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1)))))) (fma.f64 (fma.f64 (-.f64 (*.f64 (neg.f64 (*.f64 ky ky)) (fma.f64 (/.f64 (fma.f64 (/.f64 (*.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx))))) #s(literal 1/3 binary64)) (sin.f64 th)) (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 3 binary64))) #s(literal -1/2 binary64) (/.f64 (*.f64 #s(literal -1/4 binary64) (sin.f64 th)) (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 5 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx))))) #s(literal -1/2 binary64) (fma.f64 (*.f64 (sin.f64 th) (/.f64 (-.f64 #s(literal 2/45 binary64) (*.f64 (/.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx))))) #s(literal 1/3 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx))))) #s(literal -1/2 binary64))) (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 3 binary64)))) #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx))))) #s(literal 1/3 binary64)) (sin.f64 th)) (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 5 binary64))) #s(literal 1/4 binary64))))) (fma.f64 (/.f64 (*.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx))))) #s(literal 1/3 binary64)) (sin.f64 th)) (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 3 binary64))) #s(literal -1/2 binary64) (/.f64 (*.f64 #s(literal -1/4 binary64) (sin.f64 th)) (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 5 binary64))))) (*.f64 ky ky) (*.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 3 binary64))))) (*.f64 ky ky) (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx)))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) (fabs.f64 (sin.f64 kx)))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) (fma.f64 (/.f64 (*.f64 ky ky) (fabs.f64 (sin.f64 kx))) #s(literal 1/2 binary64) (fabs.f64 (sin.f64 kx))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx))))) #s(literal 1/3 binary64)) (*.f64 ky ky)) (fabs.f64 (sin.f64 kx))) (/.f64 #s(literal 1/2 binary64) (fabs.f64 (sin.f64 kx)))) (*.f64 ky ky) (fabs.f64 (sin.f64 kx))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx))))) #s(literal 1/3 binary64)) (fabs.f64 (sin.f64 kx))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 #s(literal 2/45 binary64) (*.f64 (/.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx))))) #s(literal 1/3 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx))))) #s(literal -1/2 binary64))) (*.f64 ky ky))) (fabs.f64 (sin.f64 kx)))) (*.f64 ky ky) (/.f64 #s(literal 1/2 binary64) (fabs.f64 (sin.f64 kx)))) (*.f64 ky ky) (fabs.f64 (sin.f64 kx))))
#s(approx (* (sin th) ky) (*.f64 (sin.f64 th) ky))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (fabs.f64 (sin.f64 kx))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (*.f64 (fma.f64 (neg.f64 (*.f64 ky ky)) (fma.f64 (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal -3 binary64)) #s(literal 1/2 binary64) (/.f64 #s(literal 1/6 binary64) (fabs.f64 (sin.f64 kx)))) (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx)))) ky))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (*.f64 (fma.f64 (-.f64 (*.f64 (-.f64 (/.f64 #s(literal 1/120 binary64) (fabs.f64 (sin.f64 kx))) (*.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx))))) #s(literal 1/3 binary64)) (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 3 binary64))) (/.f64 (fma.f64 (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal -3 binary64)) #s(literal 1/2 binary64) (/.f64 #s(literal 1/6 binary64) (fabs.f64 (sin.f64 kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))))) (*.f64 ky ky)) (fma.f64 (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal -3 binary64)) #s(literal 1/2 binary64) (/.f64 #s(literal 1/6 binary64) (fabs.f64 (sin.f64 kx))))) (*.f64 ky ky) (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx)))) ky))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (*.f64 (fma.f64 (-.f64 (*.f64 (*.f64 ky ky) (fma.f64 (neg.f64 (*.f64 ky ky)) (+.f64 (fma.f64 (*.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx))))) #s(literal 1/3 binary64)) (/.f64 (fma.f64 (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal -3 binary64)) #s(literal 1/2 binary64) (/.f64 #s(literal 1/6 binary64) (fabs.f64 (sin.f64 kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))) #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (-.f64 #s(literal 2/45 binary64) (*.f64 (/.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx))))) #s(literal 1/3 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx))))) #s(literal -1/2 binary64))) (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 3 binary64))) (/.f64 (-.f64 (/.f64 #s(literal 1/120 binary64) (fabs.f64 (sin.f64 kx))) (*.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx))))) #s(literal 1/3 binary64)) (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 3 binary64))) (/.f64 (fma.f64 (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal -3 binary64)) #s(literal 1/2 binary64) (/.f64 #s(literal 1/6 binary64) (fabs.f64 (sin.f64 kx)))) (-.f64 #s(literal 1/2 binary64) (*.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 #s(literal 1/5040 binary64) (fabs.f64 (sin.f64 kx)))) (-.f64 (/.f64 #s(literal 1/120 binary64) (fabs.f64 (sin.f64 kx))) (*.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx))))) #s(literal 1/3 binary64)) (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 3 binary64))) (/.f64 (fma.f64 (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal -3 binary64)) #s(literal 1/2 binary64) (/.f64 #s(literal 1/6 binary64) (fabs.f64 (sin.f64 kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))))))) (fma.f64 (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal -3 binary64)) #s(literal 1/2 binary64) (/.f64 #s(literal 1/6 binary64) (fabs.f64 (sin.f64 kx))))) (*.f64 ky ky) (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx)))) ky))
#s(approx (/ 1 (pow (sin ky) -1)) (sin.f64 ky))
#s(approx (* (log (- 1/2 (* 1/2 (cos (+ ky ky))))) 1/2) (log.f64 ky))
#s(approx (* (log (- 1/2 (* 1/2 (cos (+ ky ky))))) 1/2) (fma.f64 (*.f64 ky ky) #s(literal -1/6 binary64) (log.f64 ky)))
#s(approx (* (log (- 1/2 (* 1/2 (cos (+ ky ky))))) 1/2) (fma.f64 (-.f64 (*.f64 #s(literal -1/180 binary64) (*.f64 ky ky)) #s(literal 1/6 binary64)) (*.f64 ky ky) (log.f64 ky)))
#s(approx (* (log (- 1/2 (* 1/2 (cos (+ ky ky))))) 1/2) (fma.f64 (-.f64 (*.f64 (-.f64 (*.f64 #s(literal -1/2835 binary64) (*.f64 ky ky)) #s(literal 1/180 binary64)) (*.f64 ky ky)) #s(literal 1/6 binary64)) (*.f64 ky ky) (log.f64 ky)))
#s(approx (log (- 1/2 (* 1/2 (cos (+ ky ky))))) (*.f64 (log.f64 ky) #s(literal 2 binary64)))
#s(approx (log (- 1/2 (* 1/2 (cos (+ ky ky))))) (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) (*.f64 (log.f64 ky) #s(literal 2 binary64))))
#s(approx (log (- 1/2 (* 1/2 (cos (+ ky ky))))) (fma.f64 (-.f64 (*.f64 #s(literal -1/90 binary64) (*.f64 ky ky)) #s(literal 1/3 binary64)) (*.f64 ky ky) (*.f64 (log.f64 ky) #s(literal 2 binary64))))
#s(approx (log (- 1/2 (* 1/2 (cos (+ ky ky))))) (fma.f64 (-.f64 (*.f64 (-.f64 (*.f64 #s(literal -2/2835 binary64) (*.f64 ky ky)) #s(literal 1/90 binary64)) (*.f64 ky ky)) #s(literal 1/3 binary64)) (*.f64 ky ky) (*.f64 (log.f64 ky) #s(literal 2 binary64))))
#s(approx (- 1/2 (* 1/2 (cos (+ ky ky)))) (*.f64 ky ky))
#s(approx (- 1/2 (* 1/2 (cos (+ ky ky)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64)) (*.f64 ky ky)))
#s(approx (- 1/2 (* 1/2 (cos (+ ky ky)))) (*.f64 (fma.f64 (-.f64 (*.f64 (*.f64 ky ky) #s(literal 2/45 binary64)) #s(literal 1/3 binary64)) (*.f64 ky ky) #s(literal 1 binary64)) (*.f64 ky ky)))
#s(approx (- 1/2 (* 1/2 (cos (+ ky ky)))) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -1/315 binary64) (*.f64 ky ky) #s(literal 2/45 binary64)) (*.f64 ky ky)) #s(literal 1/3 binary64)) (*.f64 ky ky) #s(literal 1 binary64)) (*.f64 ky ky)))
#s(approx (* 1/2 (cos (+ ky ky))) #s(literal 1/2 binary64))
#s(approx (* 1/2 (cos (+ ky ky))) (+.f64 (neg.f64 (*.f64 ky ky)) #s(literal 1/2 binary64)))
#s(approx (* 1/2 (cos (+ ky ky))) (fma.f64 (-.f64 (*.f64 (*.f64 ky ky) #s(literal 1/3 binary64)) #s(literal 1 binary64)) (*.f64 ky ky) #s(literal 1/2 binary64)))
#s(approx (* 1/2 (cos (+ ky ky))) (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -2/45 binary64) (*.f64 ky ky) #s(literal 1/3 binary64)) (*.f64 ky ky)) #s(literal 1 binary64)) (*.f64 ky ky) #s(literal 1/2 binary64)))
#s(approx (cos (+ ky ky)) #s(literal 1 binary64))
#s(approx (cos (+ ky ky)) (fma.f64 #s(literal -2 binary64) (*.f64 ky ky) #s(literal 1 binary64)))
#s(approx (cos (+ ky ky)) (fma.f64 (-.f64 (*.f64 #s(literal 2/3 binary64) (*.f64 ky ky)) #s(literal 2 binary64)) (*.f64 ky ky) #s(literal 1 binary64)))
#s(approx (cos (+ ky ky)) (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -4/45 binary64) (*.f64 ky ky) #s(literal 2/3 binary64)) (*.f64 ky ky)) #s(literal 2 binary64)) (*.f64 ky ky) #s(literal 1 binary64)))
#s(approx (+ ky ky) (+.f64 ky ky))
#s(approx (/ 1 (pow (sin ky) -1)) (sin.f64 ky))
#s(approx (pow (sin ky) -1) (/.f64 #s(literal 1 binary64) (sin.f64 ky)))
#s(approx (/ 1 (pow (sin ky) -1)) (sin.f64 ky))
#s(approx (* (log (- 1/2 (* 1/2 (cos (+ ky ky))))) 1/2) (log.f64 (sin.f64 ky)))
#s(approx (log (- 1/2 (* 1/2 (cos (+ ky ky))))) (*.f64 (log.f64 (sin.f64 ky)) #s(literal 2 binary64)))
#s(approx (- 1/2 (* 1/2 (cos (+ ky ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))
#s(approx (* 1/2 (cos (+ ky ky))) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))
#s(approx (cos (+ ky ky)) (cos.f64 (+.f64 ky ky)))
#s(approx (/ 1 (pow (sin ky) -1)) (sin.f64 ky))
#s(approx (* (log (- 1/2 (* 1/2 (cos (+ ky ky))))) 1/2) (log.f64 (sin.f64 ky)))
#s(approx (log (- 1/2 (* 1/2 (cos (+ ky ky))))) (*.f64 (log.f64 (sin.f64 ky)) #s(literal 2 binary64)))
#s(approx (- 1/2 (* 1/2 (cos (+ ky ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))
#s(approx (* 1/2 (cos (+ ky ky))) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))
#s(approx (cos (+ ky ky)) (cos.f64 (+.f64 ky ky)))
#s(approx (* (/ 1 (pow (sin ky) -1)) (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))))) (/.f64 (*.f64 (sin.f64 ky) th) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))
#s(approx (* (/ 1 (pow (sin ky) -1)) (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))))) (*.f64 (fma.f64 (*.f64 (*.f64 th th) (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) #s(literal -1/6 binary64) (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) th))
#s(approx (* (/ 1 (pow (sin ky) -1)) (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))))) (*.f64 (fma.f64 (fma.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (*.f64 (*.f64 (*.f64 th th) (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) #s(literal 1/120 binary64))) (*.f64 th th) (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) th))
#s(approx (* (/ 1 (pow (sin ky) -1)) (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))))) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/120 binary64) (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (*.f64 (*.f64 (*.f64 th th) (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) #s(literal -1/5040 binary64))) (*.f64 th th) (/.f64 (*.f64 #s(literal -1/6 binary64) (sin.f64 ky)) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) (*.f64 th th) (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) th))
#s(approx (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1)))))) (/.f64 th (hypot.f64 (sin.f64 kx) (sin.f64 ky))))
#s(approx (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1)))))) (*.f64 (fma.f64 (/.f64 (*.f64 th th) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) #s(literal -1/6 binary64) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) th))
#s(approx (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1)))))) (*.f64 (fma.f64 (-.f64 (/.f64 (*.f64 (*.f64 th th) #s(literal 1/120 binary64)) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (/.f64 #s(literal 1/6 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) (*.f64 th th) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) th))
#s(approx (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1)))))) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 (/.f64 (*.f64 th th) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) #s(literal -1/5040 binary64) (/.f64 #s(literal 1/120 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) (*.f64 th th)) (/.f64 #s(literal 1/6 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) (*.f64 th th) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) th))
#s(approx (sin th) th)
#s(approx (sin th) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) th))
#s(approx (sin th) (*.f64 (fma.f64 (-.f64 (*.f64 (*.f64 th th) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (*.f64 th th) #s(literal 1 binary64)) th))
#s(approx (sin th) (*.f64 (fma.f64 (*.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) th) th) #s(literal 1/6 binary64)) th) th #s(literal 1 binary64)) th))
#s(approx (/ (* (sin th) ky) (fabs (sin kx))) (/.f64 (*.f64 th ky) (fabs.f64 (sin.f64 kx))))
#s(approx (/ (* (sin th) ky) (fabs (sin kx))) (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 th th) ky) (fabs.f64 (sin.f64 kx))) #s(literal -1/6 binary64) (/.f64 ky (fabs.f64 (sin.f64 kx)))) th))
#s(approx (/ (* (sin th) ky) (fabs (sin kx))) (*.f64 (fma.f64 (fma.f64 (/.f64 ky (fabs.f64 (sin.f64 kx))) #s(literal -1/6 binary64) (*.f64 (/.f64 (*.f64 (*.f64 th th) ky) (fabs.f64 (sin.f64 kx))) #s(literal 1/120 binary64))) (*.f64 th th) (/.f64 ky (fabs.f64 (sin.f64 kx)))) th))
#s(approx (/ (* (sin th) ky) (fabs (sin kx))) (*.f64 (fma.f64 (fma.f64 (/.f64 ky (fabs.f64 (sin.f64 kx))) #s(literal -1/6 binary64) (*.f64 (fma.f64 (/.f64 ky (fabs.f64 (sin.f64 kx))) #s(literal 1/120 binary64) (*.f64 (/.f64 (*.f64 (*.f64 th th) ky) (fabs.f64 (sin.f64 kx))) #s(literal -1/5040 binary64))) (*.f64 th th))) (*.f64 th th) (/.f64 ky (fabs.f64 (sin.f64 kx)))) th))
#s(approx (* (sin th) ky) (*.f64 th ky))
#s(approx (* (sin th) ky) (*.f64 (fma.f64 (*.f64 (*.f64 th th) ky) #s(literal -1/6 binary64) ky) th))
#s(approx (* (sin th) ky) (*.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 th th) ky) #s(literal 1/120 binary64) (*.f64 #s(literal -1/6 binary64) ky)) (*.f64 th th) ky) th))
#s(approx (* (sin th) ky) (*.f64 (fma.f64 (fma.f64 (*.f64 th th) (fma.f64 (*.f64 (*.f64 th th) ky) #s(literal -1/5040 binary64) (*.f64 #s(literal 1/120 binary64) ky)) (*.f64 #s(literal -1/6 binary64) ky)) (*.f64 th th) ky) th))
#s(approx (+ (* (- (* (+ (* (* th th) -1/5040) 1/120) (* th th)) 1/6) (* th th)) 1) (fma.f64 (*.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)))
#s(approx (+ (* (- (* (+ (* (* th th) -1/5040) 1/120) (* th th)) 1/6) (* th th)) 1) (fma.f64 (-.f64 (*.f64 (*.f64 th th) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (*.f64 th th) #s(literal 1 binary64)))
#s(approx (+ (* (- (* (+ (* (* th th) -1/5040) 1/120) (* th th)) 1/6) (* th th)) 1) (fma.f64 (*.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) th) th) #s(literal 1/6 binary64)) th) th #s(literal 1 binary64)))
#s(approx (- (* (+ (* (* th th) -1/5040) 1/120) (* th th)) 1/6) #s(literal -1/6 binary64))
#s(approx (- (* (+ (* (* th th) -1/5040) 1/120) (* th th)) 1/6) (-.f64 (*.f64 (*.f64 th th) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)))
#s(approx (- (* (+ (* (* th th) -1/5040) 1/120) (* th th)) 1/6) (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) th) th) #s(literal 1/6 binary64)))
#s(approx (* (+ (* (* th th) -1/5040) 1/120) (* th th)) (*.f64 (*.f64 th th) #s(literal 1/120 binary64)))
#s(approx (* (+ (* (* th th) -1/5040) 1/120) (* th th)) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) th) th))
#s(approx (+ (* (* th th) -1/5040) 1/120) #s(literal 1/120 binary64))
#s(approx (+ (* (* th th) -1/5040) 1/120) (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)))
#s(approx (* th th) (*.f64 th th))
#s(approx (sin th) (sin.f64 th))
#s(approx (* (+ (* (- (* (+ (* (* th th) -1/5040) 1/120) (* th th)) 1/6) (* th th)) 1) th) (*.f64 (pow.f64 th #s(literal 7 binary64)) #s(literal -1/5040 binary64)))
#s(approx (* (+ (* (- (* (+ (* (* th th) -1/5040) 1/120) (* th th)) 1/6) (* th th)) 1) th) (*.f64 (-.f64 (/.f64 #s(literal 1/120 binary64) (*.f64 th th)) #s(literal 1/5040 binary64)) (pow.f64 th #s(literal 7 binary64))))
#s(approx (* (+ (* (- (* (+ (* (* th th) -1/5040) 1/120) (* th th)) 1/6) (* th th)) 1) th) (*.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/120 binary64) (*.f64 th th)) #s(literal 1/5040 binary64)) (/.f64 #s(literal 1/6 binary64) (*.f64 (*.f64 th th) (*.f64 th th)))) (pow.f64 th #s(literal 7 binary64))))
#s(approx (* (+ (* (- (* (+ (* (* th th) -1/5040) 1/120) (* th th)) 1/6) (* th th)) 1) th) (*.f64 (-.f64 (-.f64 (+.f64 (pow.f64 th #s(literal -6 binary64)) (/.f64 #s(literal 1/120 binary64) (*.f64 th th))) #s(literal 1/5040 binary64)) (/.f64 #s(literal 1/6 binary64) (*.f64 (*.f64 th th) (*.f64 th th)))) (pow.f64 th #s(literal 7 binary64))))
#s(approx (+ (* (- (* (+ (* (* th th) -1/5040) 1/120) (* th th)) 1/6) (* th th)) 1) (*.f64 (*.f64 (*.f64 (*.f64 th th) th) (*.f64 (*.f64 th th) th)) #s(literal -1/5040 binary64)))
#s(approx (+ (* (- (* (+ (* (* th th) -1/5040) 1/120) (* th th)) 1/6) (* th th)) 1) (*.f64 (*.f64 (*.f64 (*.f64 th th) th) (*.f64 (*.f64 th th) th)) (-.f64 (/.f64 #s(literal 1/120 binary64) (*.f64 th th)) #s(literal 1/5040 binary64))))
#s(approx (+ (* (- (* (+ (* (* th th) -1/5040) 1/120) (* th th)) 1/6) (* th th)) 1) (*.f64 (*.f64 (*.f64 (*.f64 th th) th) (*.f64 (*.f64 th th) th)) (-.f64 (-.f64 (/.f64 #s(literal 1/120 binary64) (*.f64 th th)) #s(literal 1/5040 binary64)) (/.f64 #s(literal 1/6 binary64) (*.f64 (*.f64 th th) (*.f64 th th))))))
#s(approx (+ (* (- (* (+ (* (* th th) -1/5040) 1/120) (* th th)) 1/6) (* th th)) 1) (*.f64 (*.f64 (*.f64 (*.f64 th th) th) (*.f64 (*.f64 th th) th)) (-.f64 (-.f64 (+.f64 (pow.f64 th #s(literal -6 binary64)) (/.f64 #s(literal 1/120 binary64) (*.f64 th th))) #s(literal 1/5040 binary64)) (/.f64 #s(literal 1/6 binary64) (*.f64 (*.f64 th th) (*.f64 th th))))))
#s(approx (- (* (+ (* (* th th) -1/5040) 1/120) (* th th)) 1/6) (*.f64 (*.f64 (*.f64 th th) (*.f64 th th)) #s(literal -1/5040 binary64)))
#s(approx (- (* (+ (* (* th th) -1/5040) 1/120) (* th th)) 1/6) (*.f64 (*.f64 (*.f64 th th) (*.f64 th th)) (-.f64 (/.f64 #s(literal 1/120 binary64) (*.f64 th th)) #s(literal 1/5040 binary64))))
#s(approx (- (* (+ (* (* th th) -1/5040) 1/120) (* th th)) 1/6) (*.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/120 binary64) (*.f64 th th)) #s(literal 1/5040 binary64)) (/.f64 #s(literal 1/6 binary64) (*.f64 (*.f64 th th) (*.f64 th th)))) (*.f64 (*.f64 th th) (*.f64 th th))))
#s(approx (+ (* (* th th) -1/5040) 1/120) (*.f64 (*.f64 th th) #s(literal -1/5040 binary64)))
#s(approx (+ (* (* th th) -1/5040) 1/120) (*.f64 (-.f64 (/.f64 #s(literal 1/120 binary64) (*.f64 th th)) #s(literal 1/5040 binary64)) (*.f64 th th)))
#s(approx (* (+ (* (- (* (+ (* (* th th) -1/5040) 1/120) (* th th)) 1/6) (* th th)) 1) th) (neg.f64 (*.f64 (-.f64 #s(literal 1/5040 binary64) (/.f64 #s(literal 1/120 binary64) (*.f64 th th))) (pow.f64 th #s(literal 7 binary64)))))
#s(approx (* (+ (* (- (* (+ (* (* th th) -1/5040) 1/120) (* th th)) 1/6) (* th th)) 1) th) (neg.f64 (*.f64 (+.f64 #s(literal 1/5040 binary64) (-.f64 (/.f64 #s(literal 1/6 binary64) (*.f64 (*.f64 th th) (*.f64 th th))) (/.f64 #s(literal 1/120 binary64) (*.f64 th th)))) (pow.f64 th #s(literal 7 binary64)))))
#s(approx (* (+ (* (- (* (+ (* (* th th) -1/5040) 1/120) (* th th)) 1/6) (* th th)) 1) th) (neg.f64 (*.f64 (-.f64 (+.f64 #s(literal 1/5040 binary64) (-.f64 (/.f64 #s(literal 1/6 binary64) (*.f64 (*.f64 th th) (*.f64 th th))) (/.f64 #s(literal 1/120 binary64) (*.f64 th th)))) (pow.f64 th #s(literal -6 binary64))) (pow.f64 th #s(literal 7 binary64)))))

eval100.0ms (1.5%)

Memory
-8.8MiB live, 124.4MiB allocated; 20ms collecting garbage
Compiler

Compiled 7 043 to 2 445 computations (65.3% saved)

prune60.0ms (0.9%)

Memory
31.2MiB live, 125.4MiB allocated; 21ms collecting garbage
Pruning

63 alts after pruning (58 fresh and 5 done)

PrunedKeptTotal
New39925424
Fresh23335
Picked235
Done022
Total40363466
Accuracy
100.0%
Counts
466 → 63
Alt Table
Click to see full alt table
StatusAccuracyProgram
96.2%
(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))
36.7%
(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) (sin.f64 ky)))
49.6%
(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (fabs.f64 (sin.f64 ky))))
21.9%
(/.f64 (*.f64 (sin.f64 ky) #s(approx (sin th) (*.f64 (fma.f64 (*.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) th) th) #s(literal 1/6 binary64)) th) th #s(literal 1 binary64)) th))) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) (sin.f64 ky)))
22.5%
(/.f64 (*.f64 (sin.f64 ky) #s(approx (sin th) th)) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) (sin.f64 ky)))
99.5%
(/.f64 (*.f64 #s(literal 1 binary64) (/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) (/.f64 #s(literal 1 binary64) (sin.f64 ky)))
99.5%
(/.f64 (*.f64 #s(literal 1 binary64) (sin.f64 th)) (*.f64 (/.f64 #s(literal 1 binary64) (sin.f64 ky)) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))
86.3%
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (fma.f64 (sin.f64 ky) (sin.f64 ky) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))) (sin.f64 th))
78.1%
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 (sin.f64 ky) #s(literal 4 binary64))) (-.f64 (-.f64 #s(literal 1/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 ky ky)))))))) (sin.f64 th))
50.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))))) #s(approx (sin th) th))
77.4%
(*.f64 (/.f64 (sin.f64 ky) (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 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))))) (sin.f64 th))
21.8%
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 ky ky (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))) #s(approx (sin th) th))
29.3%
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 ky ky #s(approx (- 1/2 (* 1/2 (cos (* 2 kx)))) (*.f64 kx kx)))))) (sin.f64 th))
31.7%
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))))) (sin.f64 th))
13.5%
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (+ (* ky ky) (- 1/2 (* 1/2 (cos (* 2 kx))))) (*.f64 ky ky))))) (sin.f64 th))
43.1%
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 ky)))))) (sin.f64 th))
29.4%
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (*.f64 (sqrt.f64 (sin.f64 ky)) (sqrt.f64 (sin.f64 ky))))) (sin.f64 th))
13.6%
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (*.f64 (sqrt.f64 (neg.f64 (sin.f64 ky))) (sqrt.f64 (neg.f64 (sin.f64 ky)))))) (sin.f64 th))
22.1%
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 (sin.f64 ky)))) #s(approx (sin th) (*.f64 (fma.f64 (-.f64 (*.f64 (*.f64 th th) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (*.f64 th th) #s(literal 1 binary64)) th)))
22.1%
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 (sin.f64 ky)))) #s(approx (sin th) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) th)))
22.4%
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 (sin.f64 ky)))) #s(approx (sin th) th))
46.6%
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 (sin.f64 kx)))) (sin.f64 th))
31.5%
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (exp.f64 (*.f64 (neg.f64 (log.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))) #s(literal 1/2 binary64))))) (sin.f64 th))
11.3%
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (exp.f64 (*.f64 (log.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 (fma.f64 #s(literal 2 binary64) ky (/.f64 (PI.f64) #s(literal 2 binary64))))))) #s(literal 1/2 binary64))))) (sin.f64 th))
11.3%
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (exp.f64 (*.f64 (log.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 (fma.f64 #s(literal -2 binary64) ky (/.f64 (PI.f64) #s(literal 2 binary64))))))) #s(literal 1/2 binary64))))) (sin.f64 th))
31.6%
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (exp.f64 (*.f64 (log.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal 1/2 binary64))))) (sin.f64 th))
16.6%
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (exp.f64 (*.f64 (log.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal 1/2 binary64))))) #s(approx (sin th) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) th)))
14.7%
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (exp.f64 #s(approx (* (log (- 1/2 (* 1/2 (cos (+ ky ky))))) 1/2) (log.f64 ky))))) (sin.f64 th))
16.1%
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(approx (/ 1 (pow (sin ky) -1)) (sin.f64 ky)))) #s(approx (sin th) th))
30.3%
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) (sin.f64 ky))) (sin.f64 th))
37.6%
(*.f64 (/.f64 #s(approx (sin ky) (*.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky)) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 ky ky (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))) (sin.f64 th))
17.7%
(*.f64 (/.f64 #s(approx (sin ky) (*.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky)) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 #s(approx (sin ky) (*.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky))))) (sin.f64 th))
40.3%
(*.f64 (/.f64 #s(approx (sin ky) ky) (sqrt.f64 (+.f64 (exp.f64 (*.f64 (log.f64 (sin.f64 kx)) #s(literal 2 binary64))) (pow.f64 #s(approx (sin ky) ky) #s(literal 2 binary64))))) (sin.f64 th))
30.3%
(*.f64 (/.f64 #s(approx (sin ky) ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 #s(approx (sin ky) ky)))) (sin.f64 th))
76.4%
(*.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 (sin.f64 ky) #s(literal -1/2 binary64)) #s(literal 2 binary64))) (/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 (sin.f64 ky) #s(literal -1/2 binary64)) #s(literal 2 binary64))))))
46.6%
(*.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 ky) #s(literal -1 binary64))) (/.f64 (sin.f64 th) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) (fabs.f64 (sin.f64 kx)))))
52.4%
(*.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 ky) #s(literal -1 binary64))) #s(approx (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1)))))) (/.f64 th (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))
74.0%
(*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 (log.f64 (sin.f64 ky))))) (/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) (/.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 (log.f64 (sin.f64 ky))))))))
38.3%
(*.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))))
99.6%
(*.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))
46.6%
(*.f64 (sin.f64 ky) (/.f64 (sin.f64 th) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (fabs.f64 (sin.f64 kx)))))
52.4%
(*.f64 (sin.f64 ky) (/.f64 #s(approx (sin th) th) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))
43.2%
(*.f64 (sin.f64 ky) #s(approx (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 ky)))))
41.7%
(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (fabs.f64 (sin.f64 kx)))) (sin.f64 th))
23.5%
(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (fabs.f64 (sin.f64 kx)))) #s(approx (sin th) th))
64.2%
(*.f64 #s(approx (/ 1 (pow (sin ky) -1)) ky) (/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) #s(approx (/ 1 (pow (sin ky) -1)) ky))))
39.8%
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))))))
29.2%
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))
39.8%
#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))))
20.6%
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 #s(approx (sin kx) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 kx kx) #s(literal 1/120 binary64)) (*.f64 kx kx)) #s(literal 1/6 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) kx)))))
20.6%
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 #s(approx (sin kx) (*.f64 (fma.f64 (-.f64 (*.f64 #s(literal 1/120 binary64) (*.f64 kx kx)) #s(literal 1/6 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) kx)))))
20.7%
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 #s(approx (sin kx) (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 kx kx) #s(literal 1 binary64)) kx)))))
20.8%
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 #s(approx (sin kx) kx))))
49.0%
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 ky) th) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))
21.2%
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) th)) ky) (fabs.f64 (sin.f64 kx))))
21.5%
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))))))
16.4%
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))))
21.6%
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (fabs.f64 (sin.f64 kx))))
14.9%
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (fabs.f64 #s(approx (sin kx) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (*.f64 kx kx)) #s(literal 1/6 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) kx)))))
14.9%
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (fabs.f64 #s(approx (sin kx) (*.f64 (fma.f64 (-.f64 (*.f64 (*.f64 kx kx) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) kx)))))
14.9%
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (fabs.f64 #s(approx (sin kx) (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 kx kx) #s(literal 1 binary64)) kx)))))
15.0%
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (fabs.f64 #s(approx (sin kx) kx))))
41.8%
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 ky (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx)))))
Compiler

Compiled 2 710 to 2 447 computations (9.7% saved)

series144.0ms (2.1%)

Memory
-23.9MiB live, 197.8MiB allocated; 130ms collecting garbage
Counts
50 → 167
Calls
Call 1
Inputs
(/.f64 (*.f64 #s(literal 1 binary64) (sin.f64 th)) (*.f64 (/.f64 #s(literal 1 binary64) (sin.f64 ky)) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))
(*.f64 #s(literal 1 binary64) (sin.f64 th))
#s(literal 1 binary64)
(sin.f64 th)
th
(*.f64 (/.f64 #s(literal 1 binary64) (sin.f64 ky)) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))
(/.f64 #s(literal 1 binary64) (sin.f64 ky))
(sin.f64 ky)
ky
(hypot.f64 (sin.f64 kx) (sin.f64 ky))
(sin.f64 kx)
kx
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (fabs.f64 #s(approx (sin kx) kx))))
(/.f64 (*.f64 #s(approx (sin th) th) ky) (fabs.f64 #s(approx (sin kx) kx)))
(*.f64 #s(approx (sin th) th) ky)
#s(approx (sin th) th)
(fabs.f64 #s(approx (sin kx) kx))
#s(approx (sin kx) kx)
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(approx (/ 1 (pow (sin ky) -1)) (sin.f64 ky)))) #s(approx (sin th) th))
(/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(approx (/ 1 (pow (sin ky) -1)) (sin.f64 ky))))
#s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(approx (/ 1 (pow (sin ky) -1)) (sin.f64 ky)))
#s(approx (/ 1 (pow (sin ky) -1)) (sin.f64 ky))
(/.f64 (*.f64 (sin.f64 ky) #s(approx (sin th) (*.f64 (fma.f64 (*.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) th) th) #s(literal 1/6 binary64)) th) th #s(literal 1 binary64)) th))) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) (sin.f64 ky)))
(*.f64 (sin.f64 ky) #s(approx (sin th) (*.f64 (fma.f64 (*.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) th) th) #s(literal 1/6 binary64)) th) th #s(literal 1 binary64)) th)))
#s(approx (sin th) (*.f64 (fma.f64 (*.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) th) th) #s(literal 1/6 binary64)) th) th #s(literal 1 binary64)) th))
(*.f64 (fma.f64 (*.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) th) th) #s(literal 1/6 binary64)) th) th #s(literal 1 binary64)) th)
(fma.f64 (*.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) th) th) #s(literal 1/6 binary64)) th) th #s(literal 1 binary64))
(*.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) th) th) #s(literal 1/6 binary64)) th)
(-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) th) th) #s(literal 1/6 binary64))
(*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) th) th)
(*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) th)
(fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64))
(*.f64 th th)
#s(literal -1/5040 binary64)
#s(literal 1/120 binary64)
#s(literal 1/6 binary64)
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) (sin.f64 ky))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (exp.f64 (*.f64 (neg.f64 (log.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))) #s(literal 1/2 binary64))))) (sin.f64 th))
(/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (exp.f64 (*.f64 (neg.f64 (log.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))) #s(literal 1/2 binary64)))))
#s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (exp.f64 (*.f64 (neg.f64 (log.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))) #s(literal 1/2 binary64))))
(exp.f64 (*.f64 (neg.f64 (log.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))) #s(literal 1/2 binary64)))
(*.f64 (neg.f64 (log.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))) #s(literal 1/2 binary64))
(neg.f64 (log.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))
(log.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 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)))
#s(literal 1/2 binary64)
(*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))
(cos.f64 (+.f64 ky ky))
(+.f64 ky ky)
Outputs
#s(approx (/ (* 1 (sin th)) (* (/ 1 (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))))) #s(hole binary64 (/ (* (sin ky) (sin th)) (sqrt (pow (sin ky) 2)))))
#s(approx (/ (* 1 (sin th)) (* (/ 1 (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow kx 2) (* (sin ky) (sin th))) (pow (sqrt (pow (sin ky) 2)) 3))) (/ (* (sin ky) (sin th)) (sqrt (pow (sin ky) 2))))))
#s(approx (/ (* 1 (sin th)) (* (/ 1 (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))))) #s(hole binary64 (+ (* (pow kx 2) (- (* -1 (* (pow kx 2) (+ (* -1/2 (/ (* (sin ky) (* (sin th) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2)))))) (pow (sqrt (pow (sin ky) 2)) 3))) (* -1/4 (/ (* (sin ky) (sin th)) (pow (sqrt (pow (sin ky) 2)) 5)))))) (* 1/2 (/ (* (sin ky) (sin th)) (pow (sqrt (pow (sin ky) 2)) 3))))) (/ (* (sin ky) (sin th)) (sqrt (pow (sin ky) 2))))))
#s(approx (/ (* 1 (sin th)) (* (/ 1 (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))))) #s(hole binary64 (+ (* (pow kx 2) (- (* (pow kx 2) (- (* -1 (* (pow kx 2) (+ (* -1/2 (/ (+ (* -1/2 (/ (* (sin ky) (* (sin th) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2)))))) (pow (sqrt (pow (sin ky) 2)) 3))) (* -1/4 (/ (* (sin ky) (sin th)) (pow (sqrt (pow (sin ky) 2)) 5)))) (pow (sqrt (pow (sin ky) 2)) 2))) (+ (* 1/4 (/ (* (sin ky) (* (sin th) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2)))))) (pow (sqrt (pow (sin ky) 2)) 5))) (* 1/2 (/ (* (sin ky) (* (sin th) (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2)))) (pow (sqrt (pow (sin ky) 2)) 2)))))) (pow (sqrt (pow (sin ky) 2)) 3))))))) (+ (* -1/2 (/ (* (sin ky) (* (sin th) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2)))))) (pow (sqrt (pow (sin ky) 2)) 3))) (* -1/4 (/ (* (sin ky) (sin th)) (pow (sqrt (pow (sin ky) 2)) 5)))))) (* 1/2 (/ (* (sin ky) (sin th)) (pow (sqrt (pow (sin ky) 2)) 3))))) (/ (* (sin ky) (sin th)) (sqrt (pow (sin ky) 2))))))
#s(approx (* (/ 1 (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(hole binary64 (/ (sqrt (pow (sin ky) 2)) (sin ky))))
#s(approx (* (/ 1 (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(hole binary64 (+ (* 1/2 (/ (pow kx 2) (* (sin ky) (sqrt (pow (sin ky) 2))))) (/ (sqrt (pow (sin ky) 2)) (sin ky)))))
#s(approx (* (/ 1 (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(hole binary64 (+ (* (pow kx 2) (+ (* -1/2 (/ (* (pow kx 2) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2))))) (* (sin ky) (sqrt (pow (sin ky) 2))))) (* 1/2 (/ 1 (* (sin ky) (sqrt (pow (sin ky) 2))))))) (/ (sqrt (pow (sin ky) 2)) (sin ky)))))
#s(approx (* (/ 1 (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(hole binary64 (+ (* (pow kx 2) (+ (* (pow kx 2) (+ (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2)))) (* (sin ky) (sqrt (pow (sin ky) 2))))) (* 1/2 (/ (* (pow kx 2) (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2)))) (pow (sqrt (pow (sin ky) 2)) 2))))) (* (sin ky) (sqrt (pow (sin ky) 2))))))) (* 1/2 (/ 1 (* (sin ky) (sqrt (pow (sin ky) 2))))))) (/ (sqrt (pow (sin ky) 2)) (sin ky)))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) #s(hole binary64 (sqrt (pow (sin ky) 2))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) #s(hole binary64 (+ (sqrt (pow (sin ky) 2)) (* 1/2 (/ (pow kx 2) (sqrt (pow (sin ky) 2)))))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) #s(hole binary64 (+ (sqrt (pow (sin ky) 2)) (* (pow kx 2) (+ (* -1/2 (/ (* (pow kx 2) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2))))) (sqrt (pow (sin ky) 2)))) (* 1/2 (/ 1 (sqrt (pow (sin ky) 2)))))))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) #s(hole binary64 (+ (sqrt (pow (sin ky) 2)) (* (pow kx 2) (+ (* (pow kx 2) (+ (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2)))) (sqrt (pow (sin ky) 2)))) (* 1/2 (/ (* (pow kx 2) (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2)))) (pow (sqrt (pow (sin ky) 2)) 2))))) (sqrt (pow (sin ky) 2)))))) (* 1/2 (/ 1 (sqrt (pow (sin ky) 2)))))))))
#s(approx (sin kx) #s(hole binary64 kx))
#s(approx (sin kx) #s(hole binary64 (* kx (+ 1 (* -1/6 (pow kx 2))))))
#s(approx (sin kx) #s(hole binary64 (* kx (+ 1 (* (pow kx 2) (- (* 1/120 (pow kx 2)) 1/6))))))
#s(approx (sin kx) #s(hole binary64 (* kx (+ 1 (* (pow kx 2) (- (* (pow kx 2) (+ 1/120 (* -1/5040 (pow kx 2)))) 1/6))))))
#s(approx (/ (* (sin th) ky) (fabs (sin kx))) #s(hole binary64 (/ (* ky (sin th)) (fabs (sin kx)))))
#s(approx (fabs (sin kx)) #s(hole binary64 (fabs (sin kx))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (/ (sin ky) (sqrt (pow (sin ky) 2)))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow kx 2) (sin ky)) (pow (sqrt (pow (sin ky) 2)) 3))) (/ (sin ky) (sqrt (pow (sin ky) 2))))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ (* (pow kx 2) (- (* -1 (* (pow kx 2) (+ (* -1/2 (/ (* (sin ky) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2))))) (pow (sqrt (pow (sin ky) 2)) 3))) (* -1/4 (/ (sin ky) (pow (sqrt (pow (sin ky) 2)) 5)))))) (* 1/2 (/ (sin ky) (pow (sqrt (pow (sin ky) 2)) 3))))) (/ (sin ky) (sqrt (pow (sin ky) 2))))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ (* (pow kx 2) (- (* (pow kx 2) (- (* -1 (* (pow kx 2) (+ (* -1/2 (/ (+ (* -1/2 (/ (* (sin ky) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2))))) (pow (sqrt (pow (sin ky) 2)) 3))) (* -1/4 (/ (sin ky) (pow (sqrt (pow (sin ky) 2)) 5)))) (pow (sqrt (pow (sin ky) 2)) 2))) (+ (* 1/4 (/ (* (sin ky) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2))))) (pow (sqrt (pow (sin ky) 2)) 5))) (* 1/2 (/ (* (sin ky) (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2)))) (pow (sqrt (pow (sin ky) 2)) 2))))) (pow (sqrt (pow (sin ky) 2)) 3))))))) (+ (* -1/2 (/ (* (sin ky) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2))))) (pow (sqrt (pow (sin ky) 2)) 3))) (* -1/4 (/ (sin ky) (pow (sqrt (pow (sin ky) 2)) 5)))))) (* 1/2 (/ (sin ky) (pow (sqrt (pow (sin ky) 2)) 3))))) (/ (sin ky) (sqrt (pow (sin ky) 2))))))
#s(approx (/ (* 1 (sin th)) (* (/ 1 (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))))) #s(hole binary64 (/ (* (sin ky) (sin th)) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))
#s(approx (* (/ 1 (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(hole binary64 (/ (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sin ky))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) #s(hole binary64 (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
#s(approx (sin kx) #s(hole binary64 (sin kx)))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))
#s(approx (/ (* 1 (sin th)) (* (/ 1 (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))))) #s(hole binary64 (/ (* ky (sin th)) (sqrt (pow (sin kx) 2)))))
#s(approx (/ (* 1 (sin th)) (* (/ 1 (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))))) #s(hole binary64 (* ky (+ (* (pow ky 2) (- (* -1/6 (/ (sin th) (sqrt (pow (sin kx) 2)))) (* 1/2 (/ (sin th) (pow (sqrt (pow (sin kx) 2)) 3))))) (/ (sin th) (sqrt (pow (sin kx) 2)))))))
#s(approx (/ (* 1 (sin th)) (* (/ 1 (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))))) #s(hole binary64 (* ky (+ (* (pow ky 2) (- (+ (* -1/6 (/ (sin th) (sqrt (pow (sin kx) 2)))) (* (pow ky 2) (- (* 1/120 (/ (sin th) (sqrt (pow (sin kx) 2)))) (+ (* -1/2 (/ (* (sin th) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2))))) (pow (sqrt (pow (sin kx) 2)) 3))) (* 1/2 (/ (- (* -1/6 (/ (sin th) (sqrt (pow (sin kx) 2)))) (* 1/2 (/ (sin th) (pow (sqrt (pow (sin kx) 2)) 3)))) (pow (sqrt (pow (sin kx) 2)) 2))))))) (* 1/2 (/ (sin th) (pow (sqrt (pow (sin kx) 2)) 3))))) (/ (sin th) (sqrt (pow (sin kx) 2)))))))
#s(approx (/ (* 1 (sin th)) (* (/ 1 (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))))) #s(hole binary64 (* ky (+ (* (pow ky 2) (- (+ (* -1/6 (/ (sin th) (sqrt (pow (sin kx) 2)))) (* (pow ky 2) (- (+ (* 1/120 (/ (sin th) (sqrt (pow (sin kx) 2)))) (* (pow ky 2) (- (* -1/5040 (/ (sin th) (sqrt (pow (sin kx) 2)))) (+ (* -1/2 (/ (* (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2)))) (- (* -1/6 (/ (sin th) (sqrt (pow (sin kx) 2)))) (* 1/2 (/ (sin th) (pow (sqrt (pow (sin kx) 2)) 3))))) (pow (sqrt (pow (sin kx) 2)) 2))) (+ (* 1/2 (/ (* (sin th) (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2)))) (pow (sqrt (pow (sin kx) 2)) 2))))) (pow (sqrt (pow (sin kx) 2)) 3))) (* 1/2 (/ (- (* 1/120 (/ (sin th) (sqrt (pow (sin kx) 2)))) (+ (* -1/2 (/ (* (sin th) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2))))) (pow (sqrt (pow (sin kx) 2)) 3))) (* 1/2 (/ (- (* -1/6 (/ (sin th) (sqrt (pow (sin kx) 2)))) (* 1/2 (/ (sin th) (pow (sqrt (pow (sin kx) 2)) 3)))) (pow (sqrt (pow (sin kx) 2)) 2))))) (pow (sqrt (pow (sin kx) 2)) 2)))))))) (+ (* -1/2 (/ (* (sin th) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2))))) (pow (sqrt (pow (sin kx) 2)) 3))) (* 1/2 (/ (- (* -1/6 (/ (sin th) (sqrt (pow (sin kx) 2)))) (* 1/2 (/ (sin th) (pow (sqrt (pow (sin kx) 2)) 3)))) (pow (sqrt (pow (sin kx) 2)) 2))))))) (* 1/2 (/ (sin th) (pow (sqrt (pow (sin kx) 2)) 3))))) (/ (sin th) (sqrt (pow (sin kx) 2)))))))
#s(approx (* (/ 1 (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(hole binary64 (/ (sqrt (pow (sin kx) 2)) ky)))
#s(approx (* (/ 1 (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(hole binary64 (/ (+ (sqrt (pow (sin kx) 2)) (* (pow ky 2) (- (* 1/2 (/ 1 (sqrt (pow (sin kx) 2)))) (* -1/6 (sqrt (pow (sin kx) 2)))))) ky)))
#s(approx (* (/ 1 (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(hole binary64 (/ (+ (sqrt (pow (sin kx) 2)) (* (pow ky 2) (- (+ (* 1/2 (/ 1 (sqrt (pow (sin kx) 2)))) (* (pow ky 2) (- (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2)))) (sqrt (pow (sin kx) 2)))) (+ (* -1/6 (- (* 1/2 (/ 1 (sqrt (pow (sin kx) 2)))) (* -1/6 (sqrt (pow (sin kx) 2))))) (* 1/120 (sqrt (pow (sin kx) 2))))))) (* -1/6 (sqrt (pow (sin kx) 2)))))) ky)))
#s(approx (* (/ 1 (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(hole binary64 (/ (+ (sqrt (pow (sin kx) 2)) (* (pow ky 2) (- (+ (* 1/2 (/ 1 (sqrt (pow (sin kx) 2)))) (* (pow ky 2) (- (+ (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2)))) (sqrt (pow (sin kx) 2)))) (* (pow ky 2) (- (* 1/2 (/ (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2)))) (pow (sqrt (pow (sin kx) 2)) 2)))) (sqrt (pow (sin kx) 2)))) (+ (* -1/6 (- (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2)))) (sqrt (pow (sin kx) 2)))) (+ (* -1/6 (- (* 1/2 (/ 1 (sqrt (pow (sin kx) 2)))) (* -1/6 (sqrt (pow (sin kx) 2))))) (* 1/120 (sqrt (pow (sin kx) 2)))))) (+ (* -1/5040 (sqrt (pow (sin kx) 2))) (* 1/120 (- (* 1/2 (/ 1 (sqrt (pow (sin kx) 2)))) (* -1/6 (sqrt (pow (sin kx) 2)))))))))) (+ (* -1/6 (- (* 1/2 (/ 1 (sqrt (pow (sin kx) 2)))) (* -1/6 (sqrt (pow (sin kx) 2))))) (* 1/120 (sqrt (pow (sin kx) 2))))))) (* -1/6 (sqrt (pow (sin kx) 2)))))) ky)))
#s(approx (/ 1 (sin ky)) #s(hole binary64 (/ 1 ky)))
#s(approx (/ 1 (sin ky)) #s(hole binary64 (/ (+ 1 (* 1/6 (pow ky 2))) ky)))
#s(approx (/ 1 (sin ky)) #s(hole binary64 (/ (+ 1 (* (pow ky 2) (+ 1/6 (* 7/360 (pow ky 2))))) ky)))
#s(approx (/ 1 (sin ky)) #s(hole binary64 (/ (+ 1 (* (pow ky 2) (+ 1/6 (* (pow ky 2) (+ 7/360 (* 31/15120 (pow ky 2))))))) ky)))
#s(approx (sin ky) #s(hole binary64 ky))
#s(approx (sin ky) #s(hole binary64 (* ky (+ 1 (* -1/6 (pow ky 2))))))
#s(approx (sin ky) #s(hole binary64 (* ky (+ 1 (* (pow ky 2) (- (* 1/120 (pow ky 2)) 1/6))))))
#s(approx (sin ky) #s(hole binary64 (* ky (+ 1 (* (pow ky 2) (- (* (pow ky 2) (+ 1/120 (* -1/5040 (pow ky 2)))) 1/6))))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) #s(hole binary64 (sqrt (pow (sin kx) 2))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) #s(hole binary64 (+ (sqrt (pow (sin kx) 2)) (* 1/2 (/ (pow ky 2) (sqrt (pow (sin kx) 2)))))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) #s(hole binary64 (+ (sqrt (pow (sin kx) 2)) (* (pow ky 2) (+ (* -1/2 (/ (* (pow ky 2) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2))))) (sqrt (pow (sin kx) 2)))) (* 1/2 (/ 1 (sqrt (pow (sin kx) 2)))))))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) #s(hole binary64 (+ (sqrt (pow (sin kx) 2)) (* (pow ky 2) (+ (* (pow ky 2) (+ (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2)))) (sqrt (pow (sin kx) 2)))) (* 1/2 (/ (* (pow ky 2) (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2)))) (pow (sqrt (pow (sin kx) 2)) 2))))) (sqrt (pow (sin kx) 2)))))) (* 1/2 (/ 1 (sqrt (pow (sin kx) 2)))))))))
#s(approx (* (sin th) ky) #s(hole binary64 (* ky (sin th))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (/ ky (sqrt (pow (sin kx) 2)))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (* ky (+ (* -1 (* (pow ky 2) (+ (* 1/6 (/ 1 (sqrt (pow (sin kx) 2)))) (* 1/2 (/ 1 (pow (sqrt (pow (sin kx) 2)) 3)))))) (/ 1 (sqrt (pow (sin kx) 2)))))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (* ky (+ (* (pow ky 2) (- (* (pow ky 2) (- (* 1/120 (/ 1 (sqrt (pow (sin kx) 2)))) (+ (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2)))) (pow (sqrt (pow (sin kx) 2)) 3))) (* -1/2 (/ (+ (* 1/6 (/ 1 (sqrt (pow (sin kx) 2)))) (* 1/2 (/ 1 (pow (sqrt (pow (sin kx) 2)) 3)))) (pow (sqrt (pow (sin kx) 2)) 2)))))) (+ (* 1/6 (/ 1 (sqrt (pow (sin kx) 2)))) (* 1/2 (/ 1 (pow (sqrt (pow (sin kx) 2)) 3)))))) (/ 1 (sqrt (pow (sin kx) 2)))))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (* ky (+ (* (pow ky 2) (- (* (pow ky 2) (- (+ (* -1 (* (pow ky 2) (+ (* 1/5040 (/ 1 (sqrt (pow (sin kx) 2)))) (+ (* 1/2 (/ (* (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2)))) (+ (* 1/6 (/ 1 (sqrt (pow (sin kx) 2)))) (* 1/2 (/ 1 (pow (sqrt (pow (sin kx) 2)) 3))))) (pow (sqrt (pow (sin kx) 2)) 2))) (+ (* 1/2 (/ (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2)))) (pow (sqrt (pow (sin kx) 2)) 2)))) (pow (sqrt (pow (sin kx) 2)) 3))) (* 1/2 (/ (- (* 1/120 (/ 1 (sqrt (pow (sin kx) 2)))) (+ (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2)))) (pow (sqrt (pow (sin kx) 2)) 3))) (* -1/2 (/ (+ (* 1/6 (/ 1 (sqrt (pow (sin kx) 2)))) (* 1/2 (/ 1 (pow (sqrt (pow (sin kx) 2)) 3)))) (pow (sqrt (pow (sin kx) 2)) 2))))) (pow (sqrt (pow (sin kx) 2)) 2)))))))) (* 1/120 (/ 1 (sqrt (pow (sin kx) 2))))) (+ (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2)))) (pow (sqrt (pow (sin kx) 2)) 3))) (* -1/2 (/ (+ (* 1/6 (/ 1 (sqrt (pow (sin kx) 2)))) (* 1/2 (/ 1 (pow (sqrt (pow (sin kx) 2)) 3)))) (pow (sqrt (pow (sin kx) 2)) 2)))))) (+ (* 1/6 (/ 1 (sqrt (pow (sin kx) 2)))) (* 1/2 (/ 1 (pow (sqrt (pow (sin kx) 2)) 3)))))) (/ 1 (sqrt (pow (sin kx) 2)))))))
#s(approx (* (sin ky) (sin th)) #s(hole binary64 (* ky (+ (sin th) (* -1/6 (* (pow ky 2) (sin th)))))))
#s(approx (* (sin ky) (sin th)) #s(hole binary64 (* ky (+ (sin th) (* (pow ky 2) (+ (* -1/6 (sin th)) (* 1/120 (* (pow ky 2) (sin th)))))))))
#s(approx (* (sin ky) (sin th)) #s(hole binary64 (* ky (+ (sin th) (* (pow ky 2) (+ (* -1/6 (sin th)) (* (pow ky 2) (+ (* -1/5040 (* (pow ky 2) (sin th))) (* 1/120 (sin th))))))))))
#s(approx (exp (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2)) #s(hole binary64 (+ ky (* -1/6 (pow ky 3)))))
#s(approx (exp (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2)) #s(hole binary64 (+ ky (* (pow ky 2) (+ (* -1/6 ky) (* 1/120 (pow ky 3)))))))
#s(approx (exp (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2)) #s(hole binary64 (+ ky (* (pow ky 2) (+ (* -1/6 ky) (* (pow ky 2) (+ (* -1/5040 (pow ky 3)) (* 1/120 ky))))))))
#s(approx (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2) #s(hole binary64 (log ky)))
#s(approx (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2) #s(hole binary64 (+ (log ky) (* -1/6 (pow ky 2)))))
#s(approx (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2) #s(hole binary64 (+ (log ky) (* (pow ky 2) (- (* -1/180 (pow ky 2)) 1/6)))))
#s(approx (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2) #s(hole binary64 (+ (log ky) (* (pow ky 2) (- (* (pow ky 2) (- (* -1/2835 (pow ky 2)) 1/180)) 1/6)))))
#s(approx (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) #s(hole binary64 (* 2 (log ky))))
#s(approx (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) #s(hole binary64 (- (* -1/3 (pow ky 2)) (* -2 (log ky)))))
#s(approx (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) #s(hole binary64 (- (* (pow ky 2) (- (* -1/90 (pow ky 2)) 1/3)) (* -2 (log ky)))))
#s(approx (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) #s(hole binary64 (- (* (pow ky 2) (- (* (pow ky 2) (- (* -2/2835 (pow ky 2)) 1/90)) 1/3)) (* -2 (log ky)))))
#s(approx (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2)))) #s(hole binary64 (* -2 (log ky))))
#s(approx (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2)))) #s(hole binary64 (+ (* -2 (log ky)) (* 1/3 (pow ky 2)))))
#s(approx (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2)))) #s(hole binary64 (+ (* -2 (log ky)) (* (pow ky 2) (+ 1/3 (* 1/90 (pow ky 2)))))))
#s(approx (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2)))) #s(hole binary64 (+ (* -2 (log ky)) (* (pow ky 2) (+ 1/3 (* (pow ky 2) (+ 1/90 (* 2/2835 (pow ky 2)))))))))
#s(approx (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))) #s(hole binary64 (/ 1 (pow ky 2))))
#s(approx (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))) #s(hole binary64 (/ (+ 1 (* 1/3 (pow ky 2))) (pow ky 2))))
#s(approx (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))) #s(hole binary64 (/ (+ 1 (* (pow ky 2) (+ 1/3 (* 1/15 (pow ky 2))))) (pow ky 2))))
#s(approx (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))) #s(hole binary64 (/ (+ 1 (* (pow ky 2) (+ 1/3 (* (pow ky 2) (+ 1/15 (* 2/189 (pow ky 2))))))) (pow ky 2))))
#s(approx (- 1/2 (* (cos (+ ky ky)) 1/2)) #s(hole binary64 (pow ky 2)))
#s(approx (- 1/2 (* (cos (+ ky ky)) 1/2)) #s(hole binary64 (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2))))))
#s(approx (- 1/2 (* (cos (+ ky ky)) 1/2)) #s(hole binary64 (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3))))))
#s(approx (- 1/2 (* (cos (+ ky ky)) 1/2)) #s(hole binary64 (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* (pow ky 2) (+ 2/45 (* -1/315 (pow ky 2)))) 1/3))))))
#s(approx (* (cos (+ ky ky)) 1/2) #s(hole binary64 1/2))
#s(approx (* (cos (+ ky ky)) 1/2) #s(hole binary64 (+ 1/2 (* -1 (pow ky 2)))))
#s(approx (* (cos (+ ky ky)) 1/2) #s(hole binary64 (+ 1/2 (* (pow ky 2) (- (* 1/3 (pow ky 2)) 1)))))
#s(approx (* (cos (+ ky ky)) 1/2) #s(hole binary64 (+ 1/2 (* (pow ky 2) (- (* (pow ky 2) (+ 1/3 (* -2/45 (pow ky 2)))) 1)))))
#s(approx (cos (+ ky ky)) #s(hole binary64 1))
#s(approx (cos (+ ky ky)) #s(hole binary64 (+ 1 (* -2 (pow ky 2)))))
#s(approx (cos (+ ky ky)) #s(hole binary64 (+ 1 (* (pow ky 2) (- (* 2/3 (pow ky 2)) 2)))))
#s(approx (cos (+ ky ky)) #s(hole binary64 (+ 1 (* (pow ky 2) (- (* (pow ky 2) (+ 2/3 (* -4/45 (pow ky 2)))) 2)))))
#s(approx (+ ky ky) #s(hole binary64 (* 2 ky)))
#s(approx (/ 1 (sin ky)) #s(hole binary64 (/ 1 (sin ky))))
#s(approx (sin ky) #s(hole binary64 (sin ky)))
#s(approx (* (sin ky) (sin th)) #s(hole binary64 (* (sin ky) (sin th))))
#s(approx (exp (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2)) #s(hole binary64 (pow (/ 1 (- 1/2 (* 1/2 (cos (* 2 ky))))) -1/2)))
#s(approx (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2) #s(hole binary64 (* -1/2 (log (/ 1 (- 1/2 (* 1/2 (cos (* 2 ky)))))))))
#s(approx (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) #s(hole binary64 (* -1 (log (/ 1 (- 1/2 (* 1/2 (cos (* 2 ky)))))))))
#s(approx (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2)))) #s(hole binary64 (log (/ 1 (- 1/2 (* 1/2 (cos (* 2 ky))))))))
#s(approx (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))) #s(hole binary64 (/ 1 (- 1/2 (* 1/2 (cos (* 2 ky)))))))
#s(approx (- 1/2 (* (cos (+ ky ky)) 1/2)) #s(hole binary64 (- 1/2 (* 1/2 (cos (* 2 ky))))))
#s(approx (* (cos (+ ky ky)) 1/2) #s(hole binary64 (* 1/2 (cos (* 2 ky)))))
#s(approx (cos (+ ky ky)) #s(hole binary64 (cos (* 2 ky))))
#s(approx (exp (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2)) #s(hole binary64 (pow (/ 1 (- 1/2 (* 1/2 (cos (neg (* -2 ky)))))) -1/2)))
#s(approx (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2) #s(hole binary64 (* -1/2 (log (/ 1 (- 1/2 (* 1/2 (cos (neg (* -2 ky))))))))))
#s(approx (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) #s(hole binary64 (* -1 (log (/ 1 (- 1/2 (* 1/2 (cos (neg (* -2 ky))))))))))
#s(approx (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2)))) #s(hole binary64 (log (/ 1 (- 1/2 (* 1/2 (cos (neg (* -2 ky)))))))))
#s(approx (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))) #s(hole binary64 (/ 1 (- 1/2 (* 1/2 (cos (neg (* -2 ky))))))))
#s(approx (- 1/2 (* (cos (+ ky ky)) 1/2)) #s(hole binary64 (- 1/2 (* 1/2 (cos (neg (* -2 ky)))))))
#s(approx (* (cos (+ ky ky)) 1/2) #s(hole binary64 (* 1/2 (cos (neg (* -2 ky))))))
#s(approx (cos (+ ky ky)) #s(hole binary64 (cos (neg (* -2 ky)))))
#s(approx (/ (* 1 (sin th)) (* (/ 1 (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))))) #s(hole binary64 (/ (* th (sin ky)) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))
#s(approx (/ (* 1 (sin th)) (* (/ 1 (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))))) #s(hole binary64 (* th (+ (* -1/6 (/ (* (pow th 2) (sin ky)) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))
#s(approx (/ (* 1 (sin th)) (* (/ 1 (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))))) #s(hole binary64 (* th (+ (* (pow th 2) (+ (* -1/6 (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 1/120 (/ (* (pow th 2) (sin ky)) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))
#s(approx (/ (* 1 (sin th)) (* (/ 1 (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))))) #s(hole binary64 (* th (+ (* (pow th 2) (+ (* -1/6 (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* (pow th 2) (+ (* -1/5040 (/ (* (pow th 2) (sin ky)) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 1/120 (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))
#s(approx (* 1 (sin th)) #s(hole binary64 th))
#s(approx (* 1 (sin th)) #s(hole binary64 (* th (+ 1 (* -1/6 (pow th 2))))))
#s(approx (* 1 (sin th)) #s(hole binary64 (* th (+ 1 (* (pow th 2) (- (* 1/120 (pow th 2)) 1/6))))))
#s(approx (* 1 (sin th)) #s(hole binary64 (* th (+ 1 (* (pow th 2) (- (* (pow th 2) (+ 1/120 (* -1/5040 (pow th 2)))) 1/6))))))
#s(approx (/ (* (sin th) ky) (fabs (sin kx))) #s(hole binary64 (/ (* ky th) (fabs (sin kx)))))
#s(approx (/ (* (sin th) ky) (fabs (sin kx))) #s(hole binary64 (* th (+ (* -1/6 (/ (* ky (pow th 2)) (fabs (sin kx)))) (/ ky (fabs (sin kx)))))))
#s(approx (/ (* (sin th) ky) (fabs (sin kx))) #s(hole binary64 (* th (+ (* (pow th 2) (+ (* -1/6 (/ ky (fabs (sin kx)))) (* 1/120 (/ (* ky (pow th 2)) (fabs (sin kx)))))) (/ ky (fabs (sin kx)))))))
#s(approx (/ (* (sin th) ky) (fabs (sin kx))) #s(hole binary64 (* th (+ (* (pow th 2) (+ (* -1/6 (/ ky (fabs (sin kx)))) (* (pow th 2) (+ (* -1/5040 (/ (* ky (pow th 2)) (fabs (sin kx)))) (* 1/120 (/ ky (fabs (sin kx)))))))) (/ ky (fabs (sin kx)))))))
#s(approx (* (sin th) ky) #s(hole binary64 (* ky th)))
#s(approx (* (sin th) ky) #s(hole binary64 (* th (+ ky (* -1/6 (* ky (pow th 2)))))))
#s(approx (* (sin th) ky) #s(hole binary64 (* th (+ ky (* (pow th 2) (+ (* -1/6 ky) (* 1/120 (* ky (pow th 2)))))))))
#s(approx (* (sin th) ky) #s(hole binary64 (* th (+ ky (* (pow th 2) (+ (* -1/6 ky) (* (pow th 2) (+ (* -1/5040 (* ky (pow th 2))) (* 1/120 ky)))))))))
#s(approx (* (sin ky) (sin th)) #s(hole binary64 (* th (sin ky))))
#s(approx (* (sin ky) (sin th)) #s(hole binary64 (* th (+ (sin ky) (* -1/6 (* (pow th 2) (sin ky)))))))
#s(approx (* (sin ky) (sin th)) #s(hole binary64 (* th (+ (sin ky) (* (pow th 2) (+ (* -1/6 (sin ky)) (* 1/120 (* (pow th 2) (sin ky)))))))))
#s(approx (* (sin ky) (sin th)) #s(hole binary64 (* th (+ (sin ky) (* (pow th 2) (+ (* -1/6 (sin ky)) (* (pow th 2) (+ (* -1/5040 (* (pow th 2) (sin ky))) (* 1/120 (sin ky))))))))))
#s(approx (+ (* (* (- (* (* (+ (* (* th th) -1/5040) 1/120) th) th) 1/6) th) th) 1) #s(hole binary64 (+ 1 (* -1/6 (pow th 2)))))
#s(approx (+ (* (* (- (* (* (+ (* (* th th) -1/5040) 1/120) th) th) 1/6) th) th) 1) #s(hole binary64 (+ 1 (* (pow th 2) (- (* 1/120 (pow th 2)) 1/6)))))
#s(approx (+ (* (* (- (* (* (+ (* (* th th) -1/5040) 1/120) th) th) 1/6) th) th) 1) #s(hole binary64 (+ 1 (* (pow th 2) (- (* (pow th 2) (+ 1/120 (* -1/5040 (pow th 2)))) 1/6)))))
#s(approx (* (- (* (* (+ (* (* th th) -1/5040) 1/120) th) th) 1/6) th) #s(hole binary64 (* -1/6 th)))
#s(approx (* (- (* (* (+ (* (* th th) -1/5040) 1/120) th) th) 1/6) th) #s(hole binary64 (* th (- (* 1/120 (pow th 2)) 1/6))))
#s(approx (* (- (* (* (+ (* (* th th) -1/5040) 1/120) th) th) 1/6) th) #s(hole binary64 (* th (- (* (pow th 2) (+ 1/120 (* -1/5040 (pow th 2)))) 1/6))))
#s(approx (- (* (* (+ (* (* th th) -1/5040) 1/120) th) th) 1/6) #s(hole binary64 -1/6))
#s(approx (- (* (* (+ (* (* th th) -1/5040) 1/120) th) th) 1/6) #s(hole binary64 (- (* 1/120 (pow th 2)) 1/6)))
#s(approx (- (* (* (+ (* (* th th) -1/5040) 1/120) th) th) 1/6) #s(hole binary64 (- (* (pow th 2) (+ 1/120 (* -1/5040 (pow th 2)))) 1/6)))
#s(approx (* (* (+ (* (* th th) -1/5040) 1/120) th) th) #s(hole binary64 (* 1/120 (pow th 2))))
#s(approx (* (* (+ (* (* th th) -1/5040) 1/120) th) th) #s(hole binary64 (* (pow th 2) (+ 1/120 (* -1/5040 (pow th 2))))))
#s(approx (* (+ (* (* th th) -1/5040) 1/120) th) #s(hole binary64 (* 1/120 th)))
#s(approx (* (+ (* (* th th) -1/5040) 1/120) th) #s(hole binary64 (* th (+ 1/120 (* -1/5040 (pow th 2))))))
#s(approx (+ (* (* th th) -1/5040) 1/120) #s(hole binary64 1/120))
#s(approx (+ (* (* th th) -1/5040) 1/120) #s(hole binary64 (+ 1/120 (* -1/5040 (pow th 2)))))
#s(approx (* th th) #s(hole binary64 (pow th 2)))
#s(approx (* 1 (sin th)) #s(hole binary64 (sin th)))
#s(approx (* (+ (* (* (- (* (* (+ (* (* th th) -1/5040) 1/120) th) th) 1/6) th) th) 1) th) #s(hole binary64 (* -1/5040 (pow th 7))))
#s(approx (* (+ (* (* (- (* (* (+ (* (* th th) -1/5040) 1/120) th) th) 1/6) th) th) 1) th) #s(hole binary64 (* (pow th 7) (- (* 1/120 (/ 1 (pow th 2))) 1/5040))))
#s(approx (* (+ (* (* (- (* (* (+ (* (* th th) -1/5040) 1/120) th) th) 1/6) th) th) 1) th) #s(hole binary64 (* (pow th 7) (- (* 1/120 (/ 1 (pow th 2))) (+ 1/5040 (/ 1/6 (pow th 4)))))))
#s(approx (* (+ (* (* (- (* (* (+ (* (* th th) -1/5040) 1/120) th) th) 1/6) th) th) 1) th) #s(hole binary64 (* (pow th 7) (- (+ (* 1/120 (/ 1 (pow th 2))) (/ 1 (pow th 6))) (+ 1/5040 (/ 1/6 (pow th 4)))))))
#s(approx (+ (* (* (- (* (* (+ (* (* th th) -1/5040) 1/120) th) th) 1/6) th) th) 1) #s(hole binary64 (* -1/5040 (pow th 6))))
#s(approx (+ (* (* (- (* (* (+ (* (* th th) -1/5040) 1/120) th) th) 1/6) th) th) 1) #s(hole binary64 (* (pow th 6) (- (* 1/120 (/ 1 (pow th 2))) 1/5040))))
#s(approx (+ (* (* (- (* (* (+ (* (* th th) -1/5040) 1/120) th) th) 1/6) th) th) 1) #s(hole binary64 (* (pow th 6) (- (* 1/120 (/ 1 (pow th 2))) (+ 1/5040 (/ 1/6 (pow th 4)))))))
#s(approx (+ (* (* (- (* (* (+ (* (* th th) -1/5040) 1/120) th) th) 1/6) th) th) 1) #s(hole binary64 (* (pow th 6) (- (+ (* 1/120 (/ 1 (pow th 2))) (/ 1 (pow th 6))) (+ 1/5040 (/ 1/6 (pow th 4)))))))
#s(approx (* (- (* (* (+ (* (* th th) -1/5040) 1/120) th) th) 1/6) th) #s(hole binary64 (* -1/5040 (pow th 5))))
#s(approx (* (- (* (* (+ (* (* th th) -1/5040) 1/120) th) th) 1/6) th) #s(hole binary64 (* (pow th 5) (- (* 1/120 (/ 1 (pow th 2))) 1/5040))))
#s(approx (* (- (* (* (+ (* (* th th) -1/5040) 1/120) th) th) 1/6) th) #s(hole binary64 (* (pow th 5) (- (* 1/120 (/ 1 (pow th 2))) (+ 1/5040 (/ 1/6 (pow th 4)))))))
#s(approx (- (* (* (+ (* (* th th) -1/5040) 1/120) th) th) 1/6) #s(hole binary64 (* -1/5040 (pow th 4))))
#s(approx (- (* (* (+ (* (* th th) -1/5040) 1/120) th) th) 1/6) #s(hole binary64 (* (pow th 4) (- (* 1/120 (/ 1 (pow th 2))) 1/5040))))
#s(approx (- (* (* (+ (* (* th th) -1/5040) 1/120) th) th) 1/6) #s(hole binary64 (* (pow th 4) (- (* 1/120 (/ 1 (pow th 2))) (+ 1/5040 (/ 1/6 (pow th 4)))))))
#s(approx (* (+ (* (* th th) -1/5040) 1/120) th) #s(hole binary64 (* -1/5040 (pow th 3))))
#s(approx (* (+ (* (* th th) -1/5040) 1/120) th) #s(hole binary64 (* (pow th 3) (- (* 1/120 (/ 1 (pow th 2))) 1/5040))))
#s(approx (+ (* (* th th) -1/5040) 1/120) #s(hole binary64 (* -1/5040 (pow th 2))))
#s(approx (+ (* (* th th) -1/5040) 1/120) #s(hole binary64 (* (pow th 2) (- (* 1/120 (/ 1 (pow th 2))) 1/5040))))
#s(approx (* (+ (* (* (- (* (* (+ (* (* th th) -1/5040) 1/120) th) th) 1/6) th) th) 1) th) #s(hole binary64 (* -1 (* (pow th 7) (- 1/5040 (* 1/120 (/ 1 (pow th 2))))))))
#s(approx (* (+ (* (* (- (* (* (+ (* (* th th) -1/5040) 1/120) th) th) 1/6) th) th) 1) th) #s(hole binary64 (* -1 (* (pow th 7) (- (+ 1/5040 (/ 1/6 (pow th 4))) (* 1/120 (/ 1 (pow th 2))))))))
#s(approx (* (+ (* (* (- (* (* (+ (* (* th th) -1/5040) 1/120) th) th) 1/6) th) th) 1) th) #s(hole binary64 (* -1 (* (pow th 7) (- (+ 1/5040 (/ 1/6 (pow th 4))) (+ (* 1/120 (/ 1 (pow th 2))) (/ 1 (pow th 6))))))))
#s(approx (* (- (* (* (+ (* (* th th) -1/5040) 1/120) th) th) 1/6) th) #s(hole binary64 (* -1 (* (pow th 5) (- 1/5040 (* 1/120 (/ 1 (pow th 2))))))))
#s(approx (* (- (* (* (+ (* (* th th) -1/5040) 1/120) th) th) 1/6) th) #s(hole binary64 (* -1 (* (pow th 5) (- (+ 1/5040 (/ 1/6 (pow th 4))) (* 1/120 (/ 1 (pow th 2))))))))
#s(approx (* (+ (* (* th th) -1/5040) 1/120) th) #s(hole binary64 (* -1 (* (pow th 3) (- 1/5040 (* 1/120 (/ 1 (pow th 2))))))))
Calls

9 calls:

TimeVariablePointExpression
88.0ms
ky
@-inf
((/ (* 1 (sin th)) (* (/ 1 (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))))) (* 1 (sin th)) 1 (sin th) th (* (/ 1 (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/ 1 (sin ky)) (sin ky) ky (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (sin kx) kx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (* (sin th) ky) (fabs (sin kx))) (* (sin th) ky) (sin th) (fabs (sin kx)) (sin kx) (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (/ 1 (pow (sin ky) -1)) (/ (* (sin ky) (sin th)) (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1)))))) (* (sin ky) (sin th)) (sin th) (* (+ (* (* (- (* (* (+ (* (* th th) -1/5040) 1/120) th) th) 1/6) th) th) 1) th) (+ (* (* (- (* (* (+ (* (* th th) -1/5040) 1/120) th) th) 1/6) th) th) 1) (* (- (* (* (+ (* (* th th) -1/5040) 1/120) th) th) 1/6) th) (- (* (* (+ (* (* th th) -1/5040) 1/120) th) th) 1/6) (* (* (+ (* (* th th) -1/5040) 1/120) th) th) (* (+ (* (* th th) -1/5040) 1/120) th) (+ (* (* th th) -1/5040) 1/120) (* th th) -1/5040 1/120 1/6 (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (exp (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2)) (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2) (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2)))) (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))) (- 1/2 (* (cos (+ ky ky)) 1/2)) 1/2 (* (cos (+ ky ky)) 1/2) (cos (+ ky ky)) (+ ky ky))
23.0ms
ky
@inf
((/ (* 1 (sin th)) (* (/ 1 (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))))) (* 1 (sin th)) 1 (sin th) th (* (/ 1 (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/ 1 (sin ky)) (sin ky) ky (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (sin kx) kx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (* (sin th) ky) (fabs (sin kx))) (* (sin th) ky) (sin th) (fabs (sin kx)) (sin kx) (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (/ 1 (pow (sin ky) -1)) (/ (* (sin ky) (sin th)) (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1)))))) (* (sin ky) (sin th)) (sin th) (* (+ (* (* (- (* (* (+ (* (* th th) -1/5040) 1/120) th) th) 1/6) th) th) 1) th) (+ (* (* (- (* (* (+ (* (* th th) -1/5040) 1/120) th) th) 1/6) th) th) 1) (* (- (* (* (+ (* (* th th) -1/5040) 1/120) th) th) 1/6) th) (- (* (* (+ (* (* th th) -1/5040) 1/120) th) th) 1/6) (* (* (+ (* (* th th) -1/5040) 1/120) th) th) (* (+ (* (* th th) -1/5040) 1/120) th) (+ (* (* th th) -1/5040) 1/120) (* th th) -1/5040 1/120 1/6 (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (exp (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2)) (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2) (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2)))) (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))) (- 1/2 (* (cos (+ ky ky)) 1/2)) 1/2 (* (cos (+ ky ky)) 1/2) (cos (+ ky ky)) (+ ky ky))
6.0ms
kx
@0
((/ (* 1 (sin th)) (* (/ 1 (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))))) (* 1 (sin th)) 1 (sin th) th (* (/ 1 (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/ 1 (sin ky)) (sin ky) ky (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (sin kx) kx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (* (sin th) ky) (fabs (sin kx))) (* (sin th) ky) (sin th) (fabs (sin kx)) (sin kx) (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (/ 1 (pow (sin ky) -1)) (/ (* (sin ky) (sin th)) (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1)))))) (* (sin ky) (sin th)) (sin th) (* (+ (* (* (- (* (* (+ (* (* th th) -1/5040) 1/120) th) th) 1/6) th) th) 1) th) (+ (* (* (- (* (* (+ (* (* th th) -1/5040) 1/120) th) th) 1/6) th) th) 1) (* (- (* (* (+ (* (* th th) -1/5040) 1/120) th) th) 1/6) th) (- (* (* (+ (* (* th th) -1/5040) 1/120) th) th) 1/6) (* (* (+ (* (* th th) -1/5040) 1/120) th) th) (* (+ (* (* th th) -1/5040) 1/120) th) (+ (* (* th th) -1/5040) 1/120) (* th th) -1/5040 1/120 1/6 (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (exp (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2)) (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2) (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2)))) (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))) (- 1/2 (* (cos (+ ky ky)) 1/2)) 1/2 (* (cos (+ ky ky)) 1/2) (cos (+ ky ky)) (+ ky ky))
5.0ms
ky
@0
((/ (* 1 (sin th)) (* (/ 1 (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))))) (* 1 (sin th)) 1 (sin th) th (* (/ 1 (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/ 1 (sin ky)) (sin ky) ky (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (sin kx) kx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (* (sin th) ky) (fabs (sin kx))) (* (sin th) ky) (sin th) (fabs (sin kx)) (sin kx) (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (/ 1 (pow (sin ky) -1)) (/ (* (sin ky) (sin th)) (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1)))))) (* (sin ky) (sin th)) (sin th) (* (+ (* (* (- (* (* (+ (* (* th th) -1/5040) 1/120) th) th) 1/6) th) th) 1) th) (+ (* (* (- (* (* (+ (* (* th th) -1/5040) 1/120) th) th) 1/6) th) th) 1) (* (- (* (* (+ (* (* th th) -1/5040) 1/120) th) th) 1/6) th) (- (* (* (+ (* (* th th) -1/5040) 1/120) th) th) 1/6) (* (* (+ (* (* th th) -1/5040) 1/120) th) th) (* (+ (* (* th th) -1/5040) 1/120) th) (+ (* (* th th) -1/5040) 1/120) (* th th) -1/5040 1/120 1/6 (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (exp (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2)) (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2) (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2)))) (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))) (- 1/2 (* (cos (+ ky ky)) 1/2)) 1/2 (* (cos (+ ky ky)) 1/2) (cos (+ ky ky)) (+ ky ky))
4.0ms
th
@-inf
((/ (* 1 (sin th)) (* (/ 1 (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))))) (* 1 (sin th)) 1 (sin th) th (* (/ 1 (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/ 1 (sin ky)) (sin ky) ky (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (sin kx) kx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (* (sin th) ky) (fabs (sin kx))) (* (sin th) ky) (sin th) (fabs (sin kx)) (sin kx) (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (/ 1 (pow (sin ky) -1)) (/ (* (sin ky) (sin th)) (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1)))))) (* (sin ky) (sin th)) (sin th) (* (+ (* (* (- (* (* (+ (* (* th th) -1/5040) 1/120) th) th) 1/6) th) th) 1) th) (+ (* (* (- (* (* (+ (* (* th th) -1/5040) 1/120) th) th) 1/6) th) th) 1) (* (- (* (* (+ (* (* th th) -1/5040) 1/120) th) th) 1/6) th) (- (* (* (+ (* (* th th) -1/5040) 1/120) th) th) 1/6) (* (* (+ (* (* th th) -1/5040) 1/120) th) th) (* (+ (* (* th th) -1/5040) 1/120) th) (+ (* (* th th) -1/5040) 1/120) (* th th) -1/5040 1/120 1/6 (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (exp (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2)) (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2) (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2)))) (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))) (- 1/2 (* (cos (+ ky ky)) 1/2)) 1/2 (* (cos (+ ky ky)) 1/2) (cos (+ ky ky)) (+ ky ky))

rewrite208.0ms (3.1%)

Memory
-29.8MiB live, 303.9MiB allocated; 49ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
08986427
09665395
151875033
083564839
Stop Event
iter-limit
node-limit
iter-limit
Counts
217 → 495
Calls
Call 1
Inputs
(/.f64 (*.f64 #s(literal 1 binary64) (sin.f64 th)) (*.f64 (/.f64 #s(literal 1 binary64) (sin.f64 ky)) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))
(*.f64 #s(literal 1 binary64) (sin.f64 th))
#s(literal 1 binary64)
(sin.f64 th)
th
(*.f64 (/.f64 #s(literal 1 binary64) (sin.f64 ky)) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))
(/.f64 #s(literal 1 binary64) (sin.f64 ky))
(sin.f64 ky)
ky
(hypot.f64 (sin.f64 kx) (sin.f64 ky))
(sin.f64 kx)
kx
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (fabs.f64 #s(approx (sin kx) kx))))
(/.f64 (*.f64 #s(approx (sin th) th) ky) (fabs.f64 #s(approx (sin kx) kx)))
(*.f64 #s(approx (sin th) th) ky)
#s(approx (sin th) th)
(fabs.f64 #s(approx (sin kx) kx))
#s(approx (sin kx) kx)
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(approx (/ 1 (pow (sin ky) -1)) (sin.f64 ky)))) #s(approx (sin th) th))
(/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(approx (/ 1 (pow (sin ky) -1)) (sin.f64 ky))))
#s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(approx (/ 1 (pow (sin ky) -1)) (sin.f64 ky)))
#s(approx (/ 1 (pow (sin ky) -1)) (sin.f64 ky))
(/.f64 (*.f64 (sin.f64 ky) #s(approx (sin th) (*.f64 (fma.f64 (*.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) th) th) #s(literal 1/6 binary64)) th) th #s(literal 1 binary64)) th))) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) (sin.f64 ky)))
(*.f64 (sin.f64 ky) #s(approx (sin th) (*.f64 (fma.f64 (*.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) th) th) #s(literal 1/6 binary64)) th) th #s(literal 1 binary64)) th)))
#s(approx (sin th) (*.f64 (fma.f64 (*.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) th) th) #s(literal 1/6 binary64)) th) th #s(literal 1 binary64)) th))
(*.f64 (fma.f64 (*.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) th) th) #s(literal 1/6 binary64)) th) th #s(literal 1 binary64)) th)
(fma.f64 (*.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) th) th) #s(literal 1/6 binary64)) th) th #s(literal 1 binary64))
(*.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) th) th) #s(literal 1/6 binary64)) th)
(-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) th) th) #s(literal 1/6 binary64))
(*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) th) th)
(*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) th)
(fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64))
(*.f64 th th)
#s(literal -1/5040 binary64)
#s(literal 1/120 binary64)
#s(literal 1/6 binary64)
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) (sin.f64 ky))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (exp.f64 (*.f64 (neg.f64 (log.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))) #s(literal 1/2 binary64))))) (sin.f64 th))
(/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (exp.f64 (*.f64 (neg.f64 (log.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))) #s(literal 1/2 binary64)))))
#s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (exp.f64 (*.f64 (neg.f64 (log.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))) #s(literal 1/2 binary64))))
(exp.f64 (*.f64 (neg.f64 (log.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))) #s(literal 1/2 binary64)))
(*.f64 (neg.f64 (log.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))) #s(literal 1/2 binary64))
(neg.f64 (log.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))
(log.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 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)))
#s(literal 1/2 binary64)
(*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))
(cos.f64 (+.f64 ky ky))
(+.f64 ky ky)
#s(approx (/ (* 1 (sin th)) (* (/ 1 (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))))) #s(hole binary64 (/ (* (sin ky) (sin th)) (sqrt (pow (sin ky) 2)))))
#s(approx (/ (* 1 (sin th)) (* (/ 1 (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow kx 2) (* (sin ky) (sin th))) (pow (sqrt (pow (sin ky) 2)) 3))) (/ (* (sin ky) (sin th)) (sqrt (pow (sin ky) 2))))))
#s(approx (/ (* 1 (sin th)) (* (/ 1 (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))))) #s(hole binary64 (+ (* (pow kx 2) (- (* -1 (* (pow kx 2) (+ (* -1/2 (/ (* (sin ky) (* (sin th) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2)))))) (pow (sqrt (pow (sin ky) 2)) 3))) (* -1/4 (/ (* (sin ky) (sin th)) (pow (sqrt (pow (sin ky) 2)) 5)))))) (* 1/2 (/ (* (sin ky) (sin th)) (pow (sqrt (pow (sin ky) 2)) 3))))) (/ (* (sin ky) (sin th)) (sqrt (pow (sin ky) 2))))))
#s(approx (/ (* 1 (sin th)) (* (/ 1 (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))))) #s(hole binary64 (+ (* (pow kx 2) (- (* (pow kx 2) (- (* -1 (* (pow kx 2) (+ (* -1/2 (/ (+ (* -1/2 (/ (* (sin ky) (* (sin th) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2)))))) (pow (sqrt (pow (sin ky) 2)) 3))) (* -1/4 (/ (* (sin ky) (sin th)) (pow (sqrt (pow (sin ky) 2)) 5)))) (pow (sqrt (pow (sin ky) 2)) 2))) (+ (* 1/4 (/ (* (sin ky) (* (sin th) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2)))))) (pow (sqrt (pow (sin ky) 2)) 5))) (* 1/2 (/ (* (sin ky) (* (sin th) (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2)))) (pow (sqrt (pow (sin ky) 2)) 2)))))) (pow (sqrt (pow (sin ky) 2)) 3))))))) (+ (* -1/2 (/ (* (sin ky) (* (sin th) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2)))))) (pow (sqrt (pow (sin ky) 2)) 3))) (* -1/4 (/ (* (sin ky) (sin th)) (pow (sqrt (pow (sin ky) 2)) 5)))))) (* 1/2 (/ (* (sin ky) (sin th)) (pow (sqrt (pow (sin ky) 2)) 3))))) (/ (* (sin ky) (sin th)) (sqrt (pow (sin ky) 2))))))
#s(approx (* (/ 1 (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(hole binary64 (/ (sqrt (pow (sin ky) 2)) (sin ky))))
#s(approx (* (/ 1 (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(hole binary64 (+ (* 1/2 (/ (pow kx 2) (* (sin ky) (sqrt (pow (sin ky) 2))))) (/ (sqrt (pow (sin ky) 2)) (sin ky)))))
#s(approx (* (/ 1 (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(hole binary64 (+ (* (pow kx 2) (+ (* -1/2 (/ (* (pow kx 2) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2))))) (* (sin ky) (sqrt (pow (sin ky) 2))))) (* 1/2 (/ 1 (* (sin ky) (sqrt (pow (sin ky) 2))))))) (/ (sqrt (pow (sin ky) 2)) (sin ky)))))
#s(approx (* (/ 1 (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(hole binary64 (+ (* (pow kx 2) (+ (* (pow kx 2) (+ (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2)))) (* (sin ky) (sqrt (pow (sin ky) 2))))) (* 1/2 (/ (* (pow kx 2) (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2)))) (pow (sqrt (pow (sin ky) 2)) 2))))) (* (sin ky) (sqrt (pow (sin ky) 2))))))) (* 1/2 (/ 1 (* (sin ky) (sqrt (pow (sin ky) 2))))))) (/ (sqrt (pow (sin ky) 2)) (sin ky)))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) #s(hole binary64 (sqrt (pow (sin ky) 2))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) #s(hole binary64 (+ (sqrt (pow (sin ky) 2)) (* 1/2 (/ (pow kx 2) (sqrt (pow (sin ky) 2)))))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) #s(hole binary64 (+ (sqrt (pow (sin ky) 2)) (* (pow kx 2) (+ (* -1/2 (/ (* (pow kx 2) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2))))) (sqrt (pow (sin ky) 2)))) (* 1/2 (/ 1 (sqrt (pow (sin ky) 2)))))))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) #s(hole binary64 (+ (sqrt (pow (sin ky) 2)) (* (pow kx 2) (+ (* (pow kx 2) (+ (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2)))) (sqrt (pow (sin ky) 2)))) (* 1/2 (/ (* (pow kx 2) (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2)))) (pow (sqrt (pow (sin ky) 2)) 2))))) (sqrt (pow (sin ky) 2)))))) (* 1/2 (/ 1 (sqrt (pow (sin ky) 2)))))))))
#s(approx (sin kx) #s(hole binary64 kx))
#s(approx (sin kx) #s(hole binary64 (* kx (+ 1 (* -1/6 (pow kx 2))))))
#s(approx (sin kx) #s(hole binary64 (* kx (+ 1 (* (pow kx 2) (- (* 1/120 (pow kx 2)) 1/6))))))
#s(approx (sin kx) #s(hole binary64 (* kx (+ 1 (* (pow kx 2) (- (* (pow kx 2) (+ 1/120 (* -1/5040 (pow kx 2)))) 1/6))))))
#s(approx (/ (* (sin th) ky) (fabs (sin kx))) #s(hole binary64 (/ (* ky (sin th)) (fabs (sin kx)))))
#s(approx (fabs (sin kx)) #s(hole binary64 (fabs (sin kx))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (/ (sin ky) (sqrt (pow (sin ky) 2)))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow kx 2) (sin ky)) (pow (sqrt (pow (sin ky) 2)) 3))) (/ (sin ky) (sqrt (pow (sin ky) 2))))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ (* (pow kx 2) (- (* -1 (* (pow kx 2) (+ (* -1/2 (/ (* (sin ky) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2))))) (pow (sqrt (pow (sin ky) 2)) 3))) (* -1/4 (/ (sin ky) (pow (sqrt (pow (sin ky) 2)) 5)))))) (* 1/2 (/ (sin ky) (pow (sqrt (pow (sin ky) 2)) 3))))) (/ (sin ky) (sqrt (pow (sin ky) 2))))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ (* (pow kx 2) (- (* (pow kx 2) (- (* -1 (* (pow kx 2) (+ (* -1/2 (/ (+ (* -1/2 (/ (* (sin ky) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2))))) (pow (sqrt (pow (sin ky) 2)) 3))) (* -1/4 (/ (sin ky) (pow (sqrt (pow (sin ky) 2)) 5)))) (pow (sqrt (pow (sin ky) 2)) 2))) (+ (* 1/4 (/ (* (sin ky) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2))))) (pow (sqrt (pow (sin ky) 2)) 5))) (* 1/2 (/ (* (sin ky) (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2)))) (pow (sqrt (pow (sin ky) 2)) 2))))) (pow (sqrt (pow (sin ky) 2)) 3))))))) (+ (* -1/2 (/ (* (sin ky) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin ky) 2)) 2))))) (pow (sqrt (pow (sin ky) 2)) 3))) (* -1/4 (/ (sin ky) (pow (sqrt (pow (sin ky) 2)) 5)))))) (* 1/2 (/ (sin ky) (pow (sqrt (pow (sin ky) 2)) 3))))) (/ (sin ky) (sqrt (pow (sin ky) 2))))))
#s(approx (/ (* 1 (sin th)) (* (/ 1 (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))))) #s(hole binary64 (/ (* (sin ky) (sin th)) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))
#s(approx (* (/ 1 (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(hole binary64 (/ (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sin ky))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) #s(hole binary64 (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
#s(approx (sin kx) #s(hole binary64 (sin kx)))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))
#s(approx (/ (* 1 (sin th)) (* (/ 1 (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))))) #s(hole binary64 (/ (* ky (sin th)) (sqrt (pow (sin kx) 2)))))
#s(approx (/ (* 1 (sin th)) (* (/ 1 (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))))) #s(hole binary64 (* ky (+ (* (pow ky 2) (- (* -1/6 (/ (sin th) (sqrt (pow (sin kx) 2)))) (* 1/2 (/ (sin th) (pow (sqrt (pow (sin kx) 2)) 3))))) (/ (sin th) (sqrt (pow (sin kx) 2)))))))
#s(approx (/ (* 1 (sin th)) (* (/ 1 (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))))) #s(hole binary64 (* ky (+ (* (pow ky 2) (- (+ (* -1/6 (/ (sin th) (sqrt (pow (sin kx) 2)))) (* (pow ky 2) (- (* 1/120 (/ (sin th) (sqrt (pow (sin kx) 2)))) (+ (* -1/2 (/ (* (sin th) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2))))) (pow (sqrt (pow (sin kx) 2)) 3))) (* 1/2 (/ (- (* -1/6 (/ (sin th) (sqrt (pow (sin kx) 2)))) (* 1/2 (/ (sin th) (pow (sqrt (pow (sin kx) 2)) 3)))) (pow (sqrt (pow (sin kx) 2)) 2))))))) (* 1/2 (/ (sin th) (pow (sqrt (pow (sin kx) 2)) 3))))) (/ (sin th) (sqrt (pow (sin kx) 2)))))))
#s(approx (/ (* 1 (sin th)) (* (/ 1 (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))))) #s(hole binary64 (* ky (+ (* (pow ky 2) (- (+ (* -1/6 (/ (sin th) (sqrt (pow (sin kx) 2)))) (* (pow ky 2) (- (+ (* 1/120 (/ (sin th) (sqrt (pow (sin kx) 2)))) (* (pow ky 2) (- (* -1/5040 (/ (sin th) (sqrt (pow (sin kx) 2)))) (+ (* -1/2 (/ (* (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2)))) (- (* -1/6 (/ (sin th) (sqrt (pow (sin kx) 2)))) (* 1/2 (/ (sin th) (pow (sqrt (pow (sin kx) 2)) 3))))) (pow (sqrt (pow (sin kx) 2)) 2))) (+ (* 1/2 (/ (* (sin th) (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2)))) (pow (sqrt (pow (sin kx) 2)) 2))))) (pow (sqrt (pow (sin kx) 2)) 3))) (* 1/2 (/ (- (* 1/120 (/ (sin th) (sqrt (pow (sin kx) 2)))) (+ (* -1/2 (/ (* (sin th) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2))))) (pow (sqrt (pow (sin kx) 2)) 3))) (* 1/2 (/ (- (* -1/6 (/ (sin th) (sqrt (pow (sin kx) 2)))) (* 1/2 (/ (sin th) (pow (sqrt (pow (sin kx) 2)) 3)))) (pow (sqrt (pow (sin kx) 2)) 2))))) (pow (sqrt (pow (sin kx) 2)) 2)))))))) (+ (* -1/2 (/ (* (sin th) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2))))) (pow (sqrt (pow (sin kx) 2)) 3))) (* 1/2 (/ (- (* -1/6 (/ (sin th) (sqrt (pow (sin kx) 2)))) (* 1/2 (/ (sin th) (pow (sqrt (pow (sin kx) 2)) 3)))) (pow (sqrt (pow (sin kx) 2)) 2))))))) (* 1/2 (/ (sin th) (pow (sqrt (pow (sin kx) 2)) 3))))) (/ (sin th) (sqrt (pow (sin kx) 2)))))))
#s(approx (* (/ 1 (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(hole binary64 (/ (sqrt (pow (sin kx) 2)) ky)))
#s(approx (* (/ 1 (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(hole binary64 (/ (+ (sqrt (pow (sin kx) 2)) (* (pow ky 2) (- (* 1/2 (/ 1 (sqrt (pow (sin kx) 2)))) (* -1/6 (sqrt (pow (sin kx) 2)))))) ky)))
#s(approx (* (/ 1 (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(hole binary64 (/ (+ (sqrt (pow (sin kx) 2)) (* (pow ky 2) (- (+ (* 1/2 (/ 1 (sqrt (pow (sin kx) 2)))) (* (pow ky 2) (- (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2)))) (sqrt (pow (sin kx) 2)))) (+ (* -1/6 (- (* 1/2 (/ 1 (sqrt (pow (sin kx) 2)))) (* -1/6 (sqrt (pow (sin kx) 2))))) (* 1/120 (sqrt (pow (sin kx) 2))))))) (* -1/6 (sqrt (pow (sin kx) 2)))))) ky)))
#s(approx (* (/ 1 (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(hole binary64 (/ (+ (sqrt (pow (sin kx) 2)) (* (pow ky 2) (- (+ (* 1/2 (/ 1 (sqrt (pow (sin kx) 2)))) (* (pow ky 2) (- (+ (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2)))) (sqrt (pow (sin kx) 2)))) (* (pow ky 2) (- (* 1/2 (/ (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2)))) (pow (sqrt (pow (sin kx) 2)) 2)))) (sqrt (pow (sin kx) 2)))) (+ (* -1/6 (- (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2)))) (sqrt (pow (sin kx) 2)))) (+ (* -1/6 (- (* 1/2 (/ 1 (sqrt (pow (sin kx) 2)))) (* -1/6 (sqrt (pow (sin kx) 2))))) (* 1/120 (sqrt (pow (sin kx) 2)))))) (+ (* -1/5040 (sqrt (pow (sin kx) 2))) (* 1/120 (- (* 1/2 (/ 1 (sqrt (pow (sin kx) 2)))) (* -1/6 (sqrt (pow (sin kx) 2)))))))))) (+ (* -1/6 (- (* 1/2 (/ 1 (sqrt (pow (sin kx) 2)))) (* -1/6 (sqrt (pow (sin kx) 2))))) (* 1/120 (sqrt (pow (sin kx) 2))))))) (* -1/6 (sqrt (pow (sin kx) 2)))))) ky)))
#s(approx (/ 1 (sin ky)) #s(hole binary64 (/ 1 ky)))
#s(approx (/ 1 (sin ky)) #s(hole binary64 (/ (+ 1 (* 1/6 (pow ky 2))) ky)))
#s(approx (/ 1 (sin ky)) #s(hole binary64 (/ (+ 1 (* (pow ky 2) (+ 1/6 (* 7/360 (pow ky 2))))) ky)))
#s(approx (/ 1 (sin ky)) #s(hole binary64 (/ (+ 1 (* (pow ky 2) (+ 1/6 (* (pow ky 2) (+ 7/360 (* 31/15120 (pow ky 2))))))) ky)))
#s(approx (sin ky) #s(hole binary64 ky))
#s(approx (sin ky) #s(hole binary64 (* ky (+ 1 (* -1/6 (pow ky 2))))))
#s(approx (sin ky) #s(hole binary64 (* ky (+ 1 (* (pow ky 2) (- (* 1/120 (pow ky 2)) 1/6))))))
#s(approx (sin ky) #s(hole binary64 (* ky (+ 1 (* (pow ky 2) (- (* (pow ky 2) (+ 1/120 (* -1/5040 (pow ky 2)))) 1/6))))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) #s(hole binary64 (sqrt (pow (sin kx) 2))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) #s(hole binary64 (+ (sqrt (pow (sin kx) 2)) (* 1/2 (/ (pow ky 2) (sqrt (pow (sin kx) 2)))))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) #s(hole binary64 (+ (sqrt (pow (sin kx) 2)) (* (pow ky 2) (+ (* -1/2 (/ (* (pow ky 2) (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2))))) (sqrt (pow (sin kx) 2)))) (* 1/2 (/ 1 (sqrt (pow (sin kx) 2)))))))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) #s(hole binary64 (+ (sqrt (pow (sin kx) 2)) (* (pow ky 2) (+ (* (pow ky 2) (+ (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2)))) (sqrt (pow (sin kx) 2)))) (* 1/2 (/ (* (pow ky 2) (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2)))) (pow (sqrt (pow (sin kx) 2)) 2))))) (sqrt (pow (sin kx) 2)))))) (* 1/2 (/ 1 (sqrt (pow (sin kx) 2)))))))))
#s(approx (* (sin th) ky) #s(hole binary64 (* ky (sin th))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (/ ky (sqrt (pow (sin kx) 2)))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (* ky (+ (* -1 (* (pow ky 2) (+ (* 1/6 (/ 1 (sqrt (pow (sin kx) 2)))) (* 1/2 (/ 1 (pow (sqrt (pow (sin kx) 2)) 3)))))) (/ 1 (sqrt (pow (sin kx) 2)))))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (* ky (+ (* (pow ky 2) (- (* (pow ky 2) (- (* 1/120 (/ 1 (sqrt (pow (sin kx) 2)))) (+ (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2)))) (pow (sqrt (pow (sin kx) 2)) 3))) (* -1/2 (/ (+ (* 1/6 (/ 1 (sqrt (pow (sin kx) 2)))) (* 1/2 (/ 1 (pow (sqrt (pow (sin kx) 2)) 3)))) (pow (sqrt (pow (sin kx) 2)) 2)))))) (+ (* 1/6 (/ 1 (sqrt (pow (sin kx) 2)))) (* 1/2 (/ 1 (pow (sqrt (pow (sin kx) 2)) 3)))))) (/ 1 (sqrt (pow (sin kx) 2)))))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (* ky (+ (* (pow ky 2) (- (* (pow ky 2) (- (+ (* -1 (* (pow ky 2) (+ (* 1/5040 (/ 1 (sqrt (pow (sin kx) 2)))) (+ (* 1/2 (/ (* (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2)))) (+ (* 1/6 (/ 1 (sqrt (pow (sin kx) 2)))) (* 1/2 (/ 1 (pow (sqrt (pow (sin kx) 2)) 3))))) (pow (sqrt (pow (sin kx) 2)) 2))) (+ (* 1/2 (/ (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2)))) (pow (sqrt (pow (sin kx) 2)) 2)))) (pow (sqrt (pow (sin kx) 2)) 3))) (* 1/2 (/ (- (* 1/120 (/ 1 (sqrt (pow (sin kx) 2)))) (+ (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2)))) (pow (sqrt (pow (sin kx) 2)) 3))) (* -1/2 (/ (+ (* 1/6 (/ 1 (sqrt (pow (sin kx) 2)))) (* 1/2 (/ 1 (pow (sqrt (pow (sin kx) 2)) 3)))) (pow (sqrt (pow (sin kx) 2)) 2))))) (pow (sqrt (pow (sin kx) 2)) 2)))))))) (* 1/120 (/ 1 (sqrt (pow (sin kx) 2))))) (+ (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sqrt (pow (sin kx) 2)) 2)))) (pow (sqrt (pow (sin kx) 2)) 3))) (* -1/2 (/ (+ (* 1/6 (/ 1 (sqrt (pow (sin kx) 2)))) (* 1/2 (/ 1 (pow (sqrt (pow (sin kx) 2)) 3)))) (pow (sqrt (pow (sin kx) 2)) 2)))))) (+ (* 1/6 (/ 1 (sqrt (pow (sin kx) 2)))) (* 1/2 (/ 1 (pow (sqrt (pow (sin kx) 2)) 3)))))) (/ 1 (sqrt (pow (sin kx) 2)))))))
#s(approx (* (sin ky) (sin th)) #s(hole binary64 (* ky (+ (sin th) (* -1/6 (* (pow ky 2) (sin th)))))))
#s(approx (* (sin ky) (sin th)) #s(hole binary64 (* ky (+ (sin th) (* (pow ky 2) (+ (* -1/6 (sin th)) (* 1/120 (* (pow ky 2) (sin th)))))))))
#s(approx (* (sin ky) (sin th)) #s(hole binary64 (* ky (+ (sin th) (* (pow ky 2) (+ (* -1/6 (sin th)) (* (pow ky 2) (+ (* -1/5040 (* (pow ky 2) (sin th))) (* 1/120 (sin th))))))))))
#s(approx (exp (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2)) #s(hole binary64 (+ ky (* -1/6 (pow ky 3)))))
#s(approx (exp (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2)) #s(hole binary64 (+ ky (* (pow ky 2) (+ (* -1/6 ky) (* 1/120 (pow ky 3)))))))
#s(approx (exp (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2)) #s(hole binary64 (+ ky (* (pow ky 2) (+ (* -1/6 ky) (* (pow ky 2) (+ (* -1/5040 (pow ky 3)) (* 1/120 ky))))))))
#s(approx (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2) #s(hole binary64 (log ky)))
#s(approx (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2) #s(hole binary64 (+ (log ky) (* -1/6 (pow ky 2)))))
#s(approx (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2) #s(hole binary64 (+ (log ky) (* (pow ky 2) (- (* -1/180 (pow ky 2)) 1/6)))))
#s(approx (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2) #s(hole binary64 (+ (log ky) (* (pow ky 2) (- (* (pow ky 2) (- (* -1/2835 (pow ky 2)) 1/180)) 1/6)))))
#s(approx (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) #s(hole binary64 (* 2 (log ky))))
#s(approx (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) #s(hole binary64 (- (* -1/3 (pow ky 2)) (* -2 (log ky)))))
#s(approx (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) #s(hole binary64 (- (* (pow ky 2) (- (* -1/90 (pow ky 2)) 1/3)) (* -2 (log ky)))))
#s(approx (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) #s(hole binary64 (- (* (pow ky 2) (- (* (pow ky 2) (- (* -2/2835 (pow ky 2)) 1/90)) 1/3)) (* -2 (log ky)))))
#s(approx (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2)))) #s(hole binary64 (* -2 (log ky))))
#s(approx (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2)))) #s(hole binary64 (+ (* -2 (log ky)) (* 1/3 (pow ky 2)))))
#s(approx (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2)))) #s(hole binary64 (+ (* -2 (log ky)) (* (pow ky 2) (+ 1/3 (* 1/90 (pow ky 2)))))))
#s(approx (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2)))) #s(hole binary64 (+ (* -2 (log ky)) (* (pow ky 2) (+ 1/3 (* (pow ky 2) (+ 1/90 (* 2/2835 (pow ky 2)))))))))
#s(approx (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))) #s(hole binary64 (/ 1 (pow ky 2))))
#s(approx (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))) #s(hole binary64 (/ (+ 1 (* 1/3 (pow ky 2))) (pow ky 2))))
#s(approx (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))) #s(hole binary64 (/ (+ 1 (* (pow ky 2) (+ 1/3 (* 1/15 (pow ky 2))))) (pow ky 2))))
#s(approx (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))) #s(hole binary64 (/ (+ 1 (* (pow ky 2) (+ 1/3 (* (pow ky 2) (+ 1/15 (* 2/189 (pow ky 2))))))) (pow ky 2))))
#s(approx (- 1/2 (* (cos (+ ky ky)) 1/2)) #s(hole binary64 (pow ky 2)))
#s(approx (- 1/2 (* (cos (+ ky ky)) 1/2)) #s(hole binary64 (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2))))))
#s(approx (- 1/2 (* (cos (+ ky ky)) 1/2)) #s(hole binary64 (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3))))))
#s(approx (- 1/2 (* (cos (+ ky ky)) 1/2)) #s(hole binary64 (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* (pow ky 2) (+ 2/45 (* -1/315 (pow ky 2)))) 1/3))))))
#s(approx (* (cos (+ ky ky)) 1/2) #s(hole binary64 1/2))
#s(approx (* (cos (+ ky ky)) 1/2) #s(hole binary64 (+ 1/2 (* -1 (pow ky 2)))))
#s(approx (* (cos (+ ky ky)) 1/2) #s(hole binary64 (+ 1/2 (* (pow ky 2) (- (* 1/3 (pow ky 2)) 1)))))
#s(approx (* (cos (+ ky ky)) 1/2) #s(hole binary64 (+ 1/2 (* (pow ky 2) (- (* (pow ky 2) (+ 1/3 (* -2/45 (pow ky 2)))) 1)))))
#s(approx (cos (+ ky ky)) #s(hole binary64 1))
#s(approx (cos (+ ky ky)) #s(hole binary64 (+ 1 (* -2 (pow ky 2)))))
#s(approx (cos (+ ky ky)) #s(hole binary64 (+ 1 (* (pow ky 2) (- (* 2/3 (pow ky 2)) 2)))))
#s(approx (cos (+ ky ky)) #s(hole binary64 (+ 1 (* (pow ky 2) (- (* (pow ky 2) (+ 2/3 (* -4/45 (pow ky 2)))) 2)))))
#s(approx (+ ky ky) #s(hole binary64 (* 2 ky)))
#s(approx (/ 1 (sin ky)) #s(hole binary64 (/ 1 (sin ky))))
#s(approx (sin ky) #s(hole binary64 (sin ky)))
#s(approx (* (sin ky) (sin th)) #s(hole binary64 (* (sin ky) (sin th))))
#s(approx (exp (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2)) #s(hole binary64 (pow (/ 1 (- 1/2 (* 1/2 (cos (* 2 ky))))) -1/2)))
#s(approx (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2) #s(hole binary64 (* -1/2 (log (/ 1 (- 1/2 (* 1/2 (cos (* 2 ky)))))))))
#s(approx (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) #s(hole binary64 (* -1 (log (/ 1 (- 1/2 (* 1/2 (cos (* 2 ky)))))))))
#s(approx (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2)))) #s(hole binary64 (log (/ 1 (- 1/2 (* 1/2 (cos (* 2 ky))))))))
#s(approx (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))) #s(hole binary64 (/ 1 (- 1/2 (* 1/2 (cos (* 2 ky)))))))
#s(approx (- 1/2 (* (cos (+ ky ky)) 1/2)) #s(hole binary64 (- 1/2 (* 1/2 (cos (* 2 ky))))))
#s(approx (* (cos (+ ky ky)) 1/2) #s(hole binary64 (* 1/2 (cos (* 2 ky)))))
#s(approx (cos (+ ky ky)) #s(hole binary64 (cos (* 2 ky))))
#s(approx (exp (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2)) #s(hole binary64 (pow (/ 1 (- 1/2 (* 1/2 (cos (neg (* -2 ky)))))) -1/2)))
#s(approx (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2) #s(hole binary64 (* -1/2 (log (/ 1 (- 1/2 (* 1/2 (cos (neg (* -2 ky))))))))))
#s(approx (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) #s(hole binary64 (* -1 (log (/ 1 (- 1/2 (* 1/2 (cos (neg (* -2 ky))))))))))
#s(approx (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2)))) #s(hole binary64 (log (/ 1 (- 1/2 (* 1/2 (cos (neg (* -2 ky)))))))))
#s(approx (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))) #s(hole binary64 (/ 1 (- 1/2 (* 1/2 (cos (neg (* -2 ky))))))))
#s(approx (- 1/2 (* (cos (+ ky ky)) 1/2)) #s(hole binary64 (- 1/2 (* 1/2 (cos (neg (* -2 ky)))))))
#s(approx (* (cos (+ ky ky)) 1/2) #s(hole binary64 (* 1/2 (cos (neg (* -2 ky))))))
#s(approx (cos (+ ky ky)) #s(hole binary64 (cos (neg (* -2 ky)))))
#s(approx (/ (* 1 (sin th)) (* (/ 1 (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))))) #s(hole binary64 (/ (* th (sin ky)) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))
#s(approx (/ (* 1 (sin th)) (* (/ 1 (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))))) #s(hole binary64 (* th (+ (* -1/6 (/ (* (pow th 2) (sin ky)) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))
#s(approx (/ (* 1 (sin th)) (* (/ 1 (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))))) #s(hole binary64 (* th (+ (* (pow th 2) (+ (* -1/6 (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 1/120 (/ (* (pow th 2) (sin ky)) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))
#s(approx (/ (* 1 (sin th)) (* (/ 1 (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))))) #s(hole binary64 (* th (+ (* (pow th 2) (+ (* -1/6 (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* (pow th 2) (+ (* -1/5040 (/ (* (pow th 2) (sin ky)) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 1/120 (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))
#s(approx (* 1 (sin th)) #s(hole binary64 th))
#s(approx (* 1 (sin th)) #s(hole binary64 (* th (+ 1 (* -1/6 (pow th 2))))))
#s(approx (* 1 (sin th)) #s(hole binary64 (* th (+ 1 (* (pow th 2) (- (* 1/120 (pow th 2)) 1/6))))))
#s(approx (* 1 (sin th)) #s(hole binary64 (* th (+ 1 (* (pow th 2) (- (* (pow th 2) (+ 1/120 (* -1/5040 (pow th 2)))) 1/6))))))
#s(approx (/ (* (sin th) ky) (fabs (sin kx))) #s(hole binary64 (/ (* ky th) (fabs (sin kx)))))
#s(approx (/ (* (sin th) ky) (fabs (sin kx))) #s(hole binary64 (* th (+ (* -1/6 (/ (* ky (pow th 2)) (fabs (sin kx)))) (/ ky (fabs (sin kx)))))))
#s(approx (/ (* (sin th) ky) (fabs (sin kx))) #s(hole binary64 (* th (+ (* (pow th 2) (+ (* -1/6 (/ ky (fabs (sin kx)))) (* 1/120 (/ (* ky (pow th 2)) (fabs (sin kx)))))) (/ ky (fabs (sin kx)))))))
#s(approx (/ (* (sin th) ky) (fabs (sin kx))) #s(hole binary64 (* th (+ (* (pow th 2) (+ (* -1/6 (/ ky (fabs (sin kx)))) (* (pow th 2) (+ (* -1/5040 (/ (* ky (pow th 2)) (fabs (sin kx)))) (* 1/120 (/ ky (fabs (sin kx)))))))) (/ ky (fabs (sin kx)))))))
#s(approx (* (sin th) ky) #s(hole binary64 (* ky th)))
#s(approx (* (sin th) ky) #s(hole binary64 (* th (+ ky (* -1/6 (* ky (pow th 2)))))))
#s(approx (* (sin th) ky) #s(hole binary64 (* th (+ ky (* (pow th 2) (+ (* -1/6 ky) (* 1/120 (* ky (pow th 2)))))))))
#s(approx (* (sin th) ky) #s(hole binary64 (* th (+ ky (* (pow th 2) (+ (* -1/6 ky) (* (pow th 2) (+ (* -1/5040 (* ky (pow th 2))) (* 1/120 ky)))))))))
#s(approx (* (sin ky) (sin th)) #s(hole binary64 (* th (sin ky))))
#s(approx (* (sin ky) (sin th)) #s(hole binary64 (* th (+ (sin ky) (* -1/6 (* (pow th 2) (sin ky)))))))
#s(approx (* (sin ky) (sin th)) #s(hole binary64 (* th (+ (sin ky) (* (pow th 2) (+ (* -1/6 (sin ky)) (* 1/120 (* (pow th 2) (sin ky)))))))))
#s(approx (* (sin ky) (sin th)) #s(hole binary64 (* th (+ (sin ky) (* (pow th 2) (+ (* -1/6 (sin ky)) (* (pow th 2) (+ (* -1/5040 (* (pow th 2) (sin ky))) (* 1/120 (sin ky))))))))))
#s(approx (+ (* (* (- (* (* (+ (* (* th th) -1/5040) 1/120) th) th) 1/6) th) th) 1) #s(hole binary64 (+ 1 (* -1/6 (pow th 2)))))
#s(approx (+ (* (* (- (* (* (+ (* (* th th) -1/5040) 1/120) th) th) 1/6) th) th) 1) #s(hole binary64 (+ 1 (* (pow th 2) (- (* 1/120 (pow th 2)) 1/6)))))
#s(approx (+ (* (* (- (* (* (+ (* (* th th) -1/5040) 1/120) th) th) 1/6) th) th) 1) #s(hole binary64 (+ 1 (* (pow th 2) (- (* (pow th 2) (+ 1/120 (* -1/5040 (pow th 2)))) 1/6)))))
#s(approx (* (- (* (* (+ (* (* th th) -1/5040) 1/120) th) th) 1/6) th) #s(hole binary64 (* -1/6 th)))
#s(approx (* (- (* (* (+ (* (* th th) -1/5040) 1/120) th) th) 1/6) th) #s(hole binary64 (* th (- (* 1/120 (pow th 2)) 1/6))))
#s(approx (* (- (* (* (+ (* (* th th) -1/5040) 1/120) th) th) 1/6) th) #s(hole binary64 (* th (- (* (pow th 2) (+ 1/120 (* -1/5040 (pow th 2)))) 1/6))))
#s(approx (- (* (* (+ (* (* th th) -1/5040) 1/120) th) th) 1/6) #s(hole binary64 -1/6))
#s(approx (- (* (* (+ (* (* th th) -1/5040) 1/120) th) th) 1/6) #s(hole binary64 (- (* 1/120 (pow th 2)) 1/6)))
#s(approx (- (* (* (+ (* (* th th) -1/5040) 1/120) th) th) 1/6) #s(hole binary64 (- (* (pow th 2) (+ 1/120 (* -1/5040 (pow th 2)))) 1/6)))
#s(approx (* (* (+ (* (* th th) -1/5040) 1/120) th) th) #s(hole binary64 (* 1/120 (pow th 2))))
#s(approx (* (* (+ (* (* th th) -1/5040) 1/120) th) th) #s(hole binary64 (* (pow th 2) (+ 1/120 (* -1/5040 (pow th 2))))))
#s(approx (* (+ (* (* th th) -1/5040) 1/120) th) #s(hole binary64 (* 1/120 th)))
#s(approx (* (+ (* (* th th) -1/5040) 1/120) th) #s(hole binary64 (* th (+ 1/120 (* -1/5040 (pow th 2))))))
#s(approx (+ (* (* th th) -1/5040) 1/120) #s(hole binary64 1/120))
#s(approx (+ (* (* th th) -1/5040) 1/120) #s(hole binary64 (+ 1/120 (* -1/5040 (pow th 2)))))
#s(approx (* th th) #s(hole binary64 (pow th 2)))
#s(approx (* 1 (sin th)) #s(hole binary64 (sin th)))
#s(approx (* (+ (* (* (- (* (* (+ (* (* th th) -1/5040) 1/120) th) th) 1/6) th) th) 1) th) #s(hole binary64 (* -1/5040 (pow th 7))))
#s(approx (* (+ (* (* (- (* (* (+ (* (* th th) -1/5040) 1/120) th) th) 1/6) th) th) 1) th) #s(hole binary64 (* (pow th 7) (- (* 1/120 (/ 1 (pow th 2))) 1/5040))))
#s(approx (* (+ (* (* (- (* (* (+ (* (* th th) -1/5040) 1/120) th) th) 1/6) th) th) 1) th) #s(hole binary64 (* (pow th 7) (- (* 1/120 (/ 1 (pow th 2))) (+ 1/5040 (/ 1/6 (pow th 4)))))))
#s(approx (* (+ (* (* (- (* (* (+ (* (* th th) -1/5040) 1/120) th) th) 1/6) th) th) 1) th) #s(hole binary64 (* (pow th 7) (- (+ (* 1/120 (/ 1 (pow th 2))) (/ 1 (pow th 6))) (+ 1/5040 (/ 1/6 (pow th 4)))))))
#s(approx (+ (* (* (- (* (* (+ (* (* th th) -1/5040) 1/120) th) th) 1/6) th) th) 1) #s(hole binary64 (* -1/5040 (pow th 6))))
#s(approx (+ (* (* (- (* (* (+ (* (* th th) -1/5040) 1/120) th) th) 1/6) th) th) 1) #s(hole binary64 (* (pow th 6) (- (* 1/120 (/ 1 (pow th 2))) 1/5040))))
#s(approx (+ (* (* (- (* (* (+ (* (* th th) -1/5040) 1/120) th) th) 1/6) th) th) 1) #s(hole binary64 (* (pow th 6) (- (* 1/120 (/ 1 (pow th 2))) (+ 1/5040 (/ 1/6 (pow th 4)))))))
#s(approx (+ (* (* (- (* (* (+ (* (* th th) -1/5040) 1/120) th) th) 1/6) th) th) 1) #s(hole binary64 (* (pow th 6) (- (+ (* 1/120 (/ 1 (pow th 2))) (/ 1 (pow th 6))) (+ 1/5040 (/ 1/6 (pow th 4)))))))
#s(approx (* (- (* (* (+ (* (* th th) -1/5040) 1/120) th) th) 1/6) th) #s(hole binary64 (* -1/5040 (pow th 5))))
#s(approx (* (- (* (* (+ (* (* th th) -1/5040) 1/120) th) th) 1/6) th) #s(hole binary64 (* (pow th 5) (- (* 1/120 (/ 1 (pow th 2))) 1/5040))))
#s(approx (* (- (* (* (+ (* (* th th) -1/5040) 1/120) th) th) 1/6) th) #s(hole binary64 (* (pow th 5) (- (* 1/120 (/ 1 (pow th 2))) (+ 1/5040 (/ 1/6 (pow th 4)))))))
#s(approx (- (* (* (+ (* (* th th) -1/5040) 1/120) th) th) 1/6) #s(hole binary64 (* -1/5040 (pow th 4))))
#s(approx (- (* (* (+ (* (* th th) -1/5040) 1/120) th) th) 1/6) #s(hole binary64 (* (pow th 4) (- (* 1/120 (/ 1 (pow th 2))) 1/5040))))
#s(approx (- (* (* (+ (* (* th th) -1/5040) 1/120) th) th) 1/6) #s(hole binary64 (* (pow th 4) (- (* 1/120 (/ 1 (pow th 2))) (+ 1/5040 (/ 1/6 (pow th 4)))))))
#s(approx (* (+ (* (* th th) -1/5040) 1/120) th) #s(hole binary64 (* -1/5040 (pow th 3))))
#s(approx (* (+ (* (* th th) -1/5040) 1/120) th) #s(hole binary64 (* (pow th 3) (- (* 1/120 (/ 1 (pow th 2))) 1/5040))))
#s(approx (+ (* (* th th) -1/5040) 1/120) #s(hole binary64 (* -1/5040 (pow th 2))))
#s(approx (+ (* (* th th) -1/5040) 1/120) #s(hole binary64 (* (pow th 2) (- (* 1/120 (/ 1 (pow th 2))) 1/5040))))
#s(approx (* (+ (* (* (- (* (* (+ (* (* th th) -1/5040) 1/120) th) th) 1/6) th) th) 1) th) #s(hole binary64 (* -1 (* (pow th 7) (- 1/5040 (* 1/120 (/ 1 (pow th 2))))))))
#s(approx (* (+ (* (* (- (* (* (+ (* (* th th) -1/5040) 1/120) th) th) 1/6) th) th) 1) th) #s(hole binary64 (* -1 (* (pow th 7) (- (+ 1/5040 (/ 1/6 (pow th 4))) (* 1/120 (/ 1 (pow th 2))))))))
#s(approx (* (+ (* (* (- (* (* (+ (* (* th th) -1/5040) 1/120) th) th) 1/6) th) th) 1) th) #s(hole binary64 (* -1 (* (pow th 7) (- (+ 1/5040 (/ 1/6 (pow th 4))) (+ (* 1/120 (/ 1 (pow th 2))) (/ 1 (pow th 6))))))))
#s(approx (* (- (* (* (+ (* (* th th) -1/5040) 1/120) th) th) 1/6) th) #s(hole binary64 (* -1 (* (pow th 5) (- 1/5040 (* 1/120 (/ 1 (pow th 2))))))))
#s(approx (* (- (* (* (+ (* (* th th) -1/5040) 1/120) th) th) 1/6) th) #s(hole binary64 (* -1 (* (pow th 5) (- (+ 1/5040 (/ 1/6 (pow th 4))) (* 1/120 (/ 1 (pow th 2))))))))
#s(approx (* (+ (* (* th th) -1/5040) 1/120) th) #s(hole binary64 (* -1 (* (pow th 3) (- 1/5040 (* 1/120 (/ 1 (pow th 2))))))))
Outputs
(*.f64 (sin.f64 th) (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))
(*.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (sin.f64 th))
(*.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))
(*.f64 #s(literal 1 binary64) (*.f64 (sin.f64 th) (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))
(/.f64 (/.f64 (sin.f64 th) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))
(/.f64 (neg.f64 (sin.f64 th)) (neg.f64 (*.f64 (/.f64 #s(literal 1 binary64) (sin.f64 ky)) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))
(/.f64 (neg.f64 (*.f64 (sin.f64 th) (sin.f64 ky))) (neg.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky))))
(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))
(/.f64 (sin.f64 th) (*.f64 (/.f64 #s(literal 1 binary64) (sin.f64 ky)) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))
(*.f64 (sin.f64 th) #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) (sin.f64 th))
(sin.f64 th)
#s(literal 1 binary64)
(*.f64 (sin.f64 th) #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) (sin.f64 th))
(sin.f64 th)
th
(*.f64 (/.f64 #s(literal 1 binary64) (sin.f64 ky)) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))
(*.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) (/.f64 #s(literal 1 binary64) (sin.f64 ky)))
(/.f64 (*.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (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 (pow.f64 (sin.f64 ky) #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))) #s(literal -1/2 binary64))
(pow.f64 (sin.f64 ky) #s(literal -1 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (sin.f64 ky)))
(/.f64 #s(literal 1 binary64) (sin.f64 ky))
(exp.f64 (*.f64 (log.f64 (sin.f64 ky)) #s(literal -1 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 (sin.f64 ky)) #s(literal -1 binary64))) (sinh.f64 (*.f64 (log.f64 (sin.f64 ky)) #s(literal -1 binary64))))
(*.f64 (pow.f64 (fabs.f64 (sin.f64 ky)) #s(literal 1/2 binary64)) (pow.f64 (fabs.f64 (sin.f64 ky)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (neg.f64 (sin.f64 ky)) #s(literal 1/2 binary64)) (pow.f64 (neg.f64 (sin.f64 ky)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (sin.f64 ky) #s(literal 1/2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (pow.f64 (sin.f64 ky) #s(literal -1/2 binary64)) #s(literal -1 binary64)) (pow.f64 (pow.f64 (sin.f64 ky) #s(literal -1/2 binary64)) #s(literal -1 binary64)))
(pow.f64 (exp.f64 #s(literal 1/2 binary64)) (*.f64 (log.f64 (sin.f64 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 1/2 binary64))
(pow.f64 (/.f64 #s(literal 1 binary64) (sin.f64 ky)) #s(literal -1 binary64))
(pow.f64 (sin.f64 ky) #s(literal 1 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (sin.f64 ky))))
(/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 (neg.f64 (*.f64 (log.f64 (sin.f64 ky)) #s(literal 2 binary64))) #s(literal 1/2 binary64))))
(/.f64 #s(literal 1 binary64) (pow.f64 (/.f64 #s(literal 1 binary64) (sin.f64 ky)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky)))
(sin.f64 ky)
(-.f64 (cosh.f64 (log.f64 (sin.f64 ky))) (sinh.f64 (*.f64 (neg.f64 (*.f64 (log.f64 (sin.f64 ky)) #s(literal 2 binary64))) #s(literal 1/2 binary64))))
(sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))
(exp.f64 (neg.f64 (*.f64 (log.f64 (sin.f64 ky)) #s(literal -1 binary64))))
(exp.f64 (-.f64 #s(literal 0 binary64) (*.f64 (log.f64 (sin.f64 ky)) #s(literal -1 binary64))))
(exp.f64 (/.f64 (*.f64 (log.f64 (sin.f64 ky)) #s(literal 2 binary64)) #s(literal 2 binary64)))
(exp.f64 (*.f64 (*.f64 (log.f64 (sin.f64 ky)) #s(literal -1 binary64)) #s(literal -1 binary64)))
(exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(literal -1 binary64)))
(exp.f64 (*.f64 (log.f64 (sin.f64 ky)) #s(literal 1 binary64)))
(exp.f64 (log.f64 (sin.f64 ky)))
(+.f64 (cosh.f64 (log.f64 (sin.f64 ky))) (sinh.f64 (log.f64 (sin.f64 ky))))
ky
(pow.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/2 binary64) (cos.f64 (+.f64 kx kx))))) #s(literal 1/2 binary64))
(/.f64 #s(literal 1 binary64) (pow.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/2 binary64) (cos.f64 (+.f64 kx kx))))) #s(literal -1/2 binary64)))
(sqrt.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/2 binary64) (cos.f64 (+.f64 kx kx))))))
(hypot.f64 (exp.f64 (log.f64 (sin.f64 kx))) (pow.f64 (fabs.f64 (sin.f64 ky)) #s(literal 1 binary64)))
(hypot.f64 (exp.f64 (log.f64 (sin.f64 kx))) (pow.f64 (neg.f64 (sin.f64 ky)) #s(literal 1 binary64)))
(hypot.f64 (exp.f64 (log.f64 (sin.f64 kx))) (fabs.f64 (sin.f64 ky)))
(hypot.f64 (exp.f64 (log.f64 (sin.f64 kx))) (neg.f64 (sin.f64 ky)))
(hypot.f64 (exp.f64 (log.f64 (sin.f64 kx))) (sin.f64 ky))
(hypot.f64 (exp.f64 (log.f64 (fabs.f64 (sin.f64 kx)))) (pow.f64 (fabs.f64 (sin.f64 ky)) #s(literal 1 binary64)))
(hypot.f64 (exp.f64 (log.f64 (fabs.f64 (sin.f64 kx)))) (pow.f64 (neg.f64 (sin.f64 ky)) #s(literal 1 binary64)))
(hypot.f64 (exp.f64 (log.f64 (fabs.f64 (sin.f64 kx)))) (fabs.f64 (sin.f64 ky)))
(hypot.f64 (exp.f64 (log.f64 (fabs.f64 (sin.f64 kx)))) (neg.f64 (sin.f64 ky)))
(hypot.f64 (exp.f64 (log.f64 (fabs.f64 (sin.f64 kx)))) (sin.f64 ky))
(hypot.f64 (pow.f64 (fabs.f64 (sin.f64 ky)) #s(literal 1 binary64)) (exp.f64 (log.f64 (sin.f64 kx))))
(hypot.f64 (pow.f64 (fabs.f64 (sin.f64 ky)) #s(literal 1 binary64)) (exp.f64 (log.f64 (fabs.f64 (sin.f64 kx)))))
(hypot.f64 (pow.f64 (fabs.f64 (sin.f64 ky)) #s(literal 1 binary64)) (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1 binary64)))
(hypot.f64 (pow.f64 (fabs.f64 (sin.f64 ky)) #s(literal 1 binary64)) (neg.f64 (sin.f64 kx)))
(hypot.f64 (pow.f64 (fabs.f64 (sin.f64 ky)) #s(literal 1 binary64)) (fabs.f64 (sin.f64 kx)))
(hypot.f64 (pow.f64 (fabs.f64 (sin.f64 ky)) #s(literal 1 binary64)) (sin.f64 kx))
(hypot.f64 (pow.f64 (neg.f64 (sin.f64 ky)) #s(literal 1 binary64)) (exp.f64 (log.f64 (sin.f64 kx))))
(hypot.f64 (pow.f64 (neg.f64 (sin.f64 ky)) #s(literal 1 binary64)) (exp.f64 (log.f64 (fabs.f64 (sin.f64 kx)))))
(hypot.f64 (pow.f64 (neg.f64 (sin.f64 ky)) #s(literal 1 binary64)) (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1 binary64)))
(hypot.f64 (pow.f64 (neg.f64 (sin.f64 ky)) #s(literal 1 binary64)) (neg.f64 (sin.f64 kx)))
(hypot.f64 (pow.f64 (neg.f64 (sin.f64 ky)) #s(literal 1 binary64)) (fabs.f64 (sin.f64 kx)))
(hypot.f64 (pow.f64 (neg.f64 (sin.f64 ky)) #s(literal 1 binary64)) (sin.f64 kx))
(hypot.f64 (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1 binary64)) (pow.f64 (fabs.f64 (sin.f64 ky)) #s(literal 1 binary64)))
(hypot.f64 (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1 binary64)) (pow.f64 (neg.f64 (sin.f64 ky)) #s(literal 1 binary64)))
(hypot.f64 (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1 binary64)) (fabs.f64 (sin.f64 ky)))
(hypot.f64 (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1 binary64)) (neg.f64 (sin.f64 ky)))
(hypot.f64 (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1 binary64)) (sin.f64 ky))
(hypot.f64 (fabs.f64 (sin.f64 ky)) (exp.f64 (log.f64 (sin.f64 kx))))
(hypot.f64 (fabs.f64 (sin.f64 ky)) (exp.f64 (log.f64 (fabs.f64 (sin.f64 kx)))))
(hypot.f64 (fabs.f64 (sin.f64 ky)) (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1 binary64)))
(hypot.f64 (fabs.f64 (sin.f64 ky)) (neg.f64 (sin.f64 kx)))
(hypot.f64 (fabs.f64 (sin.f64 ky)) (fabs.f64 (sin.f64 kx)))
(hypot.f64 (fabs.f64 (sin.f64 ky)) (sin.f64 kx))
(hypot.f64 (neg.f64 (sin.f64 ky)) (exp.f64 (log.f64 (sin.f64 kx))))
(hypot.f64 (neg.f64 (sin.f64 ky)) (exp.f64 (log.f64 (fabs.f64 (sin.f64 kx)))))
(hypot.f64 (neg.f64 (sin.f64 ky)) (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1 binary64)))
(hypot.f64 (neg.f64 (sin.f64 ky)) (neg.f64 (sin.f64 kx)))
(hypot.f64 (neg.f64 (sin.f64 ky)) (fabs.f64 (sin.f64 kx)))
(hypot.f64 (neg.f64 (sin.f64 ky)) (sin.f64 kx))
(hypot.f64 (neg.f64 (sin.f64 kx)) (pow.f64 (fabs.f64 (sin.f64 ky)) #s(literal 1 binary64)))
(hypot.f64 (neg.f64 (sin.f64 kx)) (pow.f64 (neg.f64 (sin.f64 ky)) #s(literal 1 binary64)))
(hypot.f64 (neg.f64 (sin.f64 kx)) (fabs.f64 (sin.f64 ky)))
(hypot.f64 (neg.f64 (sin.f64 kx)) (neg.f64 (sin.f64 ky)))
(hypot.f64 (neg.f64 (sin.f64 kx)) (sin.f64 ky))
(hypot.f64 (fabs.f64 (sin.f64 kx)) (pow.f64 (fabs.f64 (sin.f64 ky)) #s(literal 1 binary64)))
(hypot.f64 (fabs.f64 (sin.f64 kx)) (pow.f64 (neg.f64 (sin.f64 ky)) #s(literal 1 binary64)))
(hypot.f64 (fabs.f64 (sin.f64 kx)) (fabs.f64 (sin.f64 ky)))
(hypot.f64 (fabs.f64 (sin.f64 kx)) (neg.f64 (sin.f64 ky)))
(hypot.f64 (fabs.f64 (sin.f64 kx)) (sin.f64 ky))
(hypot.f64 (sin.f64 kx) (pow.f64 (fabs.f64 (sin.f64 ky)) #s(literal 1 binary64)))
(hypot.f64 (sin.f64 kx) (pow.f64 (neg.f64 (sin.f64 ky)) #s(literal 1 binary64)))
(hypot.f64 (sin.f64 kx) (fabs.f64 (sin.f64 ky)))
(hypot.f64 (sin.f64 kx) (neg.f64 (sin.f64 ky)))
(hypot.f64 (sin.f64 kx) (sin.f64 ky))
(hypot.f64 (sin.f64 ky) (exp.f64 (log.f64 (sin.f64 kx))))
(hypot.f64 (sin.f64 ky) (exp.f64 (log.f64 (fabs.f64 (sin.f64 kx)))))
(hypot.f64 (sin.f64 ky) (pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 1 binary64)))
(hypot.f64 (sin.f64 ky) (neg.f64 (sin.f64 kx)))
(hypot.f64 (sin.f64 ky) (fabs.f64 (sin.f64 kx)))
(hypot.f64 (sin.f64 ky) (sin.f64 kx))
(exp.f64 (*.f64 (log.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/2 binary64) (cos.f64 (+.f64 kx kx)))))) #s(literal 1/2 binary64)))
(pow.f64 (sin.f64 kx) #s(literal 1 binary64))
(/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 kx) #s(literal -1 binary64)))
(sin.f64 kx)
(exp.f64 (*.f64 (log.f64 (sin.f64 kx)) #s(literal 1 binary64)))
kx
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (fabs.f64 #s(approx (sin kx) kx))))
(*.f64 #s(approx (sin th) th) (/.f64 ky (fabs.f64 #s(approx (sin kx) kx))))
(/.f64 (neg.f64 (*.f64 #s(approx (sin th) th) ky)) (neg.f64 (fabs.f64 #s(approx (sin kx) kx))))
(/.f64 (*.f64 #s(approx (sin th) th) ky) (fabs.f64 #s(approx (sin kx) kx)))
(*.f64 #s(approx (sin th) th) ky)
(*.f64 ky #s(approx (sin th) th))
#s(approx (sin th) th)
(pow.f64 (*.f64 #s(approx (sin kx) kx) #s(approx (sin kx) kx)) #s(literal 1/2 binary64))
(sqrt.f64 (*.f64 #s(approx (sin kx) kx) #s(approx (sin kx) kx)))
(fabs.f64 (neg.f64 #s(approx (sin kx) kx)))
(fabs.f64 #s(approx (sin kx) kx))
#s(approx (sin kx) kx)
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) #s(approx (exp (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2)) (sin.f64 ky)))) #s(approx (sin th) th))
(*.f64 #s(approx (sin th) th) (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) #s(approx (exp (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2)) (sin.f64 ky)))))
(/.f64 (*.f64 (sin.f64 ky) #s(approx (sin th) th)) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) #s(approx (exp (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2)) (sin.f64 ky))))
(/.f64 (neg.f64 (sin.f64 ky)) (neg.f64 #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) #s(approx (exp (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2)) (sin.f64 ky)))))
(/.f64 (sin.f64 ky) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) #s(approx (exp (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2)) (sin.f64 ky))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) #s(approx (exp (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2)) (sin.f64 ky)))
#s(approx (exp (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2)) (sin.f64 ky))
(*.f64 (sin.f64 ky) (/.f64 #s(approx (sin th) (*.f64 (fma.f64 (*.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) th) th) #s(literal 1/6 binary64)) th) th #s(literal 1 binary64)) th)) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) (sin.f64 ky))))
(/.f64 (neg.f64 (*.f64 #s(approx (sin th) (*.f64 (fma.f64 (*.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) th) th) #s(literal 1/6 binary64)) th) th #s(literal 1 binary64)) th)) (sin.f64 ky))) (neg.f64 #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) (sin.f64 ky))))
(/.f64 (*.f64 #s(approx (sin th) (*.f64 (fma.f64 (*.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) th) th) #s(literal 1/6 binary64)) th) th #s(literal 1 binary64)) th)) (sin.f64 ky)) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) (sin.f64 ky)))
(*.f64 #s(approx (sin th) (*.f64 (fma.f64 (*.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) th) th) #s(literal 1/6 binary64)) th) th #s(literal 1 binary64)) th)) (sin.f64 ky))
(*.f64 (sin.f64 ky) #s(approx (sin th) (*.f64 (fma.f64 (*.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) th) th) #s(literal 1/6 binary64)) th) th #s(literal 1 binary64)) th)))
#s(approx (sin th) (*.f64 (fma.f64 (*.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) th) th) #s(literal 1/6 binary64)) th) th #s(literal 1 binary64)) th))
(*.f64 (fma.f64 (*.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) th) th) #s(literal 1/6 binary64)) th) th #s(literal 1 binary64)) th)
(*.f64 th (fma.f64 (*.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) th) th) #s(literal 1/6 binary64)) th) th #s(literal 1 binary64)))
(fma.f64 th #s(literal 1 binary64) (*.f64 th (*.f64 (*.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) th) th) #s(literal 1/6 binary64)) th) th)))
(fma.f64 #s(literal 1 binary64) th (*.f64 (*.f64 (*.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) th) th) #s(literal 1/6 binary64)) th) th) th))
(+.f64 (*.f64 th #s(literal 1 binary64)) (*.f64 th (*.f64 (*.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) th) th) #s(literal 1/6 binary64)) th) th)))
(+.f64 (*.f64 #s(literal 1 binary64) th) (*.f64 (*.f64 (*.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) th) th) #s(literal 1/6 binary64)) th) th) th))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (*.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) th) th) #s(literal 1/6 binary64)) th) th) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) th) th) #s(literal 1/6 binary64)) th) th)))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) th) th) #s(literal 1/6 binary64)) th) th) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (*.f64 (*.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) th) th) #s(literal 1/6 binary64)) th) th) #s(literal 1 binary64)))
(/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (*.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) th) th) #s(literal 1/6 binary64)) th) th) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (*.f64 (*.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) th) th) #s(literal 1/6 binary64)) th) th) #s(literal 2 binary64)) (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) th) th) #s(literal 1/6 binary64)) th) th)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) th) th) #s(literal 1/6 binary64)) th) th) #s(literal 3 binary64)) #s(literal 1 binary64)) (+.f64 (pow.f64 (*.f64 (*.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) th) th) #s(literal 1/6 binary64)) th) th) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) th) th) #s(literal 1/6 binary64)) th) th) #s(literal 1 binary64)))))
(fma.f64 (*.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) th) th) #s(literal 1/6 binary64)) th) th #s(literal 1 binary64))
(fma.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) th) th) #s(literal 1/6 binary64)) (*.f64 th th) #s(literal 1 binary64))
(fma.f64 (*.f64 th th) (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) th) th) #s(literal 1/6 binary64)) #s(literal 1 binary64))
(fma.f64 th (*.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) th) th) #s(literal 1/6 binary64)) th) #s(literal 1 binary64))
(-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (*.f64 th th)) (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) th) th) #s(literal 1/6 binary64))))
(+.f64 (*.f64 (*.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) th) th) #s(literal 1/6 binary64)) th) th) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) th) th) #s(literal 1/6 binary64)) th) th))
(*.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) th) th) #s(literal 1/6 binary64)) th)
(*.f64 th (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) th) th) #s(literal 1/6 binary64)))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) th) th) #s(literal 2 binary64)) #s(literal 1/36 binary64)) (fma.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) th) th #s(literal 1/6 binary64)))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) th) th) #s(literal 3 binary64)) #s(literal 1/216 binary64)) (+.f64 (pow.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) th) th) #s(literal 2 binary64)) (+.f64 #s(literal 1/36 binary64) (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) th) th) #s(literal 1/6 binary64)))))
(-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) th) th) #s(literal 1/6 binary64))
(*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) th) th)
(*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (*.f64 th th))
(*.f64 (*.f64 th th) (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)))
(*.f64 th (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) th))
(fma.f64 (*.f64 th th) #s(literal 1/120 binary64) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) #s(literal -1/5040 binary64))))
(fma.f64 (*.f64 th th) #s(literal 1/120 binary64) (*.f64 (*.f64 (*.f64 th th) #s(literal -1/5040 binary64)) (*.f64 th th)))
(fma.f64 #s(literal 1/120 binary64) (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) #s(literal -1/5040 binary64))))
(fma.f64 #s(literal 1/120 binary64) (*.f64 th th) (*.f64 (*.f64 (*.f64 th th) #s(literal -1/5040 binary64)) (*.f64 th th)))
(+.f64 (*.f64 (*.f64 th th) #s(literal 1/120 binary64)) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) #s(literal -1/5040 binary64))))
(+.f64 (*.f64 (*.f64 th th) #s(literal 1/120 binary64)) (*.f64 (*.f64 (*.f64 th th) #s(literal -1/5040 binary64)) (*.f64 th th)))
(*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) th)
(*.f64 th (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)))
(fma.f64 #s(literal 1/120 binary64) th (*.f64 th (*.f64 (*.f64 th th) #s(literal -1/5040 binary64))))
(fma.f64 #s(literal 1/120 binary64) th (*.f64 (*.f64 (*.f64 th th) #s(literal -1/5040 binary64)) th))
(fma.f64 th #s(literal 1/120 binary64) (*.f64 th (*.f64 (*.f64 th th) #s(literal -1/5040 binary64))))
(fma.f64 th #s(literal 1/120 binary64) (*.f64 (*.f64 (*.f64 th th) #s(literal -1/5040 binary64)) th))
(+.f64 (*.f64 #s(literal 1/120 binary64) th) (*.f64 th (*.f64 (*.f64 th th) #s(literal -1/5040 binary64))))
(+.f64 (*.f64 #s(literal 1/120 binary64) th) (*.f64 (*.f64 (*.f64 th th) #s(literal -1/5040 binary64)) th))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 th th) #s(literal -1/5040 binary64)) (*.f64 (*.f64 th th) #s(literal -1/5040 binary64))) #s(literal 1/14400 binary64)) (-.f64 (*.f64 (*.f64 th th) #s(literal -1/5040 binary64)) #s(literal 1/120 binary64)))
(/.f64 (-.f64 #s(literal 1/14400 binary64) (*.f64 (*.f64 (*.f64 th th) #s(literal -1/5040 binary64)) (*.f64 (*.f64 th th) #s(literal -1/5040 binary64)))) (-.f64 #s(literal 1/120 binary64) (*.f64 (*.f64 th th) #s(literal -1/5040 binary64))))
(/.f64 (fma.f64 #s(literal -1/128024064000 binary64) (*.f64 (*.f64 (*.f64 th th) th) (*.f64 (*.f64 th th) th)) #s(literal 1/1728000 binary64)) (fma.f64 (*.f64 (*.f64 th th) #s(literal -1/5040 binary64)) (*.f64 (*.f64 th th) #s(literal -1/5040 binary64)) (-.f64 #s(literal 1/14400 binary64) (*.f64 (*.f64 (*.f64 th th) #s(literal -1/5040 binary64)) #s(literal 1/120 binary64)))))
(/.f64 (+.f64 #s(literal 1/1728000 binary64) (*.f64 #s(literal -1/128024064000 binary64) (*.f64 (*.f64 (*.f64 th th) th) (*.f64 (*.f64 th th) th)))) (+.f64 #s(literal 1/14400 binary64) (-.f64 (*.f64 (*.f64 (*.f64 th th) #s(literal -1/5040 binary64)) (*.f64 (*.f64 th th) #s(literal -1/5040 binary64))) (*.f64 #s(literal 1/120 binary64) (*.f64 (*.f64 th th) #s(literal -1/5040 binary64))))))
(fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64))
(fma.f64 #s(literal -1/5040 binary64) (*.f64 th th) #s(literal 1/120 binary64))
(fma.f64 th (*.f64 th #s(literal -1/5040 binary64)) #s(literal 1/120 binary64))
(-.f64 #s(literal 1/120 binary64) (*.f64 #s(literal 1/5040 binary64) (*.f64 th th)))
(+.f64 (*.f64 (*.f64 th th) #s(literal -1/5040 binary64)) #s(literal 1/120 binary64))
(+.f64 #s(literal 1/120 binary64) (*.f64 (*.f64 th th) #s(literal -1/5040 binary64)))
(*.f64 (exp.f64 (log.f64 th)) (exp.f64 (log.f64 th)))
(*.f64 (fabs.f64 th) (fabs.f64 th))
(*.f64 (neg.f64 th) (neg.f64 th))
(*.f64 th th)
(pow.f64 (exp.f64 (log.f64 th)) #s(literal 2 binary64))
(pow.f64 (fabs.f64 th) #s(literal 2 binary64))
(pow.f64 (neg.f64 th) #s(literal 2 binary64))
(pow.f64 (*.f64 th th) #s(literal 1 binary64))
(pow.f64 th #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 th th)))
(exp.f64 (*.f64 (log.f64 th) #s(literal 2 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 th) #s(literal 2 binary64))) (sinh.f64 (*.f64 (log.f64 th) #s(literal 2 binary64))))
#s(literal -1/5040 binary64)
#s(literal 1/120 binary64)
#s(literal 1/6 binary64)
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) (sin.f64 ky))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) (sin.f64 ky))) (sin.f64 th))
(*.f64 (sin.f64 th) (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) (sin.f64 ky))))
(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) (sin.f64 ky)))
(/.f64 (neg.f64 (sin.f64 ky)) (neg.f64 #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) (sin.f64 ky))))
(/.f64 (sin.f64 ky) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) (sin.f64 ky)))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) (sin.f64 ky))
(*.f64 (pow.f64 (fabs.f64 (sin.f64 ky)) #s(literal 1/2 binary64)) (pow.f64 (fabs.f64 (sin.f64 ky)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (neg.f64 (sin.f64 ky)) #s(literal 1/2 binary64)) (pow.f64 (neg.f64 (sin.f64 ky)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (sin.f64 ky) #s(literal 1/2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (pow.f64 (sin.f64 ky) #s(literal -1/2 binary64)) #s(literal -1 binary64)) (pow.f64 (pow.f64 (sin.f64 ky) #s(literal -1/2 binary64)) #s(literal -1 binary64)))
(pow.f64 (exp.f64 #s(literal 1/2 binary64)) (*.f64 (log.f64 (sin.f64 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 1/2 binary64))
(pow.f64 (/.f64 #s(literal 1 binary64) (sin.f64 ky)) #s(literal -1 binary64))
(pow.f64 (sin.f64 ky) #s(literal 1 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (sin.f64 ky))))
(/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 (neg.f64 (*.f64 (log.f64 (sin.f64 ky)) #s(literal 2 binary64))) #s(literal 1/2 binary64))))
(/.f64 #s(literal 1 binary64) (pow.f64 (/.f64 #s(literal 1 binary64) (sin.f64 ky)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky)))
(sin.f64 ky)
(-.f64 (cosh.f64 (log.f64 (sin.f64 ky))) (sinh.f64 (*.f64 (neg.f64 (*.f64 (log.f64 (sin.f64 ky)) #s(literal 2 binary64))) #s(literal 1/2 binary64))))
(sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))
(exp.f64 (neg.f64 (*.f64 (log.f64 (sin.f64 ky)) #s(literal -1 binary64))))
(exp.f64 (-.f64 #s(literal 0 binary64) (*.f64 (log.f64 (sin.f64 ky)) #s(literal -1 binary64))))
(exp.f64 (/.f64 (*.f64 (log.f64 (sin.f64 ky)) #s(literal 2 binary64)) #s(literal 2 binary64)))
(exp.f64 (*.f64 (*.f64 (log.f64 (sin.f64 ky)) #s(literal -1 binary64)) #s(literal -1 binary64)))
(exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(literal -1 binary64)))
(exp.f64 (*.f64 (log.f64 (sin.f64 ky)) #s(literal 1 binary64)))
(exp.f64 (log.f64 (sin.f64 ky)))
(+.f64 (cosh.f64 (log.f64 (sin.f64 ky))) (sinh.f64 (log.f64 (sin.f64 ky))))
(*.f64 (*.f64 (log.f64 (sin.f64 ky)) #s(literal 2 binary64)) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sin.f64 ky)) #s(literal 2 binary64)))
(neg.f64 (*.f64 (neg.f64 (*.f64 (log.f64 (sin.f64 ky)) #s(literal 2 binary64))) #s(literal 1/2 binary64)))
(log.f64 (sin.f64 ky))
(*.f64 (log.f64 (sin.f64 ky)) #s(literal 2 binary64))
(*.f64 (neg.f64 (*.f64 (log.f64 (sin.f64 ky)) #s(literal 2 binary64))) #s(literal -1 binary64))
(*.f64 #s(literal -1 binary64) (neg.f64 (*.f64 (log.f64 (sin.f64 ky)) #s(literal 2 binary64))))
(*.f64 #s(literal 2 binary64) (log.f64 (sin.f64 ky)))
(neg.f64 (neg.f64 (*.f64 (log.f64 (sin.f64 ky)) #s(literal 2 binary64))))
(fma.f64 (*.f64 (log.f64 (sin.f64 ky)) #s(literal 2 binary64)) #s(literal 1/2 binary64) (log.f64 (sin.f64 ky)))
(fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sin.f64 ky)) #s(literal 2 binary64)) (log.f64 (sin.f64 ky)))
(-.f64 (log.f64 (*.f64 (sin.f64 ky) #s(literal 1 binary64))) (log.f64 (/.f64 #s(literal 1 binary64) (sin.f64 ky))))
(-.f64 (log.f64 (*.f64 #s(literal 1 binary64) (sin.f64 ky))) (log.f64 (/.f64 #s(literal 1 binary64) (sin.f64 ky))))
(-.f64 (log.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) #s(literal 2 binary64)))) (log.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))
(-.f64 (log.f64 (-.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (cos.f64 (+.f64 ky ky)) #s(literal 3 binary64)) #s(literal 1/8 binary64)))) (log.f64 (+.f64 #s(literal 1/4 binary64) (+.f64 (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 (log.f64 (-.f64 (cos.f64 (-.f64 ky ky)) (cos.f64 (+.f64 ky ky)))) (log.f64 #s(literal 2 binary64)))
(-.f64 #s(literal 0 binary64) (neg.f64 (*.f64 (log.f64 (sin.f64 ky)) #s(literal 2 binary64))))
(+.f64 (log.f64 (fabs.f64 (sin.f64 ky))) (log.f64 (fabs.f64 (sin.f64 ky))))
(+.f64 (log.f64 (neg.f64 (sin.f64 ky))) (log.f64 (neg.f64 (sin.f64 ky))))
(+.f64 (log.f64 (sin.f64 ky)) (log.f64 (sin.f64 ky)))
(log.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))
(*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (sin.f64 ky)) #s(literal 2 binary64)))
(neg.f64 (*.f64 (log.f64 (sin.f64 ky)) #s(literal 2 binary64)))
(-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))
(-.f64 #s(literal 0 binary64) (*.f64 (log.f64 (sin.f64 ky)) #s(literal 2 binary64)))
(log.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (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 (neg.f64 (sin.f64 ky)) #s(literal -1 binary64)) (pow.f64 (neg.f64 (sin.f64 ky)) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (sin.f64 ky)) (/.f64 #s(literal 1 binary64) (sin.f64 ky)))
(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 binary64) (sin.f64 ky)) #s(literal 2 binary64))
(pow.f64 (sin.f64 ky) #s(literal -2 binary64))
(/.f64 (/.f64 #s(literal 1 binary64) (sin.f64 ky)) (sin.f64 ky))
(/.f64 #s(literal -1 binary64) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))
(/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))
(exp.f64 (fma.f64 (log.f64 (sin.f64 ky)) #s(literal -1 binary64) (*.f64 (log.f64 (sin.f64 ky)) #s(literal -1 binary64))))
(exp.f64 (*.f64 (*.f64 (log.f64 (sin.f64 ky)) #s(literal -1 binary64)) #s(literal 2 binary64)))
(exp.f64 (*.f64 (*.f64 (log.f64 (sin.f64 ky)) #s(literal 2 binary64)) #s(literal -1 binary64)))
(exp.f64 (*.f64 (log.f64 (sin.f64 ky)) #s(literal -2 binary64)))
(exp.f64 (neg.f64 (*.f64 (log.f64 (sin.f64 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 (fabs.f64 (sin.f64 ky)) (fabs.f64 (sin.f64 ky)))
(*.f64 (neg.f64 (sin.f64 ky)) (neg.f64 (sin.f64 ky)))
(*.f64 (sin.f64 ky) (sin.f64 ky))
(pow.f64 (exp.f64 #s(literal -1 binary64)) (neg.f64 (*.f64 (log.f64 (sin.f64 ky)) #s(literal 2 binary64))))
(pow.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) #s(literal 1/2 binary64))
(pow.f64 (fabs.f64 (sin.f64 ky)) #s(literal 2 binary64))
(pow.f64 (neg.f64 (sin.f64 ky)) #s(literal 2 binary64))
(pow.f64 (-.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 binary64) (-.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 binary64) (sin.f64 ky)) #s(literal -2 binary64))
(pow.f64 (sin.f64 ky) #s(literal 2 binary64))
(/.f64 (*.f64 (sin.f64 ky) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (sin.f64 ky)))
(/.f64 (*.f64 #s(literal 1 binary64) (sin.f64 ky)) (/.f64 #s(literal 1 binary64) (sin.f64 ky)))
(/.f64 (-.f64 #s(literal 1/4 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 #s(literal 1/8 binary64) (*.f64 (pow.f64 (cos.f64 (+.f64 ky ky)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (+.f64 #s(literal 1/4 binary64) (+.f64 (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 (cos.f64 (-.f64 ky ky)) (cos.f64 (+.f64 ky ky))) #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (pow.f64 (/.f64 #s(literal 1 binary64) (-.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 binary64) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))
(-.f64 (cosh.f64 (neg.f64 (*.f64 (log.f64 (sin.f64 ky)) #s(literal 2 binary64)))) (sinh.f64 (neg.f64 (*.f64 (log.f64 (sin.f64 ky)) #s(literal 2 binary64)))))
(-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))
(exp.f64 (*.f64 (*.f64 (log.f64 (sin.f64 ky)) #s(literal 2 binary64)) #s(literal 1 binary64)))
(exp.f64 (*.f64 (log.f64 (sin.f64 ky)) #s(literal 2 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 (sin.f64 ky)) #s(literal 2 binary64))) (sinh.f64 (*.f64 (log.f64 (sin.f64 ky)) #s(literal 2 binary64))))
(+.f64 #s(literal 1/2 binary64) (*.f64 (neg.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 ky ky))))
#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)))
(sin.f64 (+.f64 (neg.f64 (+.f64 ky ky)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (fma.f64 #s(literal -2 binary64) ky (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (fma.f64 #s(literal 2 binary64) ky (/.f64 (PI.f64) #s(literal 2 binary64))))
(fma.f64 (sin.f64 (+.f64 ky ky)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (+.f64 ky ky)) (sin.f64 (/.f64 (PI.f64) #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))))
(cos.f64 (neg.f64 (neg.f64 (+.f64 ky ky))))
(cos.f64 (neg.f64 (+.f64 ky ky)))
(cos.f64 (*.f64 #s(literal -2 binary64) ky))
(cos.f64 (+.f64 ky ky))
(+.f64 (*.f64 (sin.f64 (+.f64 ky ky)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 (+.f64 ky ky)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(*.f64 #s(literal -2 binary64) (neg.f64 ky))
(*.f64 #s(literal 2 binary64) ky)
(*.f64 ky #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 ky ky) (*.f64 ky ky)) (-.f64 ky ky))
(/.f64 (fma.f64 (*.f64 ky ky) ky (*.f64 (*.f64 ky ky) ky)) (fma.f64 ky ky (-.f64 (*.f64 ky ky) (*.f64 ky ky))))
(neg.f64 (*.f64 #s(literal -2 binary64) ky))
(+.f64 ky ky)
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (sin.f64 ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (/.f64 (*.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (*.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 3 binary64))) #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (sin.f64 ky))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (-.f64 (neg.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) #s(literal 1/3 binary64)) (sin.f64 th)) (sin.f64 ky)) (pow.f64 (sin.f64 ky) #s(literal 3 binary64))) #s(literal -1/2 binary64) (*.f64 (*.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 ky) #s(literal 5 binary64)))) #s(literal -1/4 binary64))) (*.f64 kx kx))) (*.f64 (*.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 ky) #s(literal 3 binary64)))) #s(literal 1/2 binary64))) (*.f64 kx kx) (/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (sin.f64 ky))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (fma.f64 (-.f64 (neg.f64 (*.f64 (*.f64 kx kx) (fma.f64 (/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) #s(literal 1/3 binary64)) (sin.f64 th)) (sin.f64 ky)) (pow.f64 (sin.f64 ky) #s(literal 3 binary64))) #s(literal -1/2 binary64) (*.f64 (*.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 ky) #s(literal 5 binary64)))) #s(literal -1/4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) #s(literal -1/2 binary64) (fma.f64 (/.f64 (*.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (-.f64 #s(literal 2/45 binary64) (*.f64 (/.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) #s(literal 1/3 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) #s(literal -1/2 binary64)))) (pow.f64 (sin.f64 ky) #s(literal 3 binary64))) #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) #s(literal 1/3 binary64)) (sin.f64 th)) (sin.f64 ky)) (pow.f64 (sin.f64 ky) #s(literal 5 binary64))) #s(literal 1/4 binary64)))))) (fma.f64 (/.f64 (*.f64 (*.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) #s(literal 1/3 binary64)) (sin.f64 th)) (sin.f64 ky)) (pow.f64 (sin.f64 ky) #s(literal 3 binary64))) #s(literal -1/2 binary64) (*.f64 (*.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 ky) #s(literal 5 binary64)))) #s(literal -1/4 binary64)))) (*.f64 kx kx) (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 ky) #s(literal 3 binary64)))))) (*.f64 kx kx) (/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (sin.f64 ky))))
#s(approx (* (/ 1 (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 (sin.f64 ky) (sin.f64 ky)))
#s(approx (* (/ 1 (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (fma.f64 (/.f64 (*.f64 kx kx) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64) (/.f64 (sin.f64 ky) (sin.f64 ky))))
#s(approx (* (/ 1 (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 kx kx) (/.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) #s(literal 1/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/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (*.f64 kx kx) (/.f64 (sin.f64 ky) (sin.f64 ky))))
#s(approx (* (/ 1 (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 kx kx) (/.f64 (-.f64 #s(literal 2/45 binary64) (*.f64 (/.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) #s(literal 1/3 binary64)) (-.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) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) #s(literal 1/2 binary64) (*.f64 (/.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) #s(literal 1/3 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) #s(literal -1/2 binary64))) (*.f64 kx kx) (/.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (*.f64 kx kx) (/.f64 (sin.f64 ky) (sin.f64 ky))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) (sin.f64 ky))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) (fma.f64 (/.f64 (*.f64 kx kx) (sin.f64 ky)) #s(literal 1/2 binary64) (sin.f64 ky)))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 kx kx) (/.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) #s(literal 1/3 binary64)) (sin.f64 ky))) (/.f64 #s(literal 1/2 binary64) (sin.f64 ky))) (*.f64 kx kx) (sin.f64 ky)))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) (fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 kx kx) (/.f64 (-.f64 #s(literal 2/45 binary64) (*.f64 (/.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) #s(literal 1/3 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) #s(literal -1/2 binary64))) (sin.f64 ky))) #s(literal 1/2 binary64) (*.f64 (/.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) #s(literal 1/3 binary64)) (sin.f64 ky)) #s(literal -1/2 binary64))) (*.f64 kx kx) (/.f64 #s(literal 1/2 binary64) (sin.f64 ky))) (*.f64 kx kx) (sin.f64 ky)))
#s(approx (sin kx) kx)
#s(approx (sin kx) (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 kx kx) #s(literal 1 binary64)) kx))
#s(approx (sin kx) (*.f64 (fma.f64 (-.f64 (*.f64 (*.f64 kx kx) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) kx))
#s(approx (sin kx) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (*.f64 kx kx)) #s(literal 1/6 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) kx))
#s(approx (/ (* (sin th) ky) (fabs (sin kx))) (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 (sin.f64 kx))))
#s(approx (fabs (sin kx)) (fabs.f64 (sin.f64 kx)))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 (sin.f64 ky) (sin.f64 ky)))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 (/.f64 (*.f64 (*.f64 kx kx) (sin.f64 ky)) (pow.f64 (sin.f64 ky) #s(literal 3 binary64))) #s(literal -1/2 binary64) (/.f64 (sin.f64 ky) (sin.f64 ky))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 (-.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 ky) (/.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) #s(literal 1/3 binary64)) (pow.f64 (sin.f64 ky) #s(literal 3 binary64)))) #s(literal -1/2 binary64) (/.f64 (*.f64 #s(literal -1/4 binary64) (sin.f64 ky)) (pow.f64 (sin.f64 ky) #s(literal 5 binary64)))) (*.f64 kx kx))) (/.f64 (*.f64 #s(literal 1/2 binary64) (sin.f64 ky)) (pow.f64 (sin.f64 ky) #s(literal 3 binary64)))) (*.f64 kx kx) (/.f64 (sin.f64 ky) (sin.f64 ky))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 (fma.f64 (-.f64 (neg.f64 (*.f64 (*.f64 kx kx) (fma.f64 (/.f64 (fma.f64 (*.f64 (sin.f64 ky) (/.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) #s(literal 1/3 binary64)) (pow.f64 (sin.f64 ky) #s(literal 3 binary64)))) #s(literal -1/2 binary64) (/.f64 (*.f64 #s(literal -1/4 binary64) (sin.f64 ky)) (pow.f64 (sin.f64 ky) #s(literal 5 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) #s(literal -1/2 binary64) (fma.f64 (*.f64 (sin.f64 ky) (/.f64 (-.f64 #s(literal 2/45 binary64) (*.f64 (/.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) #s(literal 1/3 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) #s(literal -1/2 binary64))) (pow.f64 (sin.f64 ky) #s(literal 3 binary64)))) #s(literal 1/2 binary64) (*.f64 (*.f64 (sin.f64 ky) (/.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) #s(literal 1/3 binary64)) (pow.f64 (sin.f64 ky) #s(literal 5 binary64)))) #s(literal 1/4 binary64)))))) (fma.f64 (*.f64 (sin.f64 ky) (/.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) #s(literal 1/3 binary64)) (pow.f64 (sin.f64 ky) #s(literal 3 binary64)))) #s(literal -1/2 binary64) (/.f64 (*.f64 #s(literal -1/4 binary64) (sin.f64 ky)) (pow.f64 (sin.f64 ky) #s(literal 5 binary64))))) (*.f64 kx kx) (*.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 ky) (pow.f64 (sin.f64 ky) #s(literal 3 binary64))))) (*.f64 kx kx) (/.f64 (sin.f64 ky) (sin.f64 ky))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (sin.f64 th) (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))
#s(approx (* (/ 1 (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) (sin.f64 ky)))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))
#s(approx (sin kx) (sin.f64 kx))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 kx) (sin.f64 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 (fma.f64 (fma.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx))) (*.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 3 binary64))))) (*.f64 ky ky) (/.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 (fma.f64 (-.f64 (fma.f64 (-.f64 (/.f64 (*.f64 (sin.f64 th) #s(literal 1/120 binary64)) (fabs.f64 (sin.f64 kx))) (fma.f64 (/.f64 (*.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx))))) #s(literal 1/3 binary64)) (sin.f64 th)) (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 3 binary64))) #s(literal -1/2 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx))) (*.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 3 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx))))) #s(literal 1/2 binary64)))) (*.f64 ky ky) (/.f64 (*.f64 (sin.f64 th) #s(literal -1/6 binary64)) (fabs.f64 (sin.f64 kx)))) (*.f64 (/.f64 (sin.f64 th) (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 3 binary64))) #s(literal 1/2 binary64))) (*.f64 ky ky) (/.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 (fma.f64 (-.f64 (fma.f64 (-.f64 (fma.f64 (-.f64 (/.f64 (*.f64 #s(literal -1/5040 binary64) (sin.f64 th)) (fabs.f64 (sin.f64 kx))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 (sin.f64 th) (/.f64 (-.f64 #s(literal 2/45 binary64) (*.f64 (/.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx))))) #s(literal 1/3 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx))))) #s(literal -1/2 binary64))) (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 3 binary64))) (/.f64 (-.f64 (/.f64 (*.f64 (sin.f64 th) #s(literal 1/120 binary64)) (fabs.f64 (sin.f64 kx))) (fma.f64 (/.f64 (*.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx))))) #s(literal 1/3 binary64)) (sin.f64 th)) (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 3 binary64))) #s(literal -1/2 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx))) (*.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 3 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx))))) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))) (*.f64 (*.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx))))) #s(literal 1/3 binary64)) (/.f64 (fma.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx))) (*.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 3 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))) #s(literal -1/2 binary64)))) (*.f64 ky ky) (/.f64 (*.f64 (sin.f64 th) #s(literal 1/120 binary64)) (fabs.f64 (sin.f64 kx)))) (fma.f64 (/.f64 (*.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx))))) #s(literal 1/3 binary64)) (sin.f64 th)) (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 3 binary64))) #s(literal -1/2 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx))) (*.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 3 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx))))) #s(literal 1/2 binary64)))) (*.f64 ky ky) (/.f64 (*.f64 (sin.f64 th) #s(literal -1/6 binary64)) (fabs.f64 (sin.f64 kx)))) (*.f64 (/.f64 (sin.f64 th) (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 3 binary64))) #s(literal 1/2 binary64))) (*.f64 ky ky) (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx)))) ky))
#s(approx (* (/ 1 (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 (fabs.f64 (sin.f64 kx)) ky))
#s(approx (* (/ 1 (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 (fma.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (fabs.f64 (sin.f64 kx))) (*.f64 (fabs.f64 (sin.f64 kx)) #s(literal -1/6 binary64))) (*.f64 ky ky) (fabs.f64 (sin.f64 kx))) ky))
#s(approx (* (/ 1 (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 (fma.f64 (-.f64 (fma.f64 (-.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx))))) #s(literal 1/3 binary64))) (fabs.f64 (sin.f64 kx))) (fma.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (fabs.f64 (sin.f64 kx))) (*.f64 (fabs.f64 (sin.f64 kx)) #s(literal -1/6 binary64))) #s(literal -1/6 binary64) (*.f64 (fabs.f64 (sin.f64 kx)) #s(literal 1/120 binary64)))) (*.f64 ky ky) (/.f64 #s(literal 1/2 binary64) (fabs.f64 (sin.f64 kx)))) (*.f64 (fabs.f64 (sin.f64 kx)) #s(literal -1/6 binary64))) (*.f64 ky ky) (fabs.f64 (sin.f64 kx))) ky))
#s(approx (* (/ 1 (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 (fma.f64 (-.f64 (fma.f64 (fma.f64 (/.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx))))) #s(literal 1/3 binary64)) (fabs.f64 (sin.f64 kx))) #s(literal -1/2 binary64) (-.f64 (*.f64 (-.f64 (*.f64 (/.f64 (-.f64 #s(literal 2/45 binary64) (*.f64 (/.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx))))) #s(literal 1/3 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx))))) #s(literal -1/2 binary64))) (fabs.f64 (sin.f64 kx))) #s(literal 1/2 binary64)) (fma.f64 (-.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx))))) #s(literal 1/3 binary64))) (fabs.f64 (sin.f64 kx))) (fma.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (fabs.f64 (sin.f64 kx))) (*.f64 (fabs.f64 (sin.f64 kx)) #s(literal -1/6 binary64))) #s(literal -1/6 binary64) (*.f64 (fabs.f64 (sin.f64 kx)) #s(literal 1/120 binary64)))) #s(literal -1/6 binary64) (fma.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (fabs.f64 (sin.f64 kx))) (*.f64 (fabs.f64 (sin.f64 kx)) #s(literal -1/6 binary64))) #s(literal 1/120 binary64) (*.f64 (fabs.f64 (sin.f64 kx)) #s(literal -1/5040 binary64))))) (*.f64 ky ky)) (fma.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (fabs.f64 (sin.f64 kx))) (*.f64 (fabs.f64 (sin.f64 kx)) #s(literal -1/6 binary64))) #s(literal -1/6 binary64) (*.f64 (fabs.f64 (sin.f64 kx)) #s(literal 1/120 binary64))))) (*.f64 ky ky) (/.f64 #s(literal 1/2 binary64) (fabs.f64 (sin.f64 kx)))) (*.f64 (fabs.f64 (sin.f64 kx)) #s(literal -1/6 binary64))) (*.f64 ky ky) (fabs.f64 (sin.f64 kx))) ky))
#s(approx (/ 1 (sin ky)) (/.f64 #s(literal 1 binary64) ky))
#s(approx (/ 1 (sin ky)) (/.f64 (fma.f64 (*.f64 ky ky) #s(literal 1/6 binary64) #s(literal 1 binary64)) ky))
#s(approx (/ 1 (sin ky)) (/.f64 (fma.f64 (fma.f64 #s(literal 7/360 binary64) (*.f64 ky ky) #s(literal 1/6 binary64)) (*.f64 ky ky) #s(literal 1 binary64)) ky))
#s(approx (/ 1 (sin ky)) (/.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 31/15120 binary64) (*.f64 ky ky) #s(literal 7/360 binary64)) (*.f64 ky ky) #s(literal 1/6 binary64)) (*.f64 ky ky) #s(literal 1 binary64)) ky))
#s(approx (exp (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2)) ky)
#s(approx (exp (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2)) (*.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky))
#s(approx (exp (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2)) (*.f64 (fma.f64 (-.f64 (*.f64 (*.f64 ky ky) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (*.f64 ky ky) #s(literal 1 binary64)) ky))
#s(approx (exp (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2)) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (*.f64 ky ky)) #s(literal 1/6 binary64)) (*.f64 ky ky) #s(literal 1 binary64)) ky))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) (fabs.f64 (sin.f64 kx)))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) (fma.f64 (/.f64 (*.f64 ky ky) (fabs.f64 (sin.f64 kx))) #s(literal 1/2 binary64) (fabs.f64 (sin.f64 kx))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx))))) #s(literal 1/3 binary64)) (*.f64 ky ky)) (fabs.f64 (sin.f64 kx))) (/.f64 #s(literal 1/2 binary64) (fabs.f64 (sin.f64 kx)))) (*.f64 ky ky) (fabs.f64 (sin.f64 kx))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx))))) #s(literal 1/3 binary64)) (fabs.f64 (sin.f64 kx))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 #s(literal 2/45 binary64) (*.f64 (/.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx))))) #s(literal 1/3 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx))))) #s(literal -1/2 binary64))) (*.f64 ky ky))) (fabs.f64 (sin.f64 kx)))) (*.f64 ky ky) (/.f64 #s(literal 1/2 binary64) (fabs.f64 (sin.f64 kx)))) (*.f64 ky ky) (fabs.f64 (sin.f64 kx))))
#s(approx (* (sin th) ky) (*.f64 (sin.f64 th) ky))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (fabs.f64 (sin.f64 kx))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (*.f64 (fma.f64 (neg.f64 (*.f64 ky ky)) (fma.f64 (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal -3 binary64)) #s(literal 1/2 binary64) (/.f64 #s(literal 1/6 binary64) (fabs.f64 (sin.f64 kx)))) (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx)))) ky))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (*.f64 (fma.f64 (-.f64 (*.f64 (-.f64 (/.f64 #s(literal 1/120 binary64) (fabs.f64 (sin.f64 kx))) (*.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx))))) #s(literal 1/3 binary64)) (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 3 binary64))) (/.f64 (fma.f64 (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal -3 binary64)) #s(literal 1/2 binary64) (/.f64 #s(literal 1/6 binary64) (fabs.f64 (sin.f64 kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))))) (*.f64 ky ky)) (fma.f64 (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal -3 binary64)) #s(literal 1/2 binary64) (/.f64 #s(literal 1/6 binary64) (fabs.f64 (sin.f64 kx))))) (*.f64 ky ky) (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx)))) ky))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (*.f64 (fma.f64 (-.f64 (*.f64 (*.f64 ky ky) (fma.f64 (neg.f64 (*.f64 ky ky)) (+.f64 (fma.f64 (*.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx))))) #s(literal 1/3 binary64)) (/.f64 (fma.f64 (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal -3 binary64)) #s(literal 1/2 binary64) (/.f64 #s(literal 1/6 binary64) (fabs.f64 (sin.f64 kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))) #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (-.f64 #s(literal 2/45 binary64) (*.f64 (/.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx))))) #s(literal 1/3 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx))))) #s(literal -1/2 binary64))) (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 3 binary64))) (/.f64 (-.f64 (/.f64 #s(literal 1/120 binary64) (fabs.f64 (sin.f64 kx))) (*.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx))))) #s(literal 1/3 binary64)) (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 3 binary64))) (/.f64 (fma.f64 (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal -3 binary64)) #s(literal 1/2 binary64) (/.f64 #s(literal 1/6 binary64) (fabs.f64 (sin.f64 kx)))) (-.f64 #s(literal 1/2 binary64) (*.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 #s(literal 1/5040 binary64) (fabs.f64 (sin.f64 kx)))) (-.f64 (/.f64 #s(literal 1/120 binary64) (fabs.f64 (sin.f64 kx))) (*.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx))))) #s(literal 1/3 binary64)) (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 3 binary64))) (/.f64 (fma.f64 (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal -3 binary64)) #s(literal 1/2 binary64) (/.f64 #s(literal 1/6 binary64) (fabs.f64 (sin.f64 kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))))))) (fma.f64 (pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal -3 binary64)) #s(literal 1/2 binary64) (/.f64 #s(literal 1/6 binary64) (fabs.f64 (sin.f64 kx))))) (*.f64 ky ky) (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx)))) ky))
#s(approx (* (sin ky) (sin th)) (*.f64 (fma.f64 (*.f64 (*.f64 ky ky) (sin.f64 th)) #s(literal -1/6 binary64) (sin.f64 th)) ky))
#s(approx (* (sin ky) (sin th)) (*.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 ky ky) (sin.f64 th)) #s(literal 1/120 binary64) (*.f64 (sin.f64 th) #s(literal -1/6 binary64))) (*.f64 ky ky) (sin.f64 th)) ky))
#s(approx (* (sin ky) (sin th)) (*.f64 (fma.f64 (fma.f64 #s(literal -1/6 binary64) (sin.f64 th) (*.f64 (fma.f64 (*.f64 (*.f64 ky ky) (sin.f64 th)) #s(literal -1/5040 binary64) (*.f64 (sin.f64 th) #s(literal 1/120 binary64))) (*.f64 ky ky))) (*.f64 ky ky) (sin.f64 th)) ky))
#s(approx (exp (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2)) (fma.f64 (*.f64 (*.f64 ky ky) ky) #s(literal -1/6 binary64) ky))
#s(approx (exp (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2)) (fma.f64 (fma.f64 (*.f64 (*.f64 ky ky) ky) #s(literal 1/120 binary64) (*.f64 #s(literal -1/6 binary64) ky)) (*.f64 ky ky) ky))
#s(approx (exp (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2)) (fma.f64 (fma.f64 (*.f64 ky ky) (fma.f64 (*.f64 (*.f64 ky ky) ky) #s(literal -1/5040 binary64) (*.f64 #s(literal 1/120 binary64) ky)) (*.f64 #s(literal -1/6 binary64) ky)) (*.f64 ky ky) ky))
#s(approx (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2) (log.f64 ky))
#s(approx (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2) (fma.f64 (*.f64 ky ky) #s(literal -1/6 binary64) (log.f64 ky)))
#s(approx (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2) (fma.f64 (-.f64 (*.f64 #s(literal -1/180 binary64) (*.f64 ky ky)) #s(literal 1/6 binary64)) (*.f64 ky ky) (log.f64 ky)))
#s(approx (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2) (fma.f64 (-.f64 (*.f64 (-.f64 (*.f64 #s(literal -1/2835 binary64) (*.f64 ky ky)) #s(literal 1/180 binary64)) (*.f64 ky ky)) #s(literal 1/6 binary64)) (*.f64 ky ky) (log.f64 ky)))
#s(approx (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) (*.f64 (log.f64 ky) #s(literal 2 binary64)))
#s(approx (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) (*.f64 (log.f64 ky) #s(literal 2 binary64))))
#s(approx (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) (fma.f64 (-.f64 (*.f64 #s(literal -1/90 binary64) (*.f64 ky ky)) #s(literal 1/3 binary64)) (*.f64 ky ky) (*.f64 (log.f64 ky) #s(literal 2 binary64))))
#s(approx (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) (fma.f64 (-.f64 (*.f64 (-.f64 (*.f64 #s(literal -2/2835 binary64) (*.f64 ky ky)) #s(literal 1/90 binary64)) (*.f64 ky ky)) #s(literal 1/3 binary64)) (*.f64 ky ky) (*.f64 (log.f64 ky) #s(literal 2 binary64))))
#s(approx (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2)))) (*.f64 #s(literal -2 binary64) (log.f64 ky)))
#s(approx (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2)))) (fma.f64 #s(literal -2 binary64) (log.f64 ky) (*.f64 (*.f64 ky ky) #s(literal 1/3 binary64))))
#s(approx (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2)))) (fma.f64 (fma.f64 #s(literal 1/90 binary64) (*.f64 ky ky) #s(literal 1/3 binary64)) (*.f64 ky ky) (*.f64 #s(literal -2 binary64) (log.f64 ky))))
#s(approx (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2)))) (fma.f64 (fma.f64 (fma.f64 #s(literal 2/2835 binary64) (*.f64 ky ky) #s(literal 1/90 binary64)) (*.f64 ky ky) #s(literal 1/3 binary64)) (*.f64 ky ky) (*.f64 #s(literal -2 binary64) (log.f64 ky))))
#s(approx (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))) (/.f64 #s(literal 1 binary64) (*.f64 ky ky)))
#s(approx (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))) (/.f64 (fma.f64 (*.f64 ky ky) #s(literal 1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky)))
#s(approx (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))) (/.f64 (fma.f64 (fma.f64 #s(literal 1/15 binary64) (*.f64 ky ky) #s(literal 1/3 binary64)) (*.f64 ky ky) #s(literal 1 binary64)) (*.f64 ky ky)))
#s(approx (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))) (/.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 2/189 binary64) (*.f64 ky ky) #s(literal 1/15 binary64)) (*.f64 ky ky) #s(literal 1/3 binary64)) (*.f64 ky ky) #s(literal 1 binary64)) (*.f64 ky ky)))
#s(approx (- 1/2 (* (cos (+ ky ky)) 1/2)) (*.f64 ky ky))
#s(approx (- 1/2 (* (cos (+ ky ky)) 1/2)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64)) (*.f64 ky ky)))
#s(approx (- 1/2 (* (cos (+ ky ky)) 1/2)) (*.f64 (fma.f64 (-.f64 (*.f64 (*.f64 ky ky) #s(literal 2/45 binary64)) #s(literal 1/3 binary64)) (*.f64 ky ky) #s(literal 1 binary64)) (*.f64 ky ky)))
#s(approx (- 1/2 (* (cos (+ ky ky)) 1/2)) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -1/315 binary64) (*.f64 ky ky) #s(literal 2/45 binary64)) (*.f64 ky ky)) #s(literal 1/3 binary64)) (*.f64 ky ky) #s(literal 1 binary64)) (*.f64 ky ky)))
#s(approx (* (cos (+ ky ky)) 1/2) #s(literal 1/2 binary64))
#s(approx (* (cos (+ ky ky)) 1/2) (+.f64 (neg.f64 (*.f64 ky ky)) #s(literal 1/2 binary64)))
#s(approx (* (cos (+ ky ky)) 1/2) (fma.f64 (-.f64 (*.f64 (*.f64 ky ky) #s(literal 1/3 binary64)) #s(literal 1 binary64)) (*.f64 ky ky) #s(literal 1/2 binary64)))
#s(approx (* (cos (+ ky ky)) 1/2) (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -2/45 binary64) (*.f64 ky ky) #s(literal 1/3 binary64)) (*.f64 ky ky)) #s(literal 1 binary64)) (*.f64 ky ky) #s(literal 1/2 binary64)))
#s(approx (cos (+ ky ky)) #s(literal 1 binary64))
#s(approx (cos (+ ky ky)) (fma.f64 #s(literal -2 binary64) (*.f64 ky ky) #s(literal 1 binary64)))
#s(approx (cos (+ ky ky)) (fma.f64 (-.f64 (*.f64 #s(literal 2/3 binary64) (*.f64 ky ky)) #s(literal 2 binary64)) (*.f64 ky ky) #s(literal 1 binary64)))
#s(approx (cos (+ ky ky)) (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -4/45 binary64) (*.f64 ky ky) #s(literal 2/3 binary64)) (*.f64 ky ky)) #s(literal 2 binary64)) (*.f64 ky ky) #s(literal 1 binary64)))
#s(approx (+ ky ky) (+.f64 ky ky))
#s(approx (/ 1 (sin ky)) (/.f64 #s(literal 1 binary64) (sin.f64 ky)))
#s(approx (exp (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2)) (sin.f64 ky))
#s(approx (* (sin ky) (sin th)) (*.f64 (sin.f64 th) (sin.f64 ky)))
#s(approx (exp (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2)) (exp.f64 (*.f64 (neg.f64 (*.f64 (log.f64 (sin.f64 ky)) #s(literal 2 binary64))) #s(literal -1/2 binary64))))
#s(approx (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2) (*.f64 (neg.f64 (*.f64 (log.f64 (sin.f64 ky)) #s(literal 2 binary64))) #s(literal -1/2 binary64)))
#s(approx (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) (*.f64 (log.f64 (sin.f64 ky)) #s(literal 2 binary64)))
#s(approx (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2)))) (neg.f64 (*.f64 (log.f64 (sin.f64 ky)) #s(literal 2 binary64))))
#s(approx (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))
#s(approx (- 1/2 (* (cos (+ ky ky)) 1/2)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))
#s(approx (* (cos (+ ky ky)) 1/2) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))
#s(approx (cos (+ ky ky)) (cos.f64 (+.f64 ky ky)))
#s(approx (exp (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2)) (exp.f64 (*.f64 (neg.f64 (*.f64 (log.f64 (sin.f64 ky)) #s(literal 2 binary64))) #s(literal -1/2 binary64))))
#s(approx (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2) (*.f64 (neg.f64 (*.f64 (log.f64 (sin.f64 ky)) #s(literal 2 binary64))) #s(literal -1/2 binary64)))
#s(approx (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) (*.f64 (log.f64 (sin.f64 ky)) #s(literal 2 binary64)))
#s(approx (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2)))) (neg.f64 (*.f64 (log.f64 (sin.f64 ky)) #s(literal 2 binary64))))
#s(approx (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))
#s(approx (- 1/2 (* (cos (+ ky ky)) 1/2)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))
#s(approx (* (cos (+ ky ky)) 1/2) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))
#s(approx (cos (+ ky ky)) (cos.f64 (+.f64 ky ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 ky) th) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (fma.f64 (*.f64 (*.f64 th th) (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) #s(literal -1/6 binary64) (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 th th) (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) #s(literal 1/120 binary64) (/.f64 (*.f64 (sin.f64 ky) #s(literal -1/6 binary64)) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) (*.f64 th th) (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 th th) (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) #s(literal -1/5040 binary64) (/.f64 (*.f64 (sin.f64 ky) #s(literal 1/120 binary64)) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) (*.f64 th th) (/.f64 (*.f64 (sin.f64 ky) #s(literal -1/6 binary64)) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) (*.f64 th th) (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) th))
#s(approx (sin th) th)
#s(approx (sin th) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) th))
#s(approx (sin th) (*.f64 (fma.f64 (-.f64 (*.f64 (*.f64 th th) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (*.f64 th th) #s(literal 1 binary64)) th))
#s(approx (sin th) (*.f64 (fma.f64 (*.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) th) th) #s(literal 1/6 binary64)) th) th #s(literal 1 binary64)) th))
#s(approx (/ (* (sin th) ky) (fabs (sin kx))) (/.f64 (*.f64 ky th) (fabs.f64 (sin.f64 kx))))
#s(approx (/ (* (sin th) ky) (fabs (sin kx))) (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 th th) ky) (fabs.f64 (sin.f64 kx))) #s(literal -1/6 binary64) (/.f64 ky (fabs.f64 (sin.f64 kx)))) th))
#s(approx (/ (* (sin th) ky) (fabs (sin kx))) (*.f64 (fma.f64 (fma.f64 (/.f64 ky (fabs.f64 (sin.f64 kx))) #s(literal -1/6 binary64) (*.f64 (/.f64 (*.f64 (*.f64 th th) ky) (fabs.f64 (sin.f64 kx))) #s(literal 1/120 binary64))) (*.f64 th th) (/.f64 ky (fabs.f64 (sin.f64 kx)))) th))
#s(approx (/ (* (sin th) ky) (fabs (sin kx))) (*.f64 (fma.f64 (fma.f64 (/.f64 ky (fabs.f64 (sin.f64 kx))) #s(literal -1/6 binary64) (*.f64 (fma.f64 (/.f64 ky (fabs.f64 (sin.f64 kx))) #s(literal 1/120 binary64) (*.f64 (/.f64 (*.f64 (*.f64 th th) ky) (fabs.f64 (sin.f64 kx))) #s(literal -1/5040 binary64))) (*.f64 th th))) (*.f64 th th) (/.f64 ky (fabs.f64 (sin.f64 kx)))) th))
#s(approx (* (sin th) ky) (*.f64 ky th))
#s(approx (* (sin th) ky) (*.f64 (fma.f64 (*.f64 (*.f64 th th) ky) #s(literal -1/6 binary64) ky) th))
#s(approx (* (sin th) ky) (*.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 th th) ky) #s(literal 1/120 binary64) (*.f64 #s(literal -1/6 binary64) ky)) (*.f64 th th) ky) th))
#s(approx (* (sin th) ky) (*.f64 (fma.f64 (fma.f64 (*.f64 th th) (fma.f64 (*.f64 (*.f64 th th) ky) #s(literal -1/5040 binary64) (*.f64 #s(literal 1/120 binary64) ky)) (*.f64 #s(literal -1/6 binary64) ky)) (*.f64 th th) ky) th))
#s(approx (* (sin ky) (sin th)) (*.f64 (sin.f64 ky) th))
#s(approx (* (sin ky) (sin th)) (*.f64 (fma.f64 (*.f64 (*.f64 th th) #s(literal -1/6 binary64)) (sin.f64 ky) (sin.f64 ky)) th))
#s(approx (* (sin ky) (sin th)) (*.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 th th) (sin.f64 ky)) #s(literal 1/120 binary64) (*.f64 (sin.f64 ky) #s(literal -1/6 binary64))) (*.f64 th th) (sin.f64 ky)) th))
#s(approx (* (sin ky) (sin th)) (*.f64 (fma.f64 (fma.f64 #s(literal -1/6 binary64) (sin.f64 ky) (*.f64 (fma.f64 (*.f64 (*.f64 th th) (sin.f64 ky)) #s(literal -1/5040 binary64) (*.f64 (sin.f64 ky) #s(literal 1/120 binary64))) (*.f64 th th))) (*.f64 th th) (sin.f64 ky)) th))
#s(approx (+ (* (* (- (* (* (+ (* (* th th) -1/5040) 1/120) th) th) 1/6) th) th) 1) (fma.f64 (*.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)))
#s(approx (+ (* (* (- (* (* (+ (* (* th th) -1/5040) 1/120) th) th) 1/6) th) th) 1) (fma.f64 (-.f64 (*.f64 (*.f64 th th) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (*.f64 th th) #s(literal 1 binary64)))
#s(approx (+ (* (* (- (* (* (+ (* (* th th) -1/5040) 1/120) th) th) 1/6) th) th) 1) (fma.f64 (*.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) th) th) #s(literal 1/6 binary64)) th) th #s(literal 1 binary64)))
#s(approx (* (- (* (* (+ (* (* th th) -1/5040) 1/120) th) th) 1/6) th) (*.f64 #s(literal -1/6 binary64) th))
#s(approx (* (- (* (* (+ (* (* th th) -1/5040) 1/120) th) th) 1/6) th) (*.f64 (-.f64 (*.f64 (*.f64 th th) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) th))
#s(approx (* (- (* (* (+ (* (* th th) -1/5040) 1/120) th) th) 1/6) th) (*.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) th) th) #s(literal 1/6 binary64)) th))
#s(approx (- (* (* (+ (* (* th th) -1/5040) 1/120) th) th) 1/6) #s(literal -1/6 binary64))
#s(approx (- (* (* (+ (* (* th th) -1/5040) 1/120) th) th) 1/6) (-.f64 (*.f64 (*.f64 th th) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)))
#s(approx (- (* (* (+ (* (* th th) -1/5040) 1/120) th) th) 1/6) (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) th) th) #s(literal 1/6 binary64)))
#s(approx (* (* (+ (* (* th th) -1/5040) 1/120) th) th) (*.f64 (*.f64 th th) #s(literal 1/120 binary64)))
#s(approx (* (* (+ (* (* th th) -1/5040) 1/120) th) th) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) th) th))
#s(approx (* (+ (* (* th th) -1/5040) 1/120) th) (*.f64 #s(literal 1/120 binary64) th))
#s(approx (* (+ (* (* th th) -1/5040) 1/120) th) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) th))
#s(approx (+ (* (* th th) -1/5040) 1/120) #s(literal 1/120 binary64))
#s(approx (+ (* (* th th) -1/5040) 1/120) (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)))
#s(approx (* th th) (*.f64 th th))
#s(approx (sin th) (sin.f64 th))
#s(approx (* (+ (* (* (- (* (* (+ (* (* th th) -1/5040) 1/120) th) th) 1/6) th) th) 1) th) (*.f64 (pow.f64 th #s(literal 7 binary64)) #s(literal -1/5040 binary64)))
#s(approx (* (+ (* (* (- (* (* (+ (* (* th th) -1/5040) 1/120) th) th) 1/6) th) th) 1) th) (*.f64 (-.f64 (/.f64 #s(literal 1/120 binary64) (*.f64 th th)) #s(literal 1/5040 binary64)) (pow.f64 th #s(literal 7 binary64))))
#s(approx (* (+ (* (* (- (* (* (+ (* (* th th) -1/5040) 1/120) th) th) 1/6) th) th) 1) th) (*.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/120 binary64) (*.f64 th th)) #s(literal 1/5040 binary64)) (/.f64 #s(literal 1/6 binary64) (*.f64 (*.f64 th th) (*.f64 th th)))) (pow.f64 th #s(literal 7 binary64))))
#s(approx (* (+ (* (* (- (* (* (+ (* (* th th) -1/5040) 1/120) th) th) 1/6) th) th) 1) th) (*.f64 (-.f64 (-.f64 (+.f64 (pow.f64 th #s(literal -6 binary64)) (/.f64 #s(literal 1/120 binary64) (*.f64 th th))) #s(literal 1/5040 binary64)) (/.f64 #s(literal 1/6 binary64) (*.f64 (*.f64 th th) (*.f64 th th)))) (pow.f64 th #s(literal 7 binary64))))
#s(approx (+ (* (* (- (* (* (+ (* (* th th) -1/5040) 1/120) th) th) 1/6) th) th) 1) (*.f64 (*.f64 (*.f64 (*.f64 th th) th) (*.f64 (*.f64 th th) th)) #s(literal -1/5040 binary64)))
#s(approx (+ (* (* (- (* (* (+ (* (* th th) -1/5040) 1/120) th) th) 1/6) th) th) 1) (*.f64 (*.f64 (*.f64 (*.f64 th th) th) (*.f64 (*.f64 th th) th)) (-.f64 (/.f64 #s(literal 1/120 binary64) (*.f64 th th)) #s(literal 1/5040 binary64))))
#s(approx (+ (* (* (- (* (* (+ (* (* th th) -1/5040) 1/120) th) th) 1/6) th) th) 1) (*.f64 (*.f64 (*.f64 (*.f64 th th) th) (*.f64 (*.f64 th th) th)) (-.f64 (-.f64 (/.f64 #s(literal 1/120 binary64) (*.f64 th th)) #s(literal 1/5040 binary64)) (/.f64 #s(literal 1/6 binary64) (*.f64 (*.f64 th th) (*.f64 th th))))))
#s(approx (+ (* (* (- (* (* (+ (* (* th th) -1/5040) 1/120) th) th) 1/6) th) th) 1) (*.f64 (*.f64 (*.f64 (*.f64 th th) th) (*.f64 (*.f64 th th) th)) (-.f64 (-.f64 (+.f64 (pow.f64 th #s(literal -6 binary64)) (/.f64 #s(literal 1/120 binary64) (*.f64 th th))) #s(literal 1/5040 binary64)) (/.f64 #s(literal 1/6 binary64) (*.f64 (*.f64 th th) (*.f64 th th))))))
#s(approx (* (- (* (* (+ (* (* th th) -1/5040) 1/120) th) th) 1/6) th) (*.f64 (pow.f64 th #s(literal 5 binary64)) #s(literal -1/5040 binary64)))
#s(approx (* (- (* (* (+ (* (* th th) -1/5040) 1/120) th) th) 1/6) th) (*.f64 (pow.f64 th #s(literal 5 binary64)) (-.f64 (/.f64 #s(literal 1/120 binary64) (*.f64 th th)) #s(literal 1/5040 binary64))))
#s(approx (* (- (* (* (+ (* (* th th) -1/5040) 1/120) th) th) 1/6) th) (*.f64 (pow.f64 th #s(literal 5 binary64)) (-.f64 (-.f64 (/.f64 #s(literal 1/120 binary64) (*.f64 th th)) #s(literal 1/5040 binary64)) (/.f64 #s(literal 1/6 binary64) (*.f64 (*.f64 th th) (*.f64 th th))))))
#s(approx (- (* (* (+ (* (* th th) -1/5040) 1/120) th) th) 1/6) (*.f64 (*.f64 (*.f64 th th) (*.f64 th th)) #s(literal -1/5040 binary64)))
#s(approx (- (* (* (+ (* (* th th) -1/5040) 1/120) th) th) 1/6) (*.f64 (*.f64 (*.f64 th th) (*.f64 th th)) (-.f64 (/.f64 #s(literal 1/120 binary64) (*.f64 th th)) #s(literal 1/5040 binary64))))
#s(approx (- (* (* (+ (* (* th th) -1/5040) 1/120) th) th) 1/6) (*.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/120 binary64) (*.f64 th th)) #s(literal 1/5040 binary64)) (/.f64 #s(literal 1/6 binary64) (*.f64 (*.f64 th th) (*.f64 th th)))) (*.f64 (*.f64 th th) (*.f64 th th))))
#s(approx (* (+ (* (* th th) -1/5040) 1/120) th) (*.f64 (*.f64 (*.f64 th th) th) #s(literal -1/5040 binary64)))
#s(approx (* (+ (* (* th th) -1/5040) 1/120) th) (*.f64 (*.f64 (*.f64 th th) th) (-.f64 (/.f64 #s(literal 1/120 binary64) (*.f64 th th)) #s(literal 1/5040 binary64))))
#s(approx (+ (* (* th th) -1/5040) 1/120) (*.f64 (*.f64 th th) #s(literal -1/5040 binary64)))
#s(approx (+ (* (* th th) -1/5040) 1/120) (*.f64 (-.f64 (/.f64 #s(literal 1/120 binary64) (*.f64 th th)) #s(literal 1/5040 binary64)) (*.f64 th th)))
#s(approx (* (+ (* (* (- (* (* (+ (* (* th th) -1/5040) 1/120) th) th) 1/6) th) th) 1) th) (neg.f64 (*.f64 (-.f64 #s(literal 1/5040 binary64) (/.f64 #s(literal 1/120 binary64) (*.f64 th th))) (pow.f64 th #s(literal 7 binary64)))))
#s(approx (* (+ (* (* (- (* (* (+ (* (* th th) -1/5040) 1/120) th) th) 1/6) th) th) 1) th) (neg.f64 (*.f64 (+.f64 #s(literal 1/5040 binary64) (-.f64 (/.f64 #s(literal 1/6 binary64) (*.f64 (*.f64 th th) (*.f64 th th))) (/.f64 #s(literal 1/120 binary64) (*.f64 th th)))) (pow.f64 th #s(literal 7 binary64)))))
#s(approx (* (+ (* (* (- (* (* (+ (* (* th th) -1/5040) 1/120) th) th) 1/6) th) th) 1) th) (neg.f64 (*.f64 (-.f64 (+.f64 #s(literal 1/5040 binary64) (-.f64 (/.f64 #s(literal 1/6 binary64) (*.f64 (*.f64 th th) (*.f64 th th))) (/.f64 #s(literal 1/120 binary64) (*.f64 th th)))) (pow.f64 th #s(literal -6 binary64))) (pow.f64 th #s(literal 7 binary64)))))
#s(approx (* (- (* (* (+ (* (* th th) -1/5040) 1/120) th) th) 1/6) th) (neg.f64 (*.f64 (-.f64 #s(literal 1/5040 binary64) (/.f64 #s(literal 1/120 binary64) (*.f64 th th))) (pow.f64 th #s(literal 5 binary64)))))
#s(approx (* (- (* (* (+ (* (* th th) -1/5040) 1/120) th) th) 1/6) th) (neg.f64 (*.f64 (+.f64 #s(literal 1/5040 binary64) (-.f64 (/.f64 #s(literal 1/6 binary64) (*.f64 (*.f64 th th) (*.f64 th th))) (/.f64 #s(literal 1/120 binary64) (*.f64 th th)))) (pow.f64 th #s(literal 5 binary64)))))
#s(approx (* (+ (* (* th th) -1/5040) 1/120) th) (neg.f64 (*.f64 (-.f64 #s(literal 1/5040 binary64) (/.f64 #s(literal 1/120 binary64) (*.f64 th th))) (*.f64 (*.f64 th th) th))))

eval65.0ms (1%)

Memory
26.7MiB live, 164.0MiB allocated; 9ms collecting garbage
Compiler

Compiled 7 864 to 3 194 computations (59.4% saved)

prune119.0ms (1.7%)

Memory
-17.7MiB live, 124.1MiB allocated; 14ms collecting garbage
Pruning

72 alts after pruning (65 fresh and 7 done)

PrunedKeptTotal
New47216488
Fresh44953
Picked325
Done055
Total47972551
Accuracy
100.0%
Counts
551 → 72
Alt Table
Click to see full alt table
StatusAccuracyProgram
96.2%
(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))
36.7%
(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) (sin.f64 ky)))
49.6%
(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (fabs.f64 (sin.f64 ky))))
22.0%
(/.f64 (*.f64 (sin.f64 ky) #s(approx (sin th) (*.f64 #s(approx (+ (* (* (- (* (* (+ (* (* th th) -1/5040) 1/120) th) th) 1/6) th) th) 1) (fma.f64 (*.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64))) th))) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) (sin.f64 ky)))
22.5%
(/.f64 (*.f64 (sin.f64 ky) #s(approx (sin th) th)) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) (sin.f64 ky)))
21.9%
(/.f64 (*.f64 #s(approx (exp (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2)) ky) #s(approx (sin th) (*.f64 (fma.f64 (*.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) th) th) #s(literal 1/6 binary64)) th) th #s(literal 1 binary64)) th))) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) #s(approx (exp (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2)) ky)))
99.5%
(/.f64 (*.f64 #s(literal 1 binary64) (/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) (/.f64 #s(literal 1 binary64) (sin.f64 ky)))
46.6%
(/.f64 (*.f64 #s(literal 1 binary64) (sin.f64 th)) (*.f64 (/.f64 #s(literal 1 binary64) (sin.f64 ky)) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) (fabs.f64 (sin.f64 kx)))))
41.7%
(/.f64 (*.f64 #s(literal 1 binary64) (sin.f64 th)) #s(approx (* (/ 1 (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 (fabs.f64 (sin.f64 kx)) ky)))
51.9%
(/.f64 #s(approx (sin th) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) th)) (*.f64 (/.f64 #s(literal 1 binary64) (sin.f64 ky)) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))
31.5%
(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (exp.f64 (*.f64 (neg.f64 (log.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))) #s(literal 1/2 binary64))))) (sin.f64 th))
86.3%
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (fma.f64 (sin.f64 ky) (sin.f64 ky) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))) (sin.f64 th))
78.1%
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 (sin.f64 ky) #s(literal 4 binary64))) (-.f64 (-.f64 #s(literal 1/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 ky ky)))))))) (sin.f64 th))
50.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))))) #s(approx (sin th) th))
77.4%
(*.f64 (/.f64 (sin.f64 ky) (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 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))))) (sin.f64 th))
21.8%
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 ky ky (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))) #s(approx (sin th) th))
29.3%
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 ky ky #s(approx (- 1/2 (* 1/2 (cos (* 2 kx)))) (*.f64 kx kx)))))) (sin.f64 th))
31.7%
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))))) (sin.f64 th))
13.5%
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (+ (* ky ky) (- 1/2 (* 1/2 (cos (* 2 kx))))) (*.f64 ky ky))))) (sin.f64 th))
43.1%
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 ky)))))) (sin.f64 th))
29.4%
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (*.f64 (sqrt.f64 (sin.f64 ky)) (sqrt.f64 (sin.f64 ky))))) (sin.f64 th))
13.6%
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (*.f64 (sqrt.f64 (neg.f64 (sin.f64 ky))) (sqrt.f64 (neg.f64 (sin.f64 ky)))))) (sin.f64 th))
22.4%
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 (sin.f64 ky)))) #s(approx (sin th) th))
46.6%
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 (sin.f64 kx)))) (sin.f64 th))
40.4%
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (exp.f64 (*.f64 (neg.f64 (log.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (sin.f64 ky)) #s(literal 2 binary64)))) #s(literal 1/2 binary64))))) (sin.f64 th))
11.3%
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (exp.f64 (*.f64 (neg.f64 (log.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal -2 binary64) ky (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 1/2 binary64)))))) #s(literal 1/2 binary64))))) (sin.f64 th))
31.5%
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (exp.f64 (*.f64 (neg.f64 (log.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))) #s(literal 1/2 binary64))))) (sin.f64 th))
14.0%
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (exp.f64 (*.f64 (neg.f64 (log.f64 #s(approx (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))) (/.f64 (fma.f64 (*.f64 ky ky) #s(literal 1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky))))) #s(literal 1/2 binary64))))) (sin.f64 th))
11.3%
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (exp.f64 (*.f64 (log.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 (fma.f64 #s(literal 2 binary64) ky (/.f64 (PI.f64) #s(literal 2 binary64))))))) #s(literal 1/2 binary64))))) (sin.f64 th))
11.3%
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (exp.f64 (*.f64 (log.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 (fma.f64 #s(literal -2 binary64) ky (/.f64 (PI.f64) #s(literal 2 binary64))))))) #s(literal 1/2 binary64))))) (sin.f64 th))
31.6%
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (exp.f64 (*.f64 (log.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal 1/2 binary64))))) (sin.f64 th))
16.6%
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (exp.f64 (*.f64 (log.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal 1/2 binary64))))) #s(approx (sin th) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) th)))
14.7%
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (exp.f64 #s(approx (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2) (log.f64 ky))))) (sin.f64 th))
30.3%
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) (sin.f64 ky))) (sin.f64 th))
37.6%
(*.f64 (/.f64 #s(approx (sin ky) (*.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky)) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 ky ky (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))) (sin.f64 th))
17.7%
(*.f64 (/.f64 #s(approx (sin ky) (*.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky)) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 #s(approx (sin ky) (*.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky))))) (sin.f64 th))
40.3%
(*.f64 (/.f64 #s(approx (sin ky) ky) (sqrt.f64 (+.f64 (exp.f64 (*.f64 (log.f64 (sin.f64 kx)) #s(literal 2 binary64))) (pow.f64 #s(approx (sin ky) ky) #s(literal 2 binary64))))) (sin.f64 th))
30.3%
(*.f64 (/.f64 #s(approx (sin ky) ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 #s(approx (sin ky) ky)))) (sin.f64 th))
16.1%
(*.f64 (/.f64 #s(approx (exp (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2)) ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(approx (/ 1 (pow (sin ky) -1)) #s(approx (exp (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2)) ky)))) #s(approx (sin th) th))
76.4%
(*.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 (sin.f64 ky) #s(literal -1/2 binary64)) #s(literal 2 binary64))) (/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 (sin.f64 ky) #s(literal -1/2 binary64)) #s(literal 2 binary64))))))
46.6%
(*.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 ky) #s(literal -1 binary64))) (/.f64 (sin.f64 th) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) (fabs.f64 (sin.f64 kx)))))
74.0%
(*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 (log.f64 (sin.f64 ky))))) (/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) (/.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 (log.f64 (sin.f64 ky))))))))
38.3%
(*.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))))
99.6%
(*.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))
46.6%
(*.f64 (sin.f64 ky) (/.f64 (sin.f64 th) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (fabs.f64 (sin.f64 kx)))))
52.4%
(*.f64 (sin.f64 ky) (/.f64 #s(approx (sin th) th) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))
43.2%
(*.f64 (sin.f64 ky) #s(approx (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 ky)))))
41.7%
(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (fabs.f64 (sin.f64 kx)))) (sin.f64 th))
23.5%
(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (fabs.f64 (sin.f64 kx)))) #s(approx (sin th) th))
64.2%
(*.f64 #s(approx (/ 1 (pow (sin ky) -1)) ky) (/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) #s(approx (/ 1 (pow (sin ky) -1)) ky))))
39.8%
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))))))
29.2%
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))
39.8%
#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))))
20.6%
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 #s(approx (sin kx) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 kx kx) #s(literal 1/120 binary64)) (*.f64 kx kx)) #s(literal 1/6 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) kx)))))
20.6%
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 #s(approx (sin kx) (*.f64 (fma.f64 (-.f64 (*.f64 #s(literal 1/120 binary64) (*.f64 kx kx)) #s(literal 1/6 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) kx)))))
20.7%
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 #s(approx (sin kx) (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 kx kx) #s(literal 1 binary64)) kx)))))
20.8%
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 #s(approx (sin kx) kx))))
49.0%
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 ky) th) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))
21.2%
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) th)) ky) (fabs.f64 (sin.f64 kx))))
21.5%
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))))))
16.4%
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))))
13.8%
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (sqrt.f64 (*.f64 #s(approx (sin kx) kx) #s(approx (sin kx) kx)))))
21.6%
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (fabs.f64 (sin.f64 kx))))
14.9%
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (fabs.f64 #s(approx (sin kx) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (*.f64 kx kx)) #s(literal 1/6 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) kx)))))
14.9%
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (fabs.f64 #s(approx (sin kx) (*.f64 (fma.f64 (-.f64 (*.f64 (*.f64 kx kx) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) kx)))))
14.9%
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (fabs.f64 #s(approx (sin kx) (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 kx kx) #s(literal 1 binary64)) kx)))))
15.0%
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (fabs.f64 #s(approx (sin kx) kx))))
14.5%
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(approx (* (sin th) ky) (*.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 th th) ky) #s(literal 1/120 binary64) (*.f64 #s(literal -1/6 binary64) ky)) (*.f64 th th) ky) th)) (fabs.f64 #s(approx (sin kx) kx))))
14.4%
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(approx (* (sin th) ky) (*.f64 (fma.f64 (fma.f64 (*.f64 th th) (fma.f64 (*.f64 (*.f64 th th) ky) #s(literal -1/5040 binary64) (*.f64 #s(literal 1/120 binary64) ky)) (*.f64 #s(literal -1/6 binary64) ky)) (*.f64 th th) ky) th)) (fabs.f64 #s(approx (sin kx) kx))))
14.5%
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(approx (* (sin th) ky) (*.f64 (fma.f64 (*.f64 (*.f64 th th) ky) #s(literal -1/6 binary64) ky) th)) (fabs.f64 #s(approx (sin kx) kx))))
16.9%
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 #s(approx (sin th) th) (/.f64 ky (fabs.f64 #s(approx (sin kx) kx)))))
41.8%
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 ky (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx)))))
Compiler

Compiled 2 808 to 2 070 computations (26.3% saved)

regimes309.0ms (4.6%)

Memory
5.7MiB live, 492.9MiB allocated; 49ms collecting garbage
Counts
94 → 1
Calls
Call 1
Inputs
(*.f64 (/.f64 #s(approx (exp (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2)) ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(approx (/ 1 (pow (sin ky) -1)) #s(approx (exp (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2)) ky)))) #s(approx (sin th) th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 #s(approx (sin th) th) (/.f64 ky (fabs.f64 #s(approx (sin kx) kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (fabs.f64 #s(approx (sin kx) kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (sqrt.f64 (*.f64 #s(approx (sin kx) kx) #s(approx (sin kx) kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(approx (* (sin th) ky) (*.f64 (fma.f64 (*.f64 (*.f64 th th) ky) #s(literal -1/6 binary64) ky) th)) (fabs.f64 #s(approx (sin kx) kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (fabs.f64 #s(approx (sin kx) (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 kx kx) #s(literal 1 binary64)) kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (fabs.f64 #s(approx (sin kx) (*.f64 (fma.f64 (-.f64 (*.f64 (*.f64 kx kx) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(approx (* (sin th) ky) (*.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 th th) ky) #s(literal 1/120 binary64) (*.f64 #s(literal -1/6 binary64) ky)) (*.f64 th th) ky) th)) (fabs.f64 #s(approx (sin kx) kx))))
(/.f64 (*.f64 #s(approx (exp (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2)) ky) #s(approx (sin th) (*.f64 (fma.f64 (*.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) th) th) #s(literal 1/6 binary64)) th) th #s(literal 1 binary64)) th))) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) #s(approx (exp (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2)) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (fabs.f64 #s(approx (sin kx) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (*.f64 kx kx)) #s(literal 1/6 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) 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 #s(approx (sin kx) kx))))
(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (fabs.f64 (sin.f64 kx)))) #s(approx (sin th) th))
(*.f64 (/.f64 #s(approx (sin ky) ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 #s(approx (sin ky) ky)))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(approx (* (sin th) ky) (*.f64 (fma.f64 (fma.f64 (*.f64 th th) (fma.f64 (*.f64 (*.f64 th th) ky) #s(literal -1/5040 binary64) (*.f64 #s(literal 1/120 binary64) ky)) (*.f64 #s(literal -1/6 binary64) ky)) (*.f64 th th) ky) th)) (fabs.f64 #s(approx (sin kx) kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (/.f64 #s(literal 1 binary64) (/.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 #s(approx (sin th) th) ky) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) 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 #s(approx (sin kx) (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 kx kx) #s(literal 1 binary64)) kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 #s(approx (sin kx) (*.f64 (fma.f64 (-.f64 (*.f64 #s(literal 1/120 binary64) (*.f64 kx kx)) #s(literal 1/6 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) kx)))))
(*.f64 (/.f64 #s(approx (sin ky) (*.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky)) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 #s(approx (sin ky) (*.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 #s(approx (sin kx) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 kx kx) #s(literal 1/120 binary64)) (*.f64 kx kx)) #s(literal 1/6 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) kx)))))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(approx (/ 1 (pow (sin ky) -1)) (sin.f64 ky)))) #s(approx (sin th) th))
(/.f64 (*.f64 (sin.f64 ky) #s(approx (sin th) th)) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) (sin.f64 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))))
(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (fabs.f64 (sin.f64 kx)))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 ky (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx)))))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 (sin.f64 ky)))) #s(approx (sin th) th))
(/.f64 (*.f64 #s(literal 1 binary64) (sin.f64 th)) #s(approx (* (/ 1 (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 (fabs.f64 (sin.f64 kx)) ky)))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (+ (* ky ky) (- 1/2 (* 1/2 (cos (* 2 kx))))) (*.f64 ky ky))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))))))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 ky ky #s(approx (- 1/2 (* 1/2 (cos (* 2 kx)))) (*.f64 kx kx)))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))
(/.f64 (*.f64 (sin.f64 ky) #s(approx (sin th) (*.f64 #s(approx (+ (* (* (- (* (* (+ (* (* th th) -1/5040) 1/120) th) th) 1/6) th) th) 1) (fma.f64 (*.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64))) th))) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) (sin.f64 ky)))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 (sin.f64 ky)))) #s(approx (sin th) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) th)))
(*.f64 #s(approx (sin ky) ky) (/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) #s(approx (sin ky) ky))))
(*.f64 #s(approx (/ 1 (pow (sin ky) -1)) ky) (/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) #s(approx (/ 1 (pow (sin ky) -1)) ky))))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 ky ky (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))) #s(approx (sin th) th))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (exp.f64 #s(approx (* (log (- 1/2 (* 1/2 (cos (+ ky ky))))) 1/2) (log.f64 ky))))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (exp.f64 #s(approx (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2) (log.f64 ky))))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 (sin.f64 ky)))) #s(approx (sin th) (*.f64 (fma.f64 (-.f64 (*.f64 (*.f64 th th) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (*.f64 th th) #s(literal 1 binary64)) th)))
(*.f64 (/.f64 #s(approx (sin ky) (*.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky)) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 ky ky (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))) (sin.f64 th))
(/.f64 (*.f64 (sin.f64 ky) #s(approx (sin th) (*.f64 (fma.f64 (*.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) th) th) #s(literal 1/6 binary64)) th) th #s(literal 1 binary64)) th))) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) (sin.f64 ky)))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 (sin.f64 ky)))) #s(approx (sin th) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (*.f64 th th)) #s(literal 1/6 binary64)) (*.f64 th th) #s(literal 1 binary64)) th)))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) (sin.f64 ky))) (sin.f64 th))
(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) (sin.f64 ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (fabs.f64 (sin.f64 ky))))
(*.f64 (sin.f64 ky) #s(approx (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 ky)))))
(*.f64 (sin.f64 ky) (/.f64 (sin.f64 th) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (fabs.f64 (sin.f64 kx)))))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 (sin.f64 kx)))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 (sin.f64 ky)))) (sin.f64 th))
(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (fabs.f64 (sin.f64 ky))))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (exp.f64 (*.f64 (neg.f64 (log.f64 #s(approx (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))) (/.f64 (fma.f64 (*.f64 ky ky) #s(literal 1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky))))) #s(literal 1/2 binary64))))) (sin.f64 th))
(*.f64 (/.f64 #s(approx (sin ky) ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 #s(approx (sin ky) ky) #s(literal 2 binary64))))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (exp.f64 (*.f64 (log.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal 1/2 binary64))))) #s(approx (sin th) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) th)))
(*.f64 (/.f64 #s(approx (sin ky) ky) (sqrt.f64 (+.f64 (exp.f64 (*.f64 (log.f64 (sin.f64 kx)) #s(literal 2 binary64))) (pow.f64 #s(approx (sin ky) ky) #s(literal 2 binary64))))) (sin.f64 th))
(/.f64 (*.f64 #s(literal 1 binary64) (sin.f64 th)) (*.f64 (/.f64 #s(literal 1 binary64) (sin.f64 ky)) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) (fabs.f64 (sin.f64 kx)))))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 ky)))))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #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) th) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))
(*.f64 (sin.f64 ky) (/.f64 #s(approx (sin th) th) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 ky ky (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))) (sin.f64 th))
(*.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 ky) #s(literal -1 binary64))) (/.f64 (sin.f64 th) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) (fabs.f64 (sin.f64 kx)))))
(/.f64 #s(approx (sin th) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) th)) (*.f64 (/.f64 #s(literal 1 binary64) (sin.f64 ky)) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (exp.f64 (*.f64 (log.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal 1/2 binary64))))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (exp.f64 (*.f64 (neg.f64 (log.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))) #s(literal 1/2 binary64))))) (sin.f64 th))
(*.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 ky) #s(literal -1 binary64))) #s(approx (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1)))))) (/.f64 th (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (exp.f64 (*.f64 (log.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 (fma.f64 #s(literal -2 binary64) ky (/.f64 (PI.f64) #s(literal 2 binary64))))))) #s(literal 1/2 binary64))))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (exp.f64 (*.f64 (log.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 (fma.f64 #s(literal 2 binary64) ky (/.f64 (PI.f64) #s(literal 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)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(approx (sin th) th))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (exp.f64 (*.f64 (neg.f64 (log.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal -2 binary64) ky (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 1/2 binary64)))))) #s(literal 1/2 binary64))))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (*.f64 (sqrt.f64 (sin.f64 ky)) (sqrt.f64 (sin.f64 ky))))) (sin.f64 th))
(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (exp.f64 (*.f64 (neg.f64 (log.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))) #s(literal 1/2 binary64))))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (exp.f64 (*.f64 (neg.f64 (log.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (sin.f64 ky)) #s(literal 2 binary64)))) #s(literal 1/2 binary64))))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (*.f64 (sqrt.f64 (neg.f64 (sin.f64 ky))) (sqrt.f64 (neg.f64 (sin.f64 ky)))))) (sin.f64 th))
(*.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))
(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))
(/.f64 (*.f64 #s(literal 1 binary64) (sin.f64 th)) (*.f64 (/.f64 #s(literal 1 binary64) (sin.f64 ky)) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))
(/.f64 (*.f64 #s(literal 1 binary64) (/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) (/.f64 #s(literal 1 binary64) (sin.f64 ky)))
(*.f64 (/.f64 (sin.f64 ky) (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 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))) (sin.f64 th))
(*.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))))
(*.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 ky) (sqrt.f64 (+.f64 (exp.f64 (*.f64 (log.f64 (sin.f64 kx)) #s(literal 2 binary64))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (fma.f64 (sin.f64 ky) (sin.f64 ky) (-.f64 #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 (fma.f64 (sin.f64 ky) (sin.f64 ky) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))) (sin.f64 th))
(*.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 ky) #s(literal -1 binary64))) (/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 ky) #s(literal -1 binary64))))))
(*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 (log.f64 (sin.f64 ky))))) (/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) (/.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 (log.f64 (sin.f64 ky))))))))
(*.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (hypot.f64 (+.f64 (cosh.f64 (log.f64 (sin.f64 kx))) (sinh.f64 (log.f64 (sin.f64 kx)))) (sin.f64 ky))))
(*.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 (sin.f64 ky) #s(literal -1/2 binary64)) #s(literal 2 binary64))) (/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 (sin.f64 ky) #s(literal -1/2 binary64)) #s(literal 2 binary64))))))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 (sin.f64 ky) #s(literal 4 binary64))) (-.f64 (-.f64 #s(literal 1/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 ky ky)))))))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 (sin.f64 ky) #s(literal 4 binary64))) (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) (/.f64 (hypot.f64 (pow.f64 (sin.f64 kx) #s(literal 3 binary64)) (pow.f64 (sin.f64 ky) #s(literal 3 binary64))) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (*.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal 2 binary64))))))) (sin.f64 th))
Outputs
(*.f64 (sin.f64 ky) (/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))
Calls

9 calls:

43.0ms
(*.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))
43.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
(sin.f64 kx)
38.0ms
ky
37.0ms
(sin.f64 ky)
Results
AccuracySegmentsBranch
99.6%1(sin.f64 th)
99.6%1(sin.f64 kx)
99.6%1(pow.f64 (sin.f64 kx) #s(literal 2 binary64))
99.6%1(sin.f64 ky)
99.6%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)))))
99.6%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))
99.6%1kx
99.6%1ky
99.6%1th
Compiler

Compiled 40 to 51 computations (-27.5% saved)

regimes325.0ms (4.8%)

Memory
36.6MiB live, 537.5MiB allocated; 121ms collecting garbage
Counts
76 → 2
Calls
Call 1
Inputs
(*.f64 (/.f64 #s(approx (exp (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2)) ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(approx (/ 1 (pow (sin ky) -1)) #s(approx (exp (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2)) ky)))) #s(approx (sin th) th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 #s(approx (sin th) th) (/.f64 ky (fabs.f64 #s(approx (sin kx) kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (fabs.f64 #s(approx (sin kx) kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (sqrt.f64 (*.f64 #s(approx (sin kx) kx) #s(approx (sin kx) kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(approx (* (sin th) ky) (*.f64 (fma.f64 (*.f64 (*.f64 th th) ky) #s(literal -1/6 binary64) ky) th)) (fabs.f64 #s(approx (sin kx) kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (fabs.f64 #s(approx (sin kx) (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 kx kx) #s(literal 1 binary64)) kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (fabs.f64 #s(approx (sin kx) (*.f64 (fma.f64 (-.f64 (*.f64 (*.f64 kx kx) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(approx (* (sin th) ky) (*.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 th th) ky) #s(literal 1/120 binary64) (*.f64 #s(literal -1/6 binary64) ky)) (*.f64 th th) ky) th)) (fabs.f64 #s(approx (sin kx) kx))))
(/.f64 (*.f64 #s(approx (exp (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2)) ky) #s(approx (sin th) (*.f64 (fma.f64 (*.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) th) th) #s(literal 1/6 binary64)) th) th #s(literal 1 binary64)) th))) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) #s(approx (exp (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2)) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (fabs.f64 #s(approx (sin kx) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (*.f64 kx kx)) #s(literal 1/6 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) 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 #s(approx (sin kx) kx))))
(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (fabs.f64 (sin.f64 kx)))) #s(approx (sin th) th))
(*.f64 (/.f64 #s(approx (sin ky) ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 #s(approx (sin ky) ky)))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(approx (* (sin th) ky) (*.f64 (fma.f64 (fma.f64 (*.f64 th th) (fma.f64 (*.f64 (*.f64 th th) ky) #s(literal -1/5040 binary64) (*.f64 #s(literal 1/120 binary64) ky)) (*.f64 #s(literal -1/6 binary64) ky)) (*.f64 th th) ky) th)) (fabs.f64 #s(approx (sin kx) kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (/.f64 #s(literal 1 binary64) (/.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 #s(approx (sin th) th) ky) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) 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 #s(approx (sin kx) (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 kx kx) #s(literal 1 binary64)) kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 #s(approx (sin kx) (*.f64 (fma.f64 (-.f64 (*.f64 #s(literal 1/120 binary64) (*.f64 kx kx)) #s(literal 1/6 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) kx)))))
(*.f64 (/.f64 #s(approx (sin ky) (*.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky)) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 #s(approx (sin ky) (*.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 #s(approx (sin kx) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 kx kx) #s(literal 1/120 binary64)) (*.f64 kx kx)) #s(literal 1/6 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) kx)))))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(approx (/ 1 (pow (sin ky) -1)) (sin.f64 ky)))) #s(approx (sin th) th))
(/.f64 (*.f64 (sin.f64 ky) #s(approx (sin th) th)) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) (sin.f64 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))))
(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (fabs.f64 (sin.f64 kx)))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 ky (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx)))))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 (sin.f64 ky)))) #s(approx (sin th) th))
(/.f64 (*.f64 #s(literal 1 binary64) (sin.f64 th)) #s(approx (* (/ 1 (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 (fabs.f64 (sin.f64 kx)) ky)))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (+ (* ky ky) (- 1/2 (* 1/2 (cos (* 2 kx))))) (*.f64 ky ky))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))))))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 ky ky #s(approx (- 1/2 (* 1/2 (cos (* 2 kx)))) (*.f64 kx kx)))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))
(/.f64 (*.f64 (sin.f64 ky) #s(approx (sin th) (*.f64 #s(approx (+ (* (* (- (* (* (+ (* (* th th) -1/5040) 1/120) th) th) 1/6) th) th) 1) (fma.f64 (*.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64))) th))) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) (sin.f64 ky)))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 (sin.f64 ky)))) #s(approx (sin th) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) th)))
(*.f64 #s(approx (sin ky) ky) (/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) #s(approx (sin ky) ky))))
(*.f64 #s(approx (/ 1 (pow (sin ky) -1)) ky) (/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) #s(approx (/ 1 (pow (sin ky) -1)) ky))))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 ky ky (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))) #s(approx (sin th) th))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (exp.f64 #s(approx (* (log (- 1/2 (* 1/2 (cos (+ ky ky))))) 1/2) (log.f64 ky))))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (exp.f64 #s(approx (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2) (log.f64 ky))))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 (sin.f64 ky)))) #s(approx (sin th) (*.f64 (fma.f64 (-.f64 (*.f64 (*.f64 th th) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (*.f64 th th) #s(literal 1 binary64)) th)))
(*.f64 (/.f64 #s(approx (sin ky) (*.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky)) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 ky ky (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))) (sin.f64 th))
(/.f64 (*.f64 (sin.f64 ky) #s(approx (sin th) (*.f64 (fma.f64 (*.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) th) th) #s(literal 1/6 binary64)) th) th #s(literal 1 binary64)) th))) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) (sin.f64 ky)))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 (sin.f64 ky)))) #s(approx (sin th) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (*.f64 th th)) #s(literal 1/6 binary64)) (*.f64 th th) #s(literal 1 binary64)) th)))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) (sin.f64 ky))) (sin.f64 th))
(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) (sin.f64 ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (fabs.f64 (sin.f64 ky))))
(*.f64 (sin.f64 ky) #s(approx (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 ky)))))
(*.f64 (sin.f64 ky) (/.f64 (sin.f64 th) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (fabs.f64 (sin.f64 kx)))))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 (sin.f64 kx)))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 (sin.f64 ky)))) (sin.f64 th))
(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (fabs.f64 (sin.f64 ky))))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (exp.f64 (*.f64 (neg.f64 (log.f64 #s(approx (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))) (/.f64 (fma.f64 (*.f64 ky ky) #s(literal 1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky))))) #s(literal 1/2 binary64))))) (sin.f64 th))
(*.f64 (/.f64 #s(approx (sin ky) ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 #s(approx (sin ky) ky) #s(literal 2 binary64))))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (exp.f64 (*.f64 (log.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal 1/2 binary64))))) #s(approx (sin th) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) th)))
(*.f64 (/.f64 #s(approx (sin ky) ky) (sqrt.f64 (+.f64 (exp.f64 (*.f64 (log.f64 (sin.f64 kx)) #s(literal 2 binary64))) (pow.f64 #s(approx (sin ky) ky) #s(literal 2 binary64))))) (sin.f64 th))
(/.f64 (*.f64 #s(literal 1 binary64) (sin.f64 th)) (*.f64 (/.f64 #s(literal 1 binary64) (sin.f64 ky)) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) (fabs.f64 (sin.f64 kx)))))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 ky)))))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #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) th) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))
(*.f64 (sin.f64 ky) (/.f64 #s(approx (sin th) th) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 ky ky (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))) (sin.f64 th))
(*.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 ky) #s(literal -1 binary64))) (/.f64 (sin.f64 th) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) (fabs.f64 (sin.f64 kx)))))
(/.f64 #s(approx (sin th) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) th)) (*.f64 (/.f64 #s(literal 1 binary64) (sin.f64 ky)) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (exp.f64 (*.f64 (log.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal 1/2 binary64))))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (exp.f64 (*.f64 (neg.f64 (log.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))) #s(literal 1/2 binary64))))) (sin.f64 th))
(*.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 ky) #s(literal -1 binary64))) #s(approx (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1)))))) (/.f64 th (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (exp.f64 (*.f64 (log.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 (fma.f64 #s(literal -2 binary64) ky (/.f64 (PI.f64) #s(literal 2 binary64))))))) #s(literal 1/2 binary64))))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (exp.f64 (*.f64 (log.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 (fma.f64 #s(literal 2 binary64) ky (/.f64 (PI.f64) #s(literal 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)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(approx (sin th) th))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (exp.f64 (*.f64 (neg.f64 (log.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal -2 binary64) ky (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 1/2 binary64)))))) #s(literal 1/2 binary64))))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (*.f64 (sqrt.f64 (sin.f64 ky)) (sqrt.f64 (sin.f64 ky))))) (sin.f64 th))
(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (exp.f64 (*.f64 (neg.f64 (log.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))))) #s(literal 1/2 binary64))))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (exp.f64 (*.f64 (neg.f64 (log.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (sin.f64 ky)) #s(literal 2 binary64)))) #s(literal 1/2 binary64))))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (*.f64 (sqrt.f64 (neg.f64 (sin.f64 ky))) (sqrt.f64 (neg.f64 (sin.f64 ky)))))) (sin.f64 th))
Outputs
(*.f64 (sin.f64 ky) (/.f64 #s(approx (sin th) th) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))
(*.f64 #s(approx (sin ky) ky) (/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) #s(approx (sin ky) ky))))
Calls

9 calls:

74.0ms
(sin.f64 ky)
62.0ms
kx
46.0ms
(sin.f64 kx)
25.0ms
(*.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))
25.0ms
ky
Results
AccuracySegmentsBranch
83.9%3(sin.f64 th)
88.8%6(/.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.9%6(*.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.1%4(sin.f64 kx)
75.0%4(pow.f64 (sin.f64 kx) #s(literal 2 binary64))
80.6%3(sin.f64 ky)
72.6%3kx
80.6%2ky
84.0%2th
Compiler

Compiled 40 to 51 computations (-27.5% saved)

regimes48.0ms (0.7%)

Memory
-8.3MiB live, 86.8MiB allocated; 31ms collecting garbage
Counts
61 → 6
Calls
Call 1
Inputs
(*.f64 (/.f64 #s(approx (exp (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2)) ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(approx (/ 1 (pow (sin ky) -1)) #s(approx (exp (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2)) ky)))) #s(approx (sin th) th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 #s(approx (sin th) th) (/.f64 ky (fabs.f64 #s(approx (sin kx) kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (fabs.f64 #s(approx (sin kx) kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (sqrt.f64 (*.f64 #s(approx (sin kx) kx) #s(approx (sin kx) kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(approx (* (sin th) ky) (*.f64 (fma.f64 (*.f64 (*.f64 th th) ky) #s(literal -1/6 binary64) ky) th)) (fabs.f64 #s(approx (sin kx) kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (fabs.f64 #s(approx (sin kx) (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 kx kx) #s(literal 1 binary64)) kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (fabs.f64 #s(approx (sin kx) (*.f64 (fma.f64 (-.f64 (*.f64 (*.f64 kx kx) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(approx (* (sin th) ky) (*.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 th th) ky) #s(literal 1/120 binary64) (*.f64 #s(literal -1/6 binary64) ky)) (*.f64 th th) ky) th)) (fabs.f64 #s(approx (sin kx) kx))))
(/.f64 (*.f64 #s(approx (exp (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2)) ky) #s(approx (sin th) (*.f64 (fma.f64 (*.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) th) th) #s(literal 1/6 binary64)) th) th #s(literal 1 binary64)) th))) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) #s(approx (exp (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2)) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (fabs.f64 #s(approx (sin kx) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (*.f64 kx kx)) #s(literal 1/6 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) 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 #s(approx (sin kx) kx))))
(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (fabs.f64 (sin.f64 kx)))) #s(approx (sin th) th))
(*.f64 (/.f64 #s(approx (sin ky) ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 #s(approx (sin ky) ky)))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(approx (* (sin th) ky) (*.f64 (fma.f64 (fma.f64 (*.f64 th th) (fma.f64 (*.f64 (*.f64 th th) ky) #s(literal -1/5040 binary64) (*.f64 #s(literal 1/120 binary64) ky)) (*.f64 #s(literal -1/6 binary64) ky)) (*.f64 th th) ky) th)) (fabs.f64 #s(approx (sin kx) kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (/.f64 #s(literal 1 binary64) (/.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 #s(approx (sin th) th) ky) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) 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 #s(approx (sin kx) (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 kx kx) #s(literal 1 binary64)) kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 #s(approx (sin kx) (*.f64 (fma.f64 (-.f64 (*.f64 #s(literal 1/120 binary64) (*.f64 kx kx)) #s(literal 1/6 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) kx)))))
(*.f64 (/.f64 #s(approx (sin ky) (*.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky)) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 #s(approx (sin ky) (*.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 #s(approx (sin kx) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 kx kx) #s(literal 1/120 binary64)) (*.f64 kx kx)) #s(literal 1/6 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) kx)))))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(approx (/ 1 (pow (sin ky) -1)) (sin.f64 ky)))) #s(approx (sin th) th))
(/.f64 (*.f64 (sin.f64 ky) #s(approx (sin th) th)) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) (sin.f64 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))))
(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (fabs.f64 (sin.f64 kx)))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 ky (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx)))))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 (sin.f64 ky)))) #s(approx (sin th) th))
(/.f64 (*.f64 #s(literal 1 binary64) (sin.f64 th)) #s(approx (* (/ 1 (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 (fabs.f64 (sin.f64 kx)) ky)))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (+ (* ky ky) (- 1/2 (* 1/2 (cos (* 2 kx))))) (*.f64 ky ky))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))))))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 ky ky #s(approx (- 1/2 (* 1/2 (cos (* 2 kx)))) (*.f64 kx kx)))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))
(/.f64 (*.f64 (sin.f64 ky) #s(approx (sin th) (*.f64 #s(approx (+ (* (* (- (* (* (+ (* (* th th) -1/5040) 1/120) th) th) 1/6) th) th) 1) (fma.f64 (*.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64))) th))) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) (sin.f64 ky)))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 (sin.f64 ky)))) #s(approx (sin th) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) th)))
(*.f64 #s(approx (sin ky) ky) (/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) #s(approx (sin ky) ky))))
(*.f64 #s(approx (/ 1 (pow (sin ky) -1)) ky) (/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) #s(approx (/ 1 (pow (sin ky) -1)) ky))))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 ky ky (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))) #s(approx (sin th) th))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (exp.f64 #s(approx (* (log (- 1/2 (* 1/2 (cos (+ ky ky))))) 1/2) (log.f64 ky))))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (exp.f64 #s(approx (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2) (log.f64 ky))))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 (sin.f64 ky)))) #s(approx (sin th) (*.f64 (fma.f64 (-.f64 (*.f64 (*.f64 th th) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (*.f64 th th) #s(literal 1 binary64)) th)))
(*.f64 (/.f64 #s(approx (sin ky) (*.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky)) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 ky ky (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))) (sin.f64 th))
(/.f64 (*.f64 (sin.f64 ky) #s(approx (sin th) (*.f64 (fma.f64 (*.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) th) th) #s(literal 1/6 binary64)) th) th #s(literal 1 binary64)) th))) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) (sin.f64 ky)))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 (sin.f64 ky)))) #s(approx (sin th) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (*.f64 th th)) #s(literal 1/6 binary64)) (*.f64 th th) #s(literal 1 binary64)) th)))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) (sin.f64 ky))) (sin.f64 th))
(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) (sin.f64 ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (fabs.f64 (sin.f64 ky))))
(*.f64 (sin.f64 ky) #s(approx (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 ky)))))
(*.f64 (sin.f64 ky) (/.f64 (sin.f64 th) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (fabs.f64 (sin.f64 kx)))))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 (sin.f64 kx)))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 (sin.f64 ky)))) (sin.f64 th))
(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (fabs.f64 (sin.f64 ky))))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (exp.f64 (*.f64 (neg.f64 (log.f64 #s(approx (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))) (/.f64 (fma.f64 (*.f64 ky ky) #s(literal 1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky))))) #s(literal 1/2 binary64))))) (sin.f64 th))
(*.f64 (/.f64 #s(approx (sin ky) ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 #s(approx (sin ky) ky) #s(literal 2 binary64))))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (exp.f64 (*.f64 (log.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal 1/2 binary64))))) #s(approx (sin th) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) th)))
(*.f64 (/.f64 #s(approx (sin ky) ky) (sqrt.f64 (+.f64 (exp.f64 (*.f64 (log.f64 (sin.f64 kx)) #s(literal 2 binary64))) (pow.f64 #s(approx (sin ky) ky) #s(literal 2 binary64))))) (sin.f64 th))
(/.f64 (*.f64 #s(literal 1 binary64) (sin.f64 th)) (*.f64 (/.f64 #s(literal 1 binary64) (sin.f64 ky)) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) (fabs.f64 (sin.f64 kx)))))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 ky)))))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #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) th) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))
Outputs
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 (sin.f64 ky)))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 ky) th) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))
(*.f64 (sin.f64 ky) (/.f64 (sin.f64 th) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin 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 ky) th) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))
(*.f64 (/.f64 #s(approx (sin ky) ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 #s(approx (sin ky) ky)))) (sin.f64 th))
(*.f64 #s(approx (sin ky) ky) (/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) #s(approx (sin ky) ky))))
Calls

2 calls:

26.0ms
th
19.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)))))
Results
AccuracySegmentsBranch
88.8%6(/.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)))))
80.5%2th
Compiler

Compiled 13 to 14 computations (-7.7% saved)

regimes56.0ms (0.8%)

Memory
-14.7MiB live, 131.8MiB allocated; 15ms collecting garbage
Counts
60 → 2
Calls
Call 1
Inputs
(*.f64 (/.f64 #s(approx (exp (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2)) ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(approx (/ 1 (pow (sin ky) -1)) #s(approx (exp (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2)) ky)))) #s(approx (sin th) th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 #s(approx (sin th) th) (/.f64 ky (fabs.f64 #s(approx (sin kx) kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (fabs.f64 #s(approx (sin kx) kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (sqrt.f64 (*.f64 #s(approx (sin kx) kx) #s(approx (sin kx) kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(approx (* (sin th) ky) (*.f64 (fma.f64 (*.f64 (*.f64 th th) ky) #s(literal -1/6 binary64) ky) th)) (fabs.f64 #s(approx (sin kx) kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (fabs.f64 #s(approx (sin kx) (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 kx kx) #s(literal 1 binary64)) kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (fabs.f64 #s(approx (sin kx) (*.f64 (fma.f64 (-.f64 (*.f64 (*.f64 kx kx) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(approx (* (sin th) ky) (*.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 th th) ky) #s(literal 1/120 binary64) (*.f64 #s(literal -1/6 binary64) ky)) (*.f64 th th) ky) th)) (fabs.f64 #s(approx (sin kx) kx))))
(/.f64 (*.f64 #s(approx (exp (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2)) ky) #s(approx (sin th) (*.f64 (fma.f64 (*.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) th) th) #s(literal 1/6 binary64)) th) th #s(literal 1 binary64)) th))) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) #s(approx (exp (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2)) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (fabs.f64 #s(approx (sin kx) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (*.f64 kx kx)) #s(literal 1/6 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) 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 #s(approx (sin kx) kx))))
(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (fabs.f64 (sin.f64 kx)))) #s(approx (sin th) th))
(*.f64 (/.f64 #s(approx (sin ky) ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 #s(approx (sin ky) ky)))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(approx (* (sin th) ky) (*.f64 (fma.f64 (fma.f64 (*.f64 th th) (fma.f64 (*.f64 (*.f64 th th) ky) #s(literal -1/5040 binary64) (*.f64 #s(literal 1/120 binary64) ky)) (*.f64 #s(literal -1/6 binary64) ky)) (*.f64 th th) ky) th)) (fabs.f64 #s(approx (sin kx) kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (/.f64 #s(literal 1 binary64) (/.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 #s(approx (sin th) th) ky) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) 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 #s(approx (sin kx) (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 kx kx) #s(literal 1 binary64)) kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 #s(approx (sin kx) (*.f64 (fma.f64 (-.f64 (*.f64 #s(literal 1/120 binary64) (*.f64 kx kx)) #s(literal 1/6 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) kx)))))
(*.f64 (/.f64 #s(approx (sin ky) (*.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky)) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 #s(approx (sin ky) (*.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 #s(approx (sin kx) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 kx kx) #s(literal 1/120 binary64)) (*.f64 kx kx)) #s(literal 1/6 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) kx)))))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(approx (/ 1 (pow (sin ky) -1)) (sin.f64 ky)))) #s(approx (sin th) th))
(/.f64 (*.f64 (sin.f64 ky) #s(approx (sin th) th)) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) (sin.f64 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))))
(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (fabs.f64 (sin.f64 kx)))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 ky (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx)))))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 (sin.f64 ky)))) #s(approx (sin th) th))
(/.f64 (*.f64 #s(literal 1 binary64) (sin.f64 th)) #s(approx (* (/ 1 (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 (fabs.f64 (sin.f64 kx)) ky)))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (+ (* ky ky) (- 1/2 (* 1/2 (cos (* 2 kx))))) (*.f64 ky ky))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))))))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 ky ky #s(approx (- 1/2 (* 1/2 (cos (* 2 kx)))) (*.f64 kx kx)))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))
(/.f64 (*.f64 (sin.f64 ky) #s(approx (sin th) (*.f64 #s(approx (+ (* (* (- (* (* (+ (* (* th th) -1/5040) 1/120) th) th) 1/6) th) th) 1) (fma.f64 (*.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64))) th))) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) (sin.f64 ky)))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 (sin.f64 ky)))) #s(approx (sin th) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) th)))
(*.f64 #s(approx (sin ky) ky) (/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) #s(approx (sin ky) ky))))
(*.f64 #s(approx (/ 1 (pow (sin ky) -1)) ky) (/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) #s(approx (/ 1 (pow (sin ky) -1)) ky))))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 ky ky (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))) #s(approx (sin th) th))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (exp.f64 #s(approx (* (log (- 1/2 (* 1/2 (cos (+ ky ky))))) 1/2) (log.f64 ky))))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (exp.f64 #s(approx (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2) (log.f64 ky))))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 (sin.f64 ky)))) #s(approx (sin th) (*.f64 (fma.f64 (-.f64 (*.f64 (*.f64 th th) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (*.f64 th th) #s(literal 1 binary64)) th)))
(*.f64 (/.f64 #s(approx (sin ky) (*.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky)) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 ky ky (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))) (sin.f64 th))
(/.f64 (*.f64 (sin.f64 ky) #s(approx (sin th) (*.f64 (fma.f64 (*.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) th) th) #s(literal 1/6 binary64)) th) th #s(literal 1 binary64)) th))) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) (sin.f64 ky)))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 (sin.f64 ky)))) #s(approx (sin th) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (*.f64 th th)) #s(literal 1/6 binary64)) (*.f64 th th) #s(literal 1 binary64)) th)))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) (sin.f64 ky))) (sin.f64 th))
(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) (sin.f64 ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (fabs.f64 (sin.f64 ky))))
(*.f64 (sin.f64 ky) #s(approx (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 ky)))))
(*.f64 (sin.f64 ky) (/.f64 (sin.f64 th) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (fabs.f64 (sin.f64 kx)))))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 (sin.f64 kx)))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 (sin.f64 ky)))) (sin.f64 th))
(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (fabs.f64 (sin.f64 ky))))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (exp.f64 (*.f64 (neg.f64 (log.f64 #s(approx (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))) (/.f64 (fma.f64 (*.f64 ky ky) #s(literal 1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky))))) #s(literal 1/2 binary64))))) (sin.f64 th))
(*.f64 (/.f64 #s(approx (sin ky) ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 #s(approx (sin ky) ky) #s(literal 2 binary64))))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (exp.f64 (*.f64 (log.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) #s(literal 1/2 binary64))))) #s(approx (sin th) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) th)))
(*.f64 (/.f64 #s(approx (sin ky) ky) (sqrt.f64 (+.f64 (exp.f64 (*.f64 (log.f64 (sin.f64 kx)) #s(literal 2 binary64))) (pow.f64 #s(approx (sin ky) ky) #s(literal 2 binary64))))) (sin.f64 th))
(/.f64 (*.f64 #s(literal 1 binary64) (sin.f64 th)) (*.f64 (/.f64 #s(literal 1 binary64) (sin.f64 ky)) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) (fabs.f64 (sin.f64 kx)))))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 ky)))))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (sin.f64 th))
Outputs
(*.f64 #s(approx (sin ky) ky) (/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) #s(approx (sin ky) ky))))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 (sin.f64 ky)))) (sin.f64 th))
Calls

3 calls:

19.0ms
ky
17.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)))))
17.0ms
(sin.f64 th)
Results
AccuracySegmentsBranch
80.6%2ky
64.2%1(sin.f64 th)
81.2%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)))))
Compiler

Compiled 15 to 18 computations (-20% saved)

regimes17.0ms (0.2%)

Memory
-6.9MiB live, 39.6MiB allocated; 2ms collecting garbage
Counts
50 → 2
Calls
Call 1
Inputs
(*.f64 (/.f64 #s(approx (exp (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2)) ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(approx (/ 1 (pow (sin ky) -1)) #s(approx (exp (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2)) ky)))) #s(approx (sin th) th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 #s(approx (sin th) th) (/.f64 ky (fabs.f64 #s(approx (sin kx) kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (fabs.f64 #s(approx (sin kx) kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (sqrt.f64 (*.f64 #s(approx (sin kx) kx) #s(approx (sin kx) kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(approx (* (sin th) ky) (*.f64 (fma.f64 (*.f64 (*.f64 th th) ky) #s(literal -1/6 binary64) ky) th)) (fabs.f64 #s(approx (sin kx) kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (fabs.f64 #s(approx (sin kx) (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 kx kx) #s(literal 1 binary64)) kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (fabs.f64 #s(approx (sin kx) (*.f64 (fma.f64 (-.f64 (*.f64 (*.f64 kx kx) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(approx (* (sin th) ky) (*.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 th th) ky) #s(literal 1/120 binary64) (*.f64 #s(literal -1/6 binary64) ky)) (*.f64 th th) ky) th)) (fabs.f64 #s(approx (sin kx) kx))))
(/.f64 (*.f64 #s(approx (exp (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2)) ky) #s(approx (sin th) (*.f64 (fma.f64 (*.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) th) th) #s(literal 1/6 binary64)) th) th #s(literal 1 binary64)) th))) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) #s(approx (exp (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2)) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (fabs.f64 #s(approx (sin kx) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (*.f64 kx kx)) #s(literal 1/6 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) 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 #s(approx (sin kx) kx))))
(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (fabs.f64 (sin.f64 kx)))) #s(approx (sin th) th))
(*.f64 (/.f64 #s(approx (sin ky) ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 #s(approx (sin ky) ky)))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(approx (* (sin th) ky) (*.f64 (fma.f64 (fma.f64 (*.f64 th th) (fma.f64 (*.f64 (*.f64 th th) ky) #s(literal -1/5040 binary64) (*.f64 #s(literal 1/120 binary64) ky)) (*.f64 #s(literal -1/6 binary64) ky)) (*.f64 th th) ky) th)) (fabs.f64 #s(approx (sin kx) kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (/.f64 #s(literal 1 binary64) (/.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 #s(approx (sin th) th) ky) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) 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 #s(approx (sin kx) (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 kx kx) #s(literal 1 binary64)) kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 #s(approx (sin kx) (*.f64 (fma.f64 (-.f64 (*.f64 #s(literal 1/120 binary64) (*.f64 kx kx)) #s(literal 1/6 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) kx)))))
(*.f64 (/.f64 #s(approx (sin ky) (*.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky)) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 #s(approx (sin ky) (*.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 #s(approx (sin kx) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 kx kx) #s(literal 1/120 binary64)) (*.f64 kx kx)) #s(literal 1/6 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) kx)))))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(approx (/ 1 (pow (sin ky) -1)) (sin.f64 ky)))) #s(approx (sin th) th))
(/.f64 (*.f64 (sin.f64 ky) #s(approx (sin th) th)) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) (sin.f64 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))))
(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (fabs.f64 (sin.f64 kx)))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 ky (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx)))))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 (sin.f64 ky)))) #s(approx (sin th) th))
(/.f64 (*.f64 #s(literal 1 binary64) (sin.f64 th)) #s(approx (* (/ 1 (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 (fabs.f64 (sin.f64 kx)) ky)))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (+ (* ky ky) (- 1/2 (* 1/2 (cos (* 2 kx))))) (*.f64 ky ky))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))))))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 ky ky #s(approx (- 1/2 (* 1/2 (cos (* 2 kx)))) (*.f64 kx kx)))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))
(/.f64 (*.f64 (sin.f64 ky) #s(approx (sin th) (*.f64 #s(approx (+ (* (* (- (* (* (+ (* (* th th) -1/5040) 1/120) th) th) 1/6) th) th) 1) (fma.f64 (*.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64))) th))) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) (sin.f64 ky)))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 (sin.f64 ky)))) #s(approx (sin th) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) th)))
(*.f64 #s(approx (sin ky) ky) (/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) #s(approx (sin ky) ky))))
(*.f64 #s(approx (/ 1 (pow (sin ky) -1)) ky) (/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) #s(approx (/ 1 (pow (sin ky) -1)) ky))))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 ky ky (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))) #s(approx (sin th) th))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (exp.f64 #s(approx (* (log (- 1/2 (* 1/2 (cos (+ ky ky))))) 1/2) (log.f64 ky))))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (exp.f64 #s(approx (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2) (log.f64 ky))))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 (sin.f64 ky)))) #s(approx (sin th) (*.f64 (fma.f64 (-.f64 (*.f64 (*.f64 th th) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (*.f64 th th) #s(literal 1 binary64)) th)))
(*.f64 (/.f64 #s(approx (sin ky) (*.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky)) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 ky ky (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))) (sin.f64 th))
(/.f64 (*.f64 (sin.f64 ky) #s(approx (sin th) (*.f64 (fma.f64 (*.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) th) th) #s(literal 1/6 binary64)) th) th #s(literal 1 binary64)) th))) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) (sin.f64 ky)))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 (sin.f64 ky)))) #s(approx (sin th) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (*.f64 th th)) #s(literal 1/6 binary64)) (*.f64 th th) #s(literal 1 binary64)) th)))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) (sin.f64 ky))) (sin.f64 th))
(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) (sin.f64 ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (fabs.f64 (sin.f64 ky))))
(*.f64 (sin.f64 ky) #s(approx (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 ky)))))
(*.f64 (sin.f64 ky) (/.f64 (sin.f64 th) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (fabs.f64 (sin.f64 kx)))))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 (sin.f64 kx)))) (sin.f64 th))
Outputs
(*.f64 #s(approx (sin ky) ky) (/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) #s(approx (sin ky) ky))))
(*.f64 (sin.f64 ky) #s(approx (/ (sin th) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 ky)))))
Calls

1 calls:

14.0ms
ky
Results
AccuracySegmentsBranch
80.6%2ky
Compiler

Compiled 1 to 3 computations (-200% saved)

regimes15.0ms (0.2%)

Memory
39.6MiB live, 39.6MiB allocated; 0ms collecting garbage
Counts
47 → 2
Calls
Call 1
Inputs
(*.f64 (/.f64 #s(approx (exp (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2)) ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(approx (/ 1 (pow (sin ky) -1)) #s(approx (exp (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2)) ky)))) #s(approx (sin th) th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 #s(approx (sin th) th) (/.f64 ky (fabs.f64 #s(approx (sin kx) kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (fabs.f64 #s(approx (sin kx) kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (sqrt.f64 (*.f64 #s(approx (sin kx) kx) #s(approx (sin kx) kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(approx (* (sin th) ky) (*.f64 (fma.f64 (*.f64 (*.f64 th th) ky) #s(literal -1/6 binary64) ky) th)) (fabs.f64 #s(approx (sin kx) kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (fabs.f64 #s(approx (sin kx) (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 kx kx) #s(literal 1 binary64)) kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (fabs.f64 #s(approx (sin kx) (*.f64 (fma.f64 (-.f64 (*.f64 (*.f64 kx kx) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(approx (* (sin th) ky) (*.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 th th) ky) #s(literal 1/120 binary64) (*.f64 #s(literal -1/6 binary64) ky)) (*.f64 th th) ky) th)) (fabs.f64 #s(approx (sin kx) kx))))
(/.f64 (*.f64 #s(approx (exp (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2)) ky) #s(approx (sin th) (*.f64 (fma.f64 (*.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) th) th) #s(literal 1/6 binary64)) th) th #s(literal 1 binary64)) th))) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) #s(approx (exp (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2)) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (fabs.f64 #s(approx (sin kx) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (*.f64 kx kx)) #s(literal 1/6 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) 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 #s(approx (sin kx) kx))))
(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (fabs.f64 (sin.f64 kx)))) #s(approx (sin th) th))
(*.f64 (/.f64 #s(approx (sin ky) ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 #s(approx (sin ky) ky)))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(approx (* (sin th) ky) (*.f64 (fma.f64 (fma.f64 (*.f64 th th) (fma.f64 (*.f64 (*.f64 th th) ky) #s(literal -1/5040 binary64) (*.f64 #s(literal 1/120 binary64) ky)) (*.f64 #s(literal -1/6 binary64) ky)) (*.f64 th th) ky) th)) (fabs.f64 #s(approx (sin kx) kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (/.f64 #s(literal 1 binary64) (/.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 #s(approx (sin th) th) ky) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) 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 #s(approx (sin kx) (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 kx kx) #s(literal 1 binary64)) kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 #s(approx (sin kx) (*.f64 (fma.f64 (-.f64 (*.f64 #s(literal 1/120 binary64) (*.f64 kx kx)) #s(literal 1/6 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) kx)))))
(*.f64 (/.f64 #s(approx (sin ky) (*.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky)) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 #s(approx (sin ky) (*.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 #s(approx (sin kx) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 kx kx) #s(literal 1/120 binary64)) (*.f64 kx kx)) #s(literal 1/6 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) kx)))))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(approx (/ 1 (pow (sin ky) -1)) (sin.f64 ky)))) #s(approx (sin th) th))
(/.f64 (*.f64 (sin.f64 ky) #s(approx (sin th) th)) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) (sin.f64 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))))
(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (fabs.f64 (sin.f64 kx)))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 ky (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx)))))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 (sin.f64 ky)))) #s(approx (sin th) th))
(/.f64 (*.f64 #s(literal 1 binary64) (sin.f64 th)) #s(approx (* (/ 1 (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 (fabs.f64 (sin.f64 kx)) ky)))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (+ (* ky ky) (- 1/2 (* 1/2 (cos (* 2 kx))))) (*.f64 ky ky))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))))))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 ky ky #s(approx (- 1/2 (* 1/2 (cos (* 2 kx)))) (*.f64 kx kx)))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))
(/.f64 (*.f64 (sin.f64 ky) #s(approx (sin th) (*.f64 #s(approx (+ (* (* (- (* (* (+ (* (* th th) -1/5040) 1/120) th) th) 1/6) th) th) 1) (fma.f64 (*.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64))) th))) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) (sin.f64 ky)))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 (sin.f64 ky)))) #s(approx (sin th) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) th)))
(*.f64 #s(approx (sin ky) ky) (/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) #s(approx (sin ky) ky))))
(*.f64 #s(approx (/ 1 (pow (sin ky) -1)) ky) (/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) #s(approx (/ 1 (pow (sin ky) -1)) ky))))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 ky ky (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))) #s(approx (sin th) th))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (exp.f64 #s(approx (* (log (- 1/2 (* 1/2 (cos (+ ky ky))))) 1/2) (log.f64 ky))))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (exp.f64 #s(approx (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2) (log.f64 ky))))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 (sin.f64 ky)))) #s(approx (sin th) (*.f64 (fma.f64 (-.f64 (*.f64 (*.f64 th th) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (*.f64 th th) #s(literal 1 binary64)) th)))
(*.f64 (/.f64 #s(approx (sin ky) (*.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky)) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 ky ky (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))) (sin.f64 th))
(/.f64 (*.f64 (sin.f64 ky) #s(approx (sin th) (*.f64 (fma.f64 (*.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) th) th) #s(literal 1/6 binary64)) th) th #s(literal 1 binary64)) th))) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) (sin.f64 ky)))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 (sin.f64 ky)))) #s(approx (sin th) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (*.f64 th th)) #s(literal 1/6 binary64)) (*.f64 th th) #s(literal 1 binary64)) th)))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) (sin.f64 ky))) (sin.f64 th))
(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) (sin.f64 ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (fabs.f64 (sin.f64 ky))))
Outputs
(*.f64 #s(approx (sin ky) ky) (/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) #s(approx (sin ky) ky))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (fabs.f64 (sin.f64 ky))))
Calls

1 calls:

12.0ms
ky
Results
AccuracySegmentsBranch
80.6%2ky
Compiler

Compiled 1 to 3 computations (-200% saved)

regimes53.0ms (0.8%)

Memory
-5.8MiB live, 138.7MiB allocated; 6ms collecting garbage
Counts
46 → 3
Calls
Call 1
Inputs
(*.f64 (/.f64 #s(approx (exp (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2)) ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(approx (/ 1 (pow (sin ky) -1)) #s(approx (exp (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2)) ky)))) #s(approx (sin th) th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 #s(approx (sin th) th) (/.f64 ky (fabs.f64 #s(approx (sin kx) kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (fabs.f64 #s(approx (sin kx) kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (sqrt.f64 (*.f64 #s(approx (sin kx) kx) #s(approx (sin kx) kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(approx (* (sin th) ky) (*.f64 (fma.f64 (*.f64 (*.f64 th th) ky) #s(literal -1/6 binary64) ky) th)) (fabs.f64 #s(approx (sin kx) kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (fabs.f64 #s(approx (sin kx) (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 kx kx) #s(literal 1 binary64)) kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (fabs.f64 #s(approx (sin kx) (*.f64 (fma.f64 (-.f64 (*.f64 (*.f64 kx kx) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(approx (* (sin th) ky) (*.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 th th) ky) #s(literal 1/120 binary64) (*.f64 #s(literal -1/6 binary64) ky)) (*.f64 th th) ky) th)) (fabs.f64 #s(approx (sin kx) kx))))
(/.f64 (*.f64 #s(approx (exp (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2)) ky) #s(approx (sin th) (*.f64 (fma.f64 (*.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) th) th) #s(literal 1/6 binary64)) th) th #s(literal 1 binary64)) th))) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) #s(approx (exp (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2)) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (fabs.f64 #s(approx (sin kx) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (*.f64 kx kx)) #s(literal 1/6 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) 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 #s(approx (sin kx) kx))))
(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (fabs.f64 (sin.f64 kx)))) #s(approx (sin th) th))
(*.f64 (/.f64 #s(approx (sin ky) ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 #s(approx (sin ky) ky)))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(approx (* (sin th) ky) (*.f64 (fma.f64 (fma.f64 (*.f64 th th) (fma.f64 (*.f64 (*.f64 th th) ky) #s(literal -1/5040 binary64) (*.f64 #s(literal 1/120 binary64) ky)) (*.f64 #s(literal -1/6 binary64) ky)) (*.f64 th th) ky) th)) (fabs.f64 #s(approx (sin kx) kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (/.f64 #s(literal 1 binary64) (/.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 #s(approx (sin th) th) ky) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) 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 #s(approx (sin kx) (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 kx kx) #s(literal 1 binary64)) kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 #s(approx (sin kx) (*.f64 (fma.f64 (-.f64 (*.f64 #s(literal 1/120 binary64) (*.f64 kx kx)) #s(literal 1/6 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) kx)))))
(*.f64 (/.f64 #s(approx (sin ky) (*.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky)) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 #s(approx (sin ky) (*.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 #s(approx (sin kx) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 kx kx) #s(literal 1/120 binary64)) (*.f64 kx kx)) #s(literal 1/6 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) kx)))))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(approx (/ 1 (pow (sin ky) -1)) (sin.f64 ky)))) #s(approx (sin th) th))
(/.f64 (*.f64 (sin.f64 ky) #s(approx (sin th) th)) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) (sin.f64 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))))
(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (fabs.f64 (sin.f64 kx)))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 ky (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx)))))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 (sin.f64 ky)))) #s(approx (sin th) th))
(/.f64 (*.f64 #s(literal 1 binary64) (sin.f64 th)) #s(approx (* (/ 1 (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 (fabs.f64 (sin.f64 kx)) ky)))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (+ (* ky ky) (- 1/2 (* 1/2 (cos (* 2 kx))))) (*.f64 ky ky))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))))))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 ky ky #s(approx (- 1/2 (* 1/2 (cos (* 2 kx)))) (*.f64 kx kx)))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))
(/.f64 (*.f64 (sin.f64 ky) #s(approx (sin th) (*.f64 #s(approx (+ (* (* (- (* (* (+ (* (* th th) -1/5040) 1/120) th) th) 1/6) th) th) 1) (fma.f64 (*.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64))) th))) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) (sin.f64 ky)))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 (sin.f64 ky)))) #s(approx (sin th) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) th)))
(*.f64 #s(approx (sin ky) ky) (/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) #s(approx (sin ky) ky))))
(*.f64 #s(approx (/ 1 (pow (sin ky) -1)) ky) (/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) #s(approx (/ 1 (pow (sin ky) -1)) ky))))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 ky ky (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))) #s(approx (sin th) th))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (exp.f64 #s(approx (* (log (- 1/2 (* 1/2 (cos (+ ky ky))))) 1/2) (log.f64 ky))))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (exp.f64 #s(approx (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2) (log.f64 ky))))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 (sin.f64 ky)))) #s(approx (sin th) (*.f64 (fma.f64 (-.f64 (*.f64 (*.f64 th th) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (*.f64 th th) #s(literal 1 binary64)) th)))
(*.f64 (/.f64 #s(approx (sin ky) (*.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky)) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 ky ky (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))) (sin.f64 th))
(/.f64 (*.f64 (sin.f64 ky) #s(approx (sin th) (*.f64 (fma.f64 (*.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) th) th) #s(literal 1/6 binary64)) th) th #s(literal 1 binary64)) th))) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) (sin.f64 ky)))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 (sin.f64 ky)))) #s(approx (sin th) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (*.f64 th th)) #s(literal 1/6 binary64)) (*.f64 th th) #s(literal 1 binary64)) th)))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) (sin.f64 ky))) (sin.f64 th))
(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) (sin.f64 ky)))
Outputs
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 (sin.f64 ky)))) #s(approx (sin th) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (*.f64 th th)) #s(literal 1/6 binary64)) (*.f64 th th) #s(literal 1 binary64)) th)))
(*.f64 #s(approx (sin ky) ky) (/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) #s(approx (sin ky) ky))))
(*.f64 (/.f64 #s(approx (sin ky) ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 #s(approx (sin ky) ky)))) (sin.f64 th))
Calls

4 calls:

14.0ms
(sin.f64 ky)
13.0ms
th
12.0ms
ky
11.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)))))
Results
AccuracySegmentsBranch
74.4%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)))))
74.4%3(sin.f64 ky)
64.2%1th
69.5%3ky
Compiler

Compiled 16 to 21 computations (-31.3% saved)

regimes15.0ms (0.2%)

Memory
-10.6MiB live, 36.0MiB allocated; 2ms collecting garbage
Counts
43 → 3
Calls
Call 1
Inputs
(*.f64 (/.f64 #s(approx (exp (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2)) ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(approx (/ 1 (pow (sin ky) -1)) #s(approx (exp (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2)) ky)))) #s(approx (sin th) th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 #s(approx (sin th) th) (/.f64 ky (fabs.f64 #s(approx (sin kx) kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (fabs.f64 #s(approx (sin kx) kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (sqrt.f64 (*.f64 #s(approx (sin kx) kx) #s(approx (sin kx) kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(approx (* (sin th) ky) (*.f64 (fma.f64 (*.f64 (*.f64 th th) ky) #s(literal -1/6 binary64) ky) th)) (fabs.f64 #s(approx (sin kx) kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (fabs.f64 #s(approx (sin kx) (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 kx kx) #s(literal 1 binary64)) kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (fabs.f64 #s(approx (sin kx) (*.f64 (fma.f64 (-.f64 (*.f64 (*.f64 kx kx) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(approx (* (sin th) ky) (*.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 th th) ky) #s(literal 1/120 binary64) (*.f64 #s(literal -1/6 binary64) ky)) (*.f64 th th) ky) th)) (fabs.f64 #s(approx (sin kx) kx))))
(/.f64 (*.f64 #s(approx (exp (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2)) ky) #s(approx (sin th) (*.f64 (fma.f64 (*.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) th) th) #s(literal 1/6 binary64)) th) th #s(literal 1 binary64)) th))) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) #s(approx (exp (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2)) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (fabs.f64 #s(approx (sin kx) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (*.f64 kx kx)) #s(literal 1/6 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) 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 #s(approx (sin kx) kx))))
(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (fabs.f64 (sin.f64 kx)))) #s(approx (sin th) th))
(*.f64 (/.f64 #s(approx (sin ky) ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 #s(approx (sin ky) ky)))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(approx (* (sin th) ky) (*.f64 (fma.f64 (fma.f64 (*.f64 th th) (fma.f64 (*.f64 (*.f64 th th) ky) #s(literal -1/5040 binary64) (*.f64 #s(literal 1/120 binary64) ky)) (*.f64 #s(literal -1/6 binary64) ky)) (*.f64 th th) ky) th)) (fabs.f64 #s(approx (sin kx) kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (/.f64 #s(literal 1 binary64) (/.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 #s(approx (sin th) th) ky) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) 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 #s(approx (sin kx) (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 kx kx) #s(literal 1 binary64)) kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 #s(approx (sin kx) (*.f64 (fma.f64 (-.f64 (*.f64 #s(literal 1/120 binary64) (*.f64 kx kx)) #s(literal 1/6 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) kx)))))
(*.f64 (/.f64 #s(approx (sin ky) (*.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky)) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 #s(approx (sin ky) (*.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 #s(approx (sin kx) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 kx kx) #s(literal 1/120 binary64)) (*.f64 kx kx)) #s(literal 1/6 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) kx)))))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(approx (/ 1 (pow (sin ky) -1)) (sin.f64 ky)))) #s(approx (sin th) th))
(/.f64 (*.f64 (sin.f64 ky) #s(approx (sin th) th)) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) (sin.f64 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))))
(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (fabs.f64 (sin.f64 kx)))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 ky (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx)))))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 (sin.f64 ky)))) #s(approx (sin th) th))
(/.f64 (*.f64 #s(literal 1 binary64) (sin.f64 th)) #s(approx (* (/ 1 (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 (fabs.f64 (sin.f64 kx)) ky)))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (+ (* ky ky) (- 1/2 (* 1/2 (cos (* 2 kx))))) (*.f64 ky ky))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))))))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 ky ky #s(approx (- 1/2 (* 1/2 (cos (* 2 kx)))) (*.f64 kx kx)))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))
(/.f64 (*.f64 (sin.f64 ky) #s(approx (sin th) (*.f64 #s(approx (+ (* (* (- (* (* (+ (* (* th th) -1/5040) 1/120) th) th) 1/6) th) th) 1) (fma.f64 (*.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64))) th))) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) (sin.f64 ky)))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 (sin.f64 ky)))) #s(approx (sin th) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) th)))
(*.f64 #s(approx (sin ky) ky) (/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) #s(approx (sin ky) ky))))
(*.f64 #s(approx (/ 1 (pow (sin ky) -1)) ky) (/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) #s(approx (/ 1 (pow (sin ky) -1)) ky))))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 ky ky (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))) #s(approx (sin th) th))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (exp.f64 #s(approx (* (log (- 1/2 (* 1/2 (cos (+ ky ky))))) 1/2) (log.f64 ky))))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (exp.f64 #s(approx (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2) (log.f64 ky))))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 (sin.f64 ky)))) #s(approx (sin th) (*.f64 (fma.f64 (-.f64 (*.f64 (*.f64 th th) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (*.f64 th th) #s(literal 1 binary64)) th)))
(*.f64 (/.f64 #s(approx (sin ky) (*.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky)) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 ky ky (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))) (sin.f64 th))
(/.f64 (*.f64 (sin.f64 ky) #s(approx (sin th) (*.f64 (fma.f64 (*.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) th) th) #s(literal 1/6 binary64)) th) th #s(literal 1 binary64)) th))) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) (sin.f64 ky)))
Outputs
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 (sin.f64 ky)))) #s(approx (sin th) (*.f64 (fma.f64 (-.f64 (*.f64 (*.f64 th th) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (*.f64 th th) #s(literal 1 binary64)) th)))
(*.f64 #s(approx (sin ky) ky) (/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) #s(approx (sin ky) ky))))
(*.f64 (/.f64 #s(approx (sin ky) ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 #s(approx (sin ky) ky)))) (sin.f64 th))
Calls

1 calls:

12.0ms
(sin.f64 ky)
Results
AccuracySegmentsBranch
74.2%3(sin.f64 ky)
Compiler

Compiled 2 to 4 computations (-100% saved)

regimes15.0ms (0.2%)

Memory
-7.5MiB live, 35.9MiB allocated; 3ms collecting garbage
Counts
40 → 3
Calls
Call 1
Inputs
(*.f64 (/.f64 #s(approx (exp (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2)) ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(approx (/ 1 (pow (sin ky) -1)) #s(approx (exp (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2)) ky)))) #s(approx (sin th) th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 #s(approx (sin th) th) (/.f64 ky (fabs.f64 #s(approx (sin kx) kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (fabs.f64 #s(approx (sin kx) kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (sqrt.f64 (*.f64 #s(approx (sin kx) kx) #s(approx (sin kx) kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(approx (* (sin th) ky) (*.f64 (fma.f64 (*.f64 (*.f64 th th) ky) #s(literal -1/6 binary64) ky) th)) (fabs.f64 #s(approx (sin kx) kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (fabs.f64 #s(approx (sin kx) (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 kx kx) #s(literal 1 binary64)) kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (fabs.f64 #s(approx (sin kx) (*.f64 (fma.f64 (-.f64 (*.f64 (*.f64 kx kx) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(approx (* (sin th) ky) (*.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 th th) ky) #s(literal 1/120 binary64) (*.f64 #s(literal -1/6 binary64) ky)) (*.f64 th th) ky) th)) (fabs.f64 #s(approx (sin kx) kx))))
(/.f64 (*.f64 #s(approx (exp (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2)) ky) #s(approx (sin th) (*.f64 (fma.f64 (*.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) th) th) #s(literal 1/6 binary64)) th) th #s(literal 1 binary64)) th))) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) #s(approx (exp (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2)) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (fabs.f64 #s(approx (sin kx) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (*.f64 kx kx)) #s(literal 1/6 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) 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 #s(approx (sin kx) kx))))
(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (fabs.f64 (sin.f64 kx)))) #s(approx (sin th) th))
(*.f64 (/.f64 #s(approx (sin ky) ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 #s(approx (sin ky) ky)))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(approx (* (sin th) ky) (*.f64 (fma.f64 (fma.f64 (*.f64 th th) (fma.f64 (*.f64 (*.f64 th th) ky) #s(literal -1/5040 binary64) (*.f64 #s(literal 1/120 binary64) ky)) (*.f64 #s(literal -1/6 binary64) ky)) (*.f64 th th) ky) th)) (fabs.f64 #s(approx (sin kx) kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (/.f64 #s(literal 1 binary64) (/.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 #s(approx (sin th) th) ky) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) 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 #s(approx (sin kx) (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 kx kx) #s(literal 1 binary64)) kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 #s(approx (sin kx) (*.f64 (fma.f64 (-.f64 (*.f64 #s(literal 1/120 binary64) (*.f64 kx kx)) #s(literal 1/6 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) kx)))))
(*.f64 (/.f64 #s(approx (sin ky) (*.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky)) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 #s(approx (sin ky) (*.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 #s(approx (sin kx) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 kx kx) #s(literal 1/120 binary64)) (*.f64 kx kx)) #s(literal 1/6 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) kx)))))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(approx (/ 1 (pow (sin ky) -1)) (sin.f64 ky)))) #s(approx (sin th) th))
(/.f64 (*.f64 (sin.f64 ky) #s(approx (sin th) th)) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) (sin.f64 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))))
(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (fabs.f64 (sin.f64 kx)))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 ky (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx)))))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 (sin.f64 ky)))) #s(approx (sin th) th))
(/.f64 (*.f64 #s(literal 1 binary64) (sin.f64 th)) #s(approx (* (/ 1 (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 (fabs.f64 (sin.f64 kx)) ky)))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (+ (* ky ky) (- 1/2 (* 1/2 (cos (* 2 kx))))) (*.f64 ky ky))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))))))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 ky ky #s(approx (- 1/2 (* 1/2 (cos (* 2 kx)))) (*.f64 kx kx)))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))
(/.f64 (*.f64 (sin.f64 ky) #s(approx (sin th) (*.f64 #s(approx (+ (* (* (- (* (* (+ (* (* th th) -1/5040) 1/120) th) th) 1/6) th) th) 1) (fma.f64 (*.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64))) th))) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) (sin.f64 ky)))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 (sin.f64 ky)))) #s(approx (sin th) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) th)))
(*.f64 #s(approx (sin ky) ky) (/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) #s(approx (sin ky) ky))))
(*.f64 #s(approx (/ 1 (pow (sin ky) -1)) ky) (/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) #s(approx (/ 1 (pow (sin ky) -1)) ky))))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 ky ky (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))) #s(approx (sin th) th))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (exp.f64 #s(approx (* (log (- 1/2 (* 1/2 (cos (+ ky ky))))) 1/2) (log.f64 ky))))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (exp.f64 #s(approx (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2) (log.f64 ky))))) (sin.f64 th))
Outputs
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 (sin.f64 ky)))) #s(approx (sin th) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) th)))
(*.f64 #s(approx (sin ky) ky) (/.f64 (sin.f64 th) (hypot.f64 (sin.f64 kx) #s(approx (sin ky) ky))))
(*.f64 (/.f64 #s(approx (sin ky) ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 #s(approx (sin ky) ky)))) (sin.f64 th))
Calls

1 calls:

13.0ms
(sin.f64 ky)
Results
AccuracySegmentsBranch
74.2%3(sin.f64 ky)
Compiler

Compiled 2 to 4 computations (-100% saved)

regimes109.0ms (1.6%)

Memory
17.6MiB live, 210.2MiB allocated; 56ms collecting garbage
Counts
35 → 3
Calls
Call 1
Inputs
(*.f64 (/.f64 #s(approx (exp (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2)) ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(approx (/ 1 (pow (sin ky) -1)) #s(approx (exp (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2)) ky)))) #s(approx (sin th) th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 #s(approx (sin th) th) (/.f64 ky (fabs.f64 #s(approx (sin kx) kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (fabs.f64 #s(approx (sin kx) kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (sqrt.f64 (*.f64 #s(approx (sin kx) kx) #s(approx (sin kx) kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(approx (* (sin th) ky) (*.f64 (fma.f64 (*.f64 (*.f64 th th) ky) #s(literal -1/6 binary64) ky) th)) (fabs.f64 #s(approx (sin kx) kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (fabs.f64 #s(approx (sin kx) (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 kx kx) #s(literal 1 binary64)) kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (fabs.f64 #s(approx (sin kx) (*.f64 (fma.f64 (-.f64 (*.f64 (*.f64 kx kx) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(approx (* (sin th) ky) (*.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 th th) ky) #s(literal 1/120 binary64) (*.f64 #s(literal -1/6 binary64) ky)) (*.f64 th th) ky) th)) (fabs.f64 #s(approx (sin kx) kx))))
(/.f64 (*.f64 #s(approx (exp (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2)) ky) #s(approx (sin th) (*.f64 (fma.f64 (*.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) th) th) #s(literal 1/6 binary64)) th) th #s(literal 1 binary64)) th))) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) #s(approx (exp (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2)) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (fabs.f64 #s(approx (sin kx) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (*.f64 kx kx)) #s(literal 1/6 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) 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 #s(approx (sin kx) kx))))
(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (fabs.f64 (sin.f64 kx)))) #s(approx (sin th) th))
(*.f64 (/.f64 #s(approx (sin ky) ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 #s(approx (sin ky) ky)))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(approx (* (sin th) ky) (*.f64 (fma.f64 (fma.f64 (*.f64 th th) (fma.f64 (*.f64 (*.f64 th th) ky) #s(literal -1/5040 binary64) (*.f64 #s(literal 1/120 binary64) ky)) (*.f64 #s(literal -1/6 binary64) ky)) (*.f64 th th) ky) th)) (fabs.f64 #s(approx (sin kx) kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (/.f64 #s(literal 1 binary64) (/.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 #s(approx (sin th) th) ky) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) 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 #s(approx (sin kx) (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 kx kx) #s(literal 1 binary64)) kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 #s(approx (sin kx) (*.f64 (fma.f64 (-.f64 (*.f64 #s(literal 1/120 binary64) (*.f64 kx kx)) #s(literal 1/6 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) kx)))))
(*.f64 (/.f64 #s(approx (sin ky) (*.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky)) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 #s(approx (sin ky) (*.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 #s(approx (sin kx) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 kx kx) #s(literal 1/120 binary64)) (*.f64 kx kx)) #s(literal 1/6 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) kx)))))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(approx (/ 1 (pow (sin ky) -1)) (sin.f64 ky)))) #s(approx (sin th) th))
(/.f64 (*.f64 (sin.f64 ky) #s(approx (sin th) th)) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) (sin.f64 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))))
(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (fabs.f64 (sin.f64 kx)))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 ky (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx)))))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 (sin.f64 ky)))) #s(approx (sin th) th))
(/.f64 (*.f64 #s(literal 1 binary64) (sin.f64 th)) #s(approx (* (/ 1 (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 (fabs.f64 (sin.f64 kx)) ky)))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (+ (* ky ky) (- 1/2 (* 1/2 (cos (* 2 kx))))) (*.f64 ky ky))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))))))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 ky ky #s(approx (- 1/2 (* 1/2 (cos (* 2 kx)))) (*.f64 kx kx)))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))
(/.f64 (*.f64 (sin.f64 ky) #s(approx (sin th) (*.f64 #s(approx (+ (* (* (- (* (* (+ (* (* th th) -1/5040) 1/120) th) th) 1/6) th) th) 1) (fma.f64 (*.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64))) th))) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) (sin.f64 ky)))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 (sin.f64 ky)))) #s(approx (sin th) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) th)))
Outputs
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 (sin.f64 ky)))) #s(approx (sin th) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 ky (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx)))))
(*.f64 (/.f64 #s(approx (sin ky) ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 #s(approx (sin ky) ky)))) (sin.f64 th))
Calls

6 calls:

43.0ms
(*.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))
21.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)))))
12.0ms
(sin.f64 kx)
12.0ms
(pow.f64 (sin.f64 kx) #s(literal 2 binary64))
10.0ms
(sin.f64 ky)
Results
AccuracySegmentsBranch
57.2%4(sin.f64 kx)
57.2%3kx
71.7%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)))))
54.0%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))
57.2%3(pow.f64 (sin.f64 kx) #s(literal 2 binary64))
64.6%3(sin.f64 ky)
Compiler

Compiled 36 to 41 computations (-13.9% saved)

regimes13.0ms (0.2%)

Memory
-4.3MiB live, 40.6MiB allocated; 3ms collecting garbage
Counts
34 → 3
Calls
Call 1
Inputs
(*.f64 (/.f64 #s(approx (exp (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2)) ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(approx (/ 1 (pow (sin ky) -1)) #s(approx (exp (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2)) ky)))) #s(approx (sin th) th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 #s(approx (sin th) th) (/.f64 ky (fabs.f64 #s(approx (sin kx) kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (fabs.f64 #s(approx (sin kx) kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (sqrt.f64 (*.f64 #s(approx (sin kx) kx) #s(approx (sin kx) kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(approx (* (sin th) ky) (*.f64 (fma.f64 (*.f64 (*.f64 th th) ky) #s(literal -1/6 binary64) ky) th)) (fabs.f64 #s(approx (sin kx) kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (fabs.f64 #s(approx (sin kx) (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 kx kx) #s(literal 1 binary64)) kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (fabs.f64 #s(approx (sin kx) (*.f64 (fma.f64 (-.f64 (*.f64 (*.f64 kx kx) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(approx (* (sin th) ky) (*.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 th th) ky) #s(literal 1/120 binary64) (*.f64 #s(literal -1/6 binary64) ky)) (*.f64 th th) ky) th)) (fabs.f64 #s(approx (sin kx) kx))))
(/.f64 (*.f64 #s(approx (exp (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2)) ky) #s(approx (sin th) (*.f64 (fma.f64 (*.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) th) th) #s(literal 1/6 binary64)) th) th #s(literal 1 binary64)) th))) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) #s(approx (exp (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2)) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (fabs.f64 #s(approx (sin kx) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (*.f64 kx kx)) #s(literal 1/6 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) 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 #s(approx (sin kx) kx))))
(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (fabs.f64 (sin.f64 kx)))) #s(approx (sin th) th))
(*.f64 (/.f64 #s(approx (sin ky) ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 #s(approx (sin ky) ky)))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(approx (* (sin th) ky) (*.f64 (fma.f64 (fma.f64 (*.f64 th th) (fma.f64 (*.f64 (*.f64 th th) ky) #s(literal -1/5040 binary64) (*.f64 #s(literal 1/120 binary64) ky)) (*.f64 #s(literal -1/6 binary64) ky)) (*.f64 th th) ky) th)) (fabs.f64 #s(approx (sin kx) kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (/.f64 #s(literal 1 binary64) (/.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 #s(approx (sin th) th) ky) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) 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 #s(approx (sin kx) (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 kx kx) #s(literal 1 binary64)) kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 #s(approx (sin kx) (*.f64 (fma.f64 (-.f64 (*.f64 #s(literal 1/120 binary64) (*.f64 kx kx)) #s(literal 1/6 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) kx)))))
(*.f64 (/.f64 #s(approx (sin ky) (*.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky)) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 #s(approx (sin ky) (*.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 #s(approx (sin kx) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 kx kx) #s(literal 1/120 binary64)) (*.f64 kx kx)) #s(literal 1/6 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) kx)))))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(approx (/ 1 (pow (sin ky) -1)) (sin.f64 ky)))) #s(approx (sin th) th))
(/.f64 (*.f64 (sin.f64 ky) #s(approx (sin th) th)) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) (sin.f64 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))))
(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (fabs.f64 (sin.f64 kx)))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 ky (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx)))))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 (sin.f64 ky)))) #s(approx (sin th) th))
(/.f64 (*.f64 #s(literal 1 binary64) (sin.f64 th)) #s(approx (* (/ 1 (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 (fabs.f64 (sin.f64 kx)) ky)))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (+ (* ky ky) (- 1/2 (* 1/2 (cos (* 2 kx))))) (*.f64 ky ky))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fabs.f64 (sin.f64 kx))))))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 ky ky #s(approx (- 1/2 (* 1/2 (cos (* 2 kx)))) (*.f64 kx kx)))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))
(/.f64 (*.f64 (sin.f64 ky) #s(approx (sin th) (*.f64 #s(approx (+ (* (* (- (* (* (+ (* (* th th) -1/5040) 1/120) th) th) 1/6) th) th) 1) (fma.f64 (*.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64))) th))) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) (sin.f64 ky)))
Outputs
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 (sin.f64 ky)))) #s(approx (sin th) th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 ky (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx)))))
(*.f64 (/.f64 #s(approx (sin ky) ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 #s(approx (sin ky) ky)))) (sin.f64 th))
Calls

1 calls:

11.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)))))
Results
AccuracySegmentsBranch
71.7%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)))))
Compiler

Compiled 12 to 11 computations (8.3% saved)

regimes31.0ms (0.5%)

Memory
-31.0MiB live, 69.8MiB allocated; 16ms collecting garbage
Counts
27 → 3
Calls
Call 1
Inputs
(*.f64 (/.f64 #s(approx (exp (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2)) ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(approx (/ 1 (pow (sin ky) -1)) #s(approx (exp (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2)) ky)))) #s(approx (sin th) th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 #s(approx (sin th) th) (/.f64 ky (fabs.f64 #s(approx (sin kx) kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (fabs.f64 #s(approx (sin kx) kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (sqrt.f64 (*.f64 #s(approx (sin kx) kx) #s(approx (sin kx) kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(approx (* (sin th) ky) (*.f64 (fma.f64 (*.f64 (*.f64 th th) ky) #s(literal -1/6 binary64) ky) th)) (fabs.f64 #s(approx (sin kx) kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (fabs.f64 #s(approx (sin kx) (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 kx kx) #s(literal 1 binary64)) kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (fabs.f64 #s(approx (sin kx) (*.f64 (fma.f64 (-.f64 (*.f64 (*.f64 kx kx) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(approx (* (sin th) ky) (*.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 th th) ky) #s(literal 1/120 binary64) (*.f64 #s(literal -1/6 binary64) ky)) (*.f64 th th) ky) th)) (fabs.f64 #s(approx (sin kx) kx))))
(/.f64 (*.f64 #s(approx (exp (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2)) ky) #s(approx (sin th) (*.f64 (fma.f64 (*.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) th) th) #s(literal 1/6 binary64)) th) th #s(literal 1 binary64)) th))) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) #s(approx (exp (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2)) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (fabs.f64 #s(approx (sin kx) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (*.f64 kx kx)) #s(literal 1/6 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) 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 #s(approx (sin kx) kx))))
(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (fabs.f64 (sin.f64 kx)))) #s(approx (sin th) th))
(*.f64 (/.f64 #s(approx (sin ky) ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 #s(approx (sin ky) ky)))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(approx (* (sin th) ky) (*.f64 (fma.f64 (fma.f64 (*.f64 th th) (fma.f64 (*.f64 (*.f64 th th) ky) #s(literal -1/5040 binary64) (*.f64 #s(literal 1/120 binary64) ky)) (*.f64 #s(literal -1/6 binary64) ky)) (*.f64 th th) ky) th)) (fabs.f64 #s(approx (sin kx) kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (/.f64 #s(literal 1 binary64) (/.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 #s(approx (sin th) th) ky) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) 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 #s(approx (sin kx) (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 kx kx) #s(literal 1 binary64)) kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 #s(approx (sin kx) (*.f64 (fma.f64 (-.f64 (*.f64 #s(literal 1/120 binary64) (*.f64 kx kx)) #s(literal 1/6 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) kx)))))
(*.f64 (/.f64 #s(approx (sin ky) (*.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky)) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 #s(approx (sin ky) (*.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 #s(approx (sin kx) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 kx kx) #s(literal 1/120 binary64)) (*.f64 kx kx)) #s(literal 1/6 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) kx)))))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(approx (/ 1 (pow (sin ky) -1)) (sin.f64 ky)))) #s(approx (sin th) th))
(/.f64 (*.f64 (sin.f64 ky) #s(approx (sin th) th)) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) (sin.f64 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))))
(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (fabs.f64 (sin.f64 kx)))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 ky (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx)))))
Outputs
(*.f64 (/.f64 #s(approx (sin ky) (*.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky)) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 #s(approx (sin ky) (*.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 ky (/.f64 (sin.f64 th) (fabs.f64 (sin.f64 kx)))))
(*.f64 (/.f64 #s(approx (sin ky) ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 #s(approx (sin ky) ky)))) (sin.f64 th))
Calls

2 calls:

20.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)))))
8.0ms
ky
Results
AccuracySegmentsBranch
58.0%2ky
69.3%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)))))
Compiler

Compiled 13 to 14 computations (-7.7% saved)

regimes9.0ms (0.1%)

Memory
31.7MiB live, 31.7MiB allocated; 0ms collecting garbage
Counts
26 → 3
Calls
Call 1
Inputs
(*.f64 (/.f64 #s(approx (exp (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2)) ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(approx (/ 1 (pow (sin ky) -1)) #s(approx (exp (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2)) ky)))) #s(approx (sin th) th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 #s(approx (sin th) th) (/.f64 ky (fabs.f64 #s(approx (sin kx) kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (fabs.f64 #s(approx (sin kx) kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (sqrt.f64 (*.f64 #s(approx (sin kx) kx) #s(approx (sin kx) kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(approx (* (sin th) ky) (*.f64 (fma.f64 (*.f64 (*.f64 th th) ky) #s(literal -1/6 binary64) ky) th)) (fabs.f64 #s(approx (sin kx) kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (fabs.f64 #s(approx (sin kx) (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 kx kx) #s(literal 1 binary64)) kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (fabs.f64 #s(approx (sin kx) (*.f64 (fma.f64 (-.f64 (*.f64 (*.f64 kx kx) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(approx (* (sin th) ky) (*.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 th th) ky) #s(literal 1/120 binary64) (*.f64 #s(literal -1/6 binary64) ky)) (*.f64 th th) ky) th)) (fabs.f64 #s(approx (sin kx) kx))))
(/.f64 (*.f64 #s(approx (exp (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2)) ky) #s(approx (sin th) (*.f64 (fma.f64 (*.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) th) th) #s(literal 1/6 binary64)) th) th #s(literal 1 binary64)) th))) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) #s(approx (exp (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2)) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (fabs.f64 #s(approx (sin kx) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (*.f64 kx kx)) #s(literal 1/6 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) 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 #s(approx (sin kx) kx))))
(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (fabs.f64 (sin.f64 kx)))) #s(approx (sin th) th))
(*.f64 (/.f64 #s(approx (sin ky) ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 #s(approx (sin ky) ky)))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(approx (* (sin th) ky) (*.f64 (fma.f64 (fma.f64 (*.f64 th th) (fma.f64 (*.f64 (*.f64 th th) ky) #s(literal -1/5040 binary64) (*.f64 #s(literal 1/120 binary64) ky)) (*.f64 #s(literal -1/6 binary64) ky)) (*.f64 th th) ky) th)) (fabs.f64 #s(approx (sin kx) kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (/.f64 #s(literal 1 binary64) (/.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 #s(approx (sin th) th) ky) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) 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 #s(approx (sin kx) (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 kx kx) #s(literal 1 binary64)) kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 #s(approx (sin kx) (*.f64 (fma.f64 (-.f64 (*.f64 #s(literal 1/120 binary64) (*.f64 kx kx)) #s(literal 1/6 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) kx)))))
(*.f64 (/.f64 #s(approx (sin ky) (*.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky)) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 #s(approx (sin ky) (*.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 #s(approx (sin kx) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 kx kx) #s(literal 1/120 binary64)) (*.f64 kx kx)) #s(literal 1/6 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) kx)))))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(approx (/ 1 (pow (sin ky) -1)) (sin.f64 ky)))) #s(approx (sin th) th))
(/.f64 (*.f64 (sin.f64 ky) #s(approx (sin th) th)) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) (sin.f64 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))))
(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (fabs.f64 (sin.f64 kx)))) (sin.f64 th))
Outputs
(*.f64 (/.f64 #s(approx (sin ky) (*.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky)) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 #s(approx (sin ky) (*.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky))))) (sin.f64 th))
(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (fabs.f64 (sin.f64 kx)))) (sin.f64 th))
(*.f64 (/.f64 #s(approx (sin ky) ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 #s(approx (sin ky) ky)))) (sin.f64 th))
Calls

1 calls:

7.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)))))
Results
AccuracySegmentsBranch
69.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)))))
Compiler

Compiled 12 to 11 computations (8.3% saved)

regimes11.0ms (0.2%)

Memory
-12.8MiB live, 31.3MiB allocated; 3ms collecting garbage
Counts
25 → 3
Calls
Call 1
Inputs
(*.f64 (/.f64 #s(approx (exp (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2)) ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(approx (/ 1 (pow (sin ky) -1)) #s(approx (exp (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2)) ky)))) #s(approx (sin th) th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 #s(approx (sin th) th) (/.f64 ky (fabs.f64 #s(approx (sin kx) kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (fabs.f64 #s(approx (sin kx) kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (sqrt.f64 (*.f64 #s(approx (sin kx) kx) #s(approx (sin kx) kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(approx (* (sin th) ky) (*.f64 (fma.f64 (*.f64 (*.f64 th th) ky) #s(literal -1/6 binary64) ky) th)) (fabs.f64 #s(approx (sin kx) kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (fabs.f64 #s(approx (sin kx) (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 kx kx) #s(literal 1 binary64)) kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (fabs.f64 #s(approx (sin kx) (*.f64 (fma.f64 (-.f64 (*.f64 (*.f64 kx kx) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(approx (* (sin th) ky) (*.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 th th) ky) #s(literal 1/120 binary64) (*.f64 #s(literal -1/6 binary64) ky)) (*.f64 th th) ky) th)) (fabs.f64 #s(approx (sin kx) kx))))
(/.f64 (*.f64 #s(approx (exp (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2)) ky) #s(approx (sin th) (*.f64 (fma.f64 (*.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) th) th) #s(literal 1/6 binary64)) th) th #s(literal 1 binary64)) th))) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) #s(approx (exp (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2)) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (fabs.f64 #s(approx (sin kx) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (*.f64 kx kx)) #s(literal 1/6 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) 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 #s(approx (sin kx) kx))))
(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (fabs.f64 (sin.f64 kx)))) #s(approx (sin th) th))
(*.f64 (/.f64 #s(approx (sin ky) ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 #s(approx (sin ky) ky)))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(approx (* (sin th) ky) (*.f64 (fma.f64 (fma.f64 (*.f64 th th) (fma.f64 (*.f64 (*.f64 th th) ky) #s(literal -1/5040 binary64) (*.f64 #s(literal 1/120 binary64) ky)) (*.f64 #s(literal -1/6 binary64) ky)) (*.f64 th th) ky) th)) (fabs.f64 #s(approx (sin kx) kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (/.f64 #s(literal 1 binary64) (/.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 #s(approx (sin th) th) ky) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) 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 #s(approx (sin kx) (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 kx kx) #s(literal 1 binary64)) kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 #s(approx (sin kx) (*.f64 (fma.f64 (-.f64 (*.f64 #s(literal 1/120 binary64) (*.f64 kx kx)) #s(literal 1/6 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) kx)))))
(*.f64 (/.f64 #s(approx (sin ky) (*.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky)) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 #s(approx (sin ky) (*.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 #s(approx (sin kx) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 kx kx) #s(literal 1/120 binary64)) (*.f64 kx kx)) #s(literal 1/6 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) kx)))))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(approx (/ 1 (pow (sin ky) -1)) (sin.f64 ky)))) #s(approx (sin th) th))
(/.f64 (*.f64 (sin.f64 ky) #s(approx (sin th) th)) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) (sin.f64 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))))
Outputs
(*.f64 (/.f64 #s(approx (sin ky) (*.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky)) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 #s(approx (sin ky) (*.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky))))) (sin.f64 th))
#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(approx (sin ky) ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 #s(approx (sin ky) ky)))) (sin.f64 th))
Calls

1 calls:

9.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)))))
Results
AccuracySegmentsBranch
68.1%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)))))
Compiler

Compiled 12 to 11 computations (8.3% saved)

regimes69.0ms (1%)

Memory
20.9MiB live, 216.0MiB allocated; 10ms collecting garbage
Counts
24 → 3
Calls
Call 1
Inputs
(*.f64 (/.f64 #s(approx (exp (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2)) ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(approx (/ 1 (pow (sin ky) -1)) #s(approx (exp (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2)) ky)))) #s(approx (sin th) th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 #s(approx (sin th) th) (/.f64 ky (fabs.f64 #s(approx (sin kx) kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (fabs.f64 #s(approx (sin kx) kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (sqrt.f64 (*.f64 #s(approx (sin kx) kx) #s(approx (sin kx) kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(approx (* (sin th) ky) (*.f64 (fma.f64 (*.f64 (*.f64 th th) ky) #s(literal -1/6 binary64) ky) th)) (fabs.f64 #s(approx (sin kx) kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (fabs.f64 #s(approx (sin kx) (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 kx kx) #s(literal 1 binary64)) kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (fabs.f64 #s(approx (sin kx) (*.f64 (fma.f64 (-.f64 (*.f64 (*.f64 kx kx) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(approx (* (sin th) ky) (*.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 th th) ky) #s(literal 1/120 binary64) (*.f64 #s(literal -1/6 binary64) ky)) (*.f64 th th) ky) th)) (fabs.f64 #s(approx (sin kx) kx))))
(/.f64 (*.f64 #s(approx (exp (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2)) ky) #s(approx (sin th) (*.f64 (fma.f64 (*.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) th) th) #s(literal 1/6 binary64)) th) th #s(literal 1 binary64)) th))) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) #s(approx (exp (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2)) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (fabs.f64 #s(approx (sin kx) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (*.f64 kx kx)) #s(literal 1/6 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) 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 #s(approx (sin kx) kx))))
(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (fabs.f64 (sin.f64 kx)))) #s(approx (sin th) th))
(*.f64 (/.f64 #s(approx (sin ky) ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 #s(approx (sin ky) ky)))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(approx (* (sin th) ky) (*.f64 (fma.f64 (fma.f64 (*.f64 th th) (fma.f64 (*.f64 (*.f64 th th) ky) #s(literal -1/5040 binary64) (*.f64 #s(literal 1/120 binary64) ky)) (*.f64 #s(literal -1/6 binary64) ky)) (*.f64 th th) ky) th)) (fabs.f64 #s(approx (sin kx) kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (/.f64 #s(literal 1 binary64) (/.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 #s(approx (sin th) th) ky) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) 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 #s(approx (sin kx) (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 kx kx) #s(literal 1 binary64)) kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 #s(approx (sin kx) (*.f64 (fma.f64 (-.f64 (*.f64 #s(literal 1/120 binary64) (*.f64 kx kx)) #s(literal 1/6 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) kx)))))
(*.f64 (/.f64 #s(approx (sin ky) (*.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky)) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 #s(approx (sin ky) (*.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 #s(approx (sin kx) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 kx kx) #s(literal 1/120 binary64)) (*.f64 kx kx)) #s(literal 1/6 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) kx)))))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(approx (/ 1 (pow (sin ky) -1)) (sin.f64 ky)))) #s(approx (sin th) th))
(/.f64 (*.f64 (sin.f64 ky) #s(approx (sin th) th)) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) (sin.f64 ky)))
Outputs
(*.f64 (/.f64 #s(approx (sin ky) (*.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky)) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 #s(approx (sin ky) (*.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky))))) (sin.f64 th))
(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (fabs.f64 (sin.f64 kx)))) #s(approx (sin th) th))
(*.f64 (/.f64 #s(approx (sin ky) ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 #s(approx (sin ky) ky)))) (sin.f64 th))
Calls

9 calls:

9.0ms
(sin.f64 ky)
8.0ms
(sin.f64 th)
8.0ms
kx
8.0ms
(sin.f64 kx)
7.0ms
(*.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))
Results
AccuracySegmentsBranch
43.3%4(*.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))
41.5%3(sin.f64 kx)
41.5%2(pow.f64 (sin.f64 kx) #s(literal 2 binary64))
41.5%2kx
41.9%2ky
46.0%3(sin.f64 ky)
41.2%3th
41.2%4(sin.f64 th)
52.1%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)))))
Compiler

Compiled 40 to 51 computations (-27.5% saved)

regimes9.0ms (0.1%)

Memory
-17.7MiB live, 26.6MiB allocated; 4ms collecting garbage
Counts
20 → 2
Calls
Call 1
Inputs
(*.f64 (/.f64 #s(approx (exp (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2)) ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(approx (/ 1 (pow (sin ky) -1)) #s(approx (exp (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2)) ky)))) #s(approx (sin th) th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 #s(approx (sin th) th) (/.f64 ky (fabs.f64 #s(approx (sin kx) kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (fabs.f64 #s(approx (sin kx) kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (sqrt.f64 (*.f64 #s(approx (sin kx) kx) #s(approx (sin kx) kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(approx (* (sin th) ky) (*.f64 (fma.f64 (*.f64 (*.f64 th th) ky) #s(literal -1/6 binary64) ky) th)) (fabs.f64 #s(approx (sin kx) kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (fabs.f64 #s(approx (sin kx) (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 kx kx) #s(literal 1 binary64)) kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (fabs.f64 #s(approx (sin kx) (*.f64 (fma.f64 (-.f64 (*.f64 (*.f64 kx kx) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(approx (* (sin th) ky) (*.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 th th) ky) #s(literal 1/120 binary64) (*.f64 #s(literal -1/6 binary64) ky)) (*.f64 th th) ky) th)) (fabs.f64 #s(approx (sin kx) kx))))
(/.f64 (*.f64 #s(approx (exp (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2)) ky) #s(approx (sin th) (*.f64 (fma.f64 (*.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) th) th) #s(literal 1/6 binary64)) th) th #s(literal 1 binary64)) th))) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) #s(approx (exp (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2)) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (fabs.f64 #s(approx (sin kx) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (*.f64 kx kx)) #s(literal 1/6 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) 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 #s(approx (sin kx) kx))))
(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (fabs.f64 (sin.f64 kx)))) #s(approx (sin th) th))
(*.f64 (/.f64 #s(approx (sin ky) ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 #s(approx (sin ky) ky)))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(approx (* (sin th) ky) (*.f64 (fma.f64 (fma.f64 (*.f64 th th) (fma.f64 (*.f64 (*.f64 th th) ky) #s(literal -1/5040 binary64) (*.f64 #s(literal 1/120 binary64) ky)) (*.f64 #s(literal -1/6 binary64) ky)) (*.f64 th th) ky) th)) (fabs.f64 #s(approx (sin kx) kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (/.f64 #s(literal 1 binary64) (/.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 #s(approx (sin th) th) ky) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/6 binary64) #s(literal 1 binary64)) 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 #s(approx (sin kx) (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 kx kx) #s(literal 1 binary64)) kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (fabs.f64 #s(approx (sin kx) (*.f64 (fma.f64 (-.f64 (*.f64 #s(literal 1/120 binary64) (*.f64 kx kx)) #s(literal 1/6 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) kx)))))
Outputs
(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (fabs.f64 (sin.f64 kx)))) #s(approx (sin th) th))
(*.f64 (/.f64 #s(approx (sin ky) ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fabs.f64 #s(approx (sin ky) ky)))) (sin.f64 th))
Calls

1 calls:

8.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)))))
Results
AccuracySegmentsBranch
47.9%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)))))
Compiler

Compiled 12 to 11 computations (8.3% saved)

regimes43.0ms (0.6%)

Memory
-15.6MiB live, 132.2MiB allocated; 7ms collecting garbage
Counts
13 → 2
Calls
Call 1
Inputs
(*.f64 (/.f64 #s(approx (exp (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2)) ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(approx (/ 1 (pow (sin ky) -1)) #s(approx (exp (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2)) ky)))) #s(approx (sin th) th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 #s(approx (sin th) th) (/.f64 ky (fabs.f64 #s(approx (sin kx) kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (fabs.f64 #s(approx (sin kx) kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (sqrt.f64 (*.f64 #s(approx (sin kx) kx) #s(approx (sin kx) kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(approx (* (sin th) ky) (*.f64 (fma.f64 (*.f64 (*.f64 th th) ky) #s(literal -1/6 binary64) ky) th)) (fabs.f64 #s(approx (sin kx) kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (fabs.f64 #s(approx (sin kx) (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 kx kx) #s(literal 1 binary64)) kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (fabs.f64 #s(approx (sin kx) (*.f64 (fma.f64 (-.f64 (*.f64 (*.f64 kx kx) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(approx (* (sin th) ky) (*.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 th th) ky) #s(literal 1/120 binary64) (*.f64 #s(literal -1/6 binary64) ky)) (*.f64 th th) ky) th)) (fabs.f64 #s(approx (sin kx) kx))))
(/.f64 (*.f64 #s(approx (exp (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2)) ky) #s(approx (sin th) (*.f64 (fma.f64 (*.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) th) th) #s(literal 1/6 binary64)) th) th #s(literal 1 binary64)) th))) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) #s(approx (exp (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2)) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (fabs.f64 #s(approx (sin kx) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (*.f64 kx kx)) #s(literal 1/6 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) 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 #s(approx (sin kx) kx))))
(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (fabs.f64 (sin.f64 kx)))) #s(approx (sin th) th))
Outputs
(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (fabs.f64 (sin.f64 kx)))) #s(approx (sin th) th))
(*.f64 (/.f64 #s(approx (exp (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2)) ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(approx (/ 1 (pow (sin ky) -1)) #s(approx (exp (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2)) ky)))) #s(approx (sin th) th))
Calls

9 calls:

6.0ms
(*.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))
6.0ms
ky
5.0ms
(sin.f64 th)
4.0ms
kx
4.0ms
(sin.f64 ky)
Results
AccuracySegmentsBranch
31.9%4(sin.f64 th)
32.0%3th
33.8%4(sin.f64 kx)
29.9%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))
33.8%3(pow.f64 (sin.f64 kx) #s(literal 2 binary64))
33.8%3kx
32.2%2ky
31.9%2(sin.f64 ky)
34.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)))))
Compiler

Compiled 40 to 51 computations (-27.5% saved)

regimes5.0ms (0.1%)

Memory
16.6MiB live, 16.6MiB allocated; 0ms collecting garbage
Counts
12 → 2
Calls
Call 1
Inputs
(*.f64 (/.f64 #s(approx (exp (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2)) ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(approx (/ 1 (pow (sin ky) -1)) #s(approx (exp (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2)) ky)))) #s(approx (sin th) th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 #s(approx (sin th) th) (/.f64 ky (fabs.f64 #s(approx (sin kx) kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (fabs.f64 #s(approx (sin kx) kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (sqrt.f64 (*.f64 #s(approx (sin kx) kx) #s(approx (sin kx) kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(approx (* (sin th) ky) (*.f64 (fma.f64 (*.f64 (*.f64 th th) ky) #s(literal -1/6 binary64) ky) th)) (fabs.f64 #s(approx (sin kx) kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (fabs.f64 #s(approx (sin kx) (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 kx kx) #s(literal 1 binary64)) kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (fabs.f64 #s(approx (sin kx) (*.f64 (fma.f64 (-.f64 (*.f64 (*.f64 kx kx) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(approx (* (sin th) ky) (*.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 th th) ky) #s(literal 1/120 binary64) (*.f64 #s(literal -1/6 binary64) ky)) (*.f64 th th) ky) th)) (fabs.f64 #s(approx (sin kx) kx))))
(/.f64 (*.f64 #s(approx (exp (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2)) ky) #s(approx (sin th) (*.f64 (fma.f64 (*.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) th) th) #s(literal 1/6 binary64)) th) th #s(literal 1 binary64)) th))) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) #s(approx (exp (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2)) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (fabs.f64 #s(approx (sin kx) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (*.f64 kx kx)) #s(literal 1/6 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) 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 #s(approx (sin kx) kx))))
Outputs
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (fabs.f64 (sin.f64 kx))))
(*.f64 (/.f64 #s(approx (exp (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2)) ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(approx (/ 1 (pow (sin ky) -1)) #s(approx (exp (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2)) ky)))) #s(approx (sin th) th))
Calls

1 calls:

4.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)))))
Results
AccuracySegmentsBranch
32.8%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)))))
Compiler

Compiled 12 to 11 computations (8.3% saved)

regimes78.0ms (1.1%)

Memory
0.6MiB live, 110.6MiB allocated; 85ms collecting garbage
Counts
10 → 2
Calls
Call 1
Inputs
(*.f64 (/.f64 #s(approx (exp (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2)) ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(approx (/ 1 (pow (sin ky) -1)) #s(approx (exp (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2)) ky)))) #s(approx (sin th) th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 #s(approx (sin th) th) (/.f64 ky (fabs.f64 #s(approx (sin kx) kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (fabs.f64 #s(approx (sin kx) kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (sqrt.f64 (*.f64 #s(approx (sin kx) kx) #s(approx (sin kx) kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(approx (* (sin th) ky) (*.f64 (fma.f64 (*.f64 (*.f64 th th) ky) #s(literal -1/6 binary64) ky) th)) (fabs.f64 #s(approx (sin kx) kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (fabs.f64 #s(approx (sin kx) (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 kx kx) #s(literal 1 binary64)) kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (fabs.f64 #s(approx (sin kx) (*.f64 (fma.f64 (-.f64 (*.f64 (*.f64 kx kx) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 #s(approx (* (sin th) ky) (*.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 th th) ky) #s(literal 1/120 binary64) (*.f64 #s(literal -1/6 binary64) ky)) (*.f64 th th) ky) th)) (fabs.f64 #s(approx (sin kx) kx))))
(/.f64 (*.f64 #s(approx (exp (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2)) ky) #s(approx (sin th) (*.f64 (fma.f64 (*.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) th) th) #s(literal 1/6 binary64)) th) th #s(literal 1 binary64)) th))) #s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (/ 1 (pow (sin ky) -1)) (/ 1 (pow (sin ky) -1))))) #s(approx (exp (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2)) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 #s(approx (sin th) th) ky) (fabs.f64 #s(approx (sin kx) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (*.f64 kx kx)) #s(literal 1/6 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) kx)))))
Outputs
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 #s(approx (sin th) th) (/.f64 ky (fabs.f64 #s(approx (sin kx) kx)))))
(*.f64 (/.f64 #s(approx (exp (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2)) ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(approx (/ 1 (pow (sin ky) -1)) #s(approx (exp (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2)) ky)))) #s(approx (sin th) th))
Calls

9 calls:

49.0ms
th
4.0ms
(pow.f64 (sin.f64 kx) #s(literal 2 binary64))
3.0ms
(sin.f64 th)
3.0ms
(*.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))
3.0ms
kx
Results
AccuracySegmentsBranch
24.7%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))
21.9%1(sin.f64 th)
21.9%1th
21.9%1(sin.f64 kx)
26.2%2(sin.f64 ky)
26.3%2ky
23.8%2(pow.f64 (sin.f64 kx) #s(literal 2 binary64))
23.8%2kx
27.4%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)))))
Compiler

Compiled 40 to 51 computations (-27.5% saved)

regimes18.0ms (0.3%)

Memory
-7.2MiB live, 42.1MiB allocated; 8ms collecting garbage
Accuracy

Total 0.0b remaining (0%)

Threshold costs 0b (0%)

Counts
1 → 1
Calls
Call 1
Inputs
(*.f64 (/.f64 #s(approx (exp (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2)) ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(approx (/ 1 (pow (sin ky) -1)) #s(approx (exp (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2)) ky)))) #s(approx (sin th) th))
Outputs
(*.f64 (/.f64 #s(approx (exp (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2)) ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(approx (/ 1 (pow (sin ky) -1)) #s(approx (exp (* (neg (log (/ 1 (- 1/2 (* (cos (+ ky ky)) 1/2))))) 1/2)) ky)))) #s(approx (sin th) th))
Calls

9 calls:

9.0ms
(sin.f64 ky)
1.0ms
(*.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))
1.0ms
ky
1.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)))))
1.0ms
(sin.f64 kx)
Results
AccuracySegmentsBranch
16.1%1(sin.f64 kx)
16.1%1(sin.f64 th)
16.1%1th
16.1%1kx
16.1%1(pow.f64 (sin.f64 kx) #s(literal 2 binary64))
16.1%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))
16.1%1(sin.f64 ky)
16.1%1ky
16.1%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)))))
Compiler

Compiled 40 to 51 computations (-27.5% saved)

bsearch26.0ms (0.4%)

Memory
-17.2MiB live, 75.4MiB allocated; 5ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
24.0ms
0.10014538036321026
25.98339110180018
Samples
18.0ms128×0valid
Compiler

Compiled 203 to 194 computations (4.4% saved)

Precisions
Click to see histograms. Total time spent on operations: 14.0ms
ival-sin: 8.0ms (56.4% of total)
ival-pow2: 4.0ms (28.2% of total)
ival-sqrt: 1.0ms (7.1% of total)
ival-div!: 1.0ms (7.1% of total)
ival-mult!: 1.0ms (7.1% of total)
adjust: 0.0ms (0% of total)
ival-add!: 0.0ms (0% of total)

bsearch1.0ms (0%)

Memory
1.3MiB live, 1.3MiB allocated; 0ms collecting garbage
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
1.0
+inf
0.0ms
0.9995889899187828
1.0
0.0ms
0.0039218963272511145
0.04007689849246795
0.0ms
-0.46701481877737444
-0.41502849147658843
0.0ms
-0.9924585622801446
-0.9881072711748736
Compiler

Compiled 18 to 19 computations (-5.6% saved)

bsearch29.0ms (0.4%)

Memory
35.0MiB live, 35.0MiB allocated; 0ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
27.0ms
9.173480643099505e-7
8385.281017602152
Samples
21.0ms160×0valid
Compiler

Compiled 309 to 298 computations (3.6% saved)

Precisions
Click to see histograms. Total time spent on operations: 17.0ms
ival-sin: 11.0ms (65.4% of total)
ival-pow2: 3.0ms (17.8% of total)
ival-sqrt: 1.0ms (5.9% of total)
ival-div!: 1.0ms (5.9% of total)
ival-mult!: 1.0ms (5.9% of total)
adjust: 0.0ms (0% of total)
ival-add!: 0.0ms (0% of total)

bsearch18.0ms (0.3%)

Memory
-34.7MiB live, 18.5MiB allocated; 6ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
17.0ms
9.173480643099505e-7
8385.281017602152
Samples
13.0ms80×0valid
Compiler

Compiled 339 to 308 computations (9.1% saved)

Precisions
Click to see histograms. Total time spent on operations: 9.0ms
ival-sin: 6.0ms (69.7% of total)
ival-sqrt: 1.0ms (11.6% of total)
ival-pow2: 1.0ms (11.6% of total)
adjust: 0.0ms (0% of total)
ival-add!: 0.0ms (0% of total)
ival-div!: 0.0ms (0% of total)
ival-mult!: 0.0ms (0% of total)

bsearch12.0ms (0.2%)

Memory
15.0MiB live, 15.0MiB allocated; 0ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
11.0ms
9.173480643099505e-7
8385.281017602152
Samples
8.0ms64×0valid
Compiler

Compiled 349 to 328 computations (6% saved)

Precisions
Click to see histograms. Total time spent on operations: 7.0ms
ival-sin: 5.0ms (73.5% of total)
ival-pow2: 1.0ms (14.7% of total)
adjust: 0.0ms (0% of total)
ival-add!: 0.0ms (0% of total)
ival-sqrt: 0.0ms (0% of total)
ival-div!: 0.0ms (0% of total)
ival-mult!: 0.0ms (0% of total)

bsearch1.0ms (0%)

Memory
0.6MiB live, 0.6MiB allocated; 0ms collecting garbage
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
9.173480643098218e-7
0.0036829984097233297
0.0ms
-0.08282335826815045
-0.009394595806378603
Compiler

Compiled 18 to 18 computations (0% saved)

bsearch1.0ms (0%)

Memory
0.6MiB live, 0.6MiB allocated; 0ms collecting garbage
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
9.173480643098218e-7
0.0036829984097233297
0.0ms
-0.009394595806378603
7.662017980992605e-307
Compiler

Compiled 18 to 18 computations (0% saved)

bsearch1.0ms (0%)

Memory
0.6MiB live, 0.6MiB allocated; 0ms collecting garbage
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
9.173480643098218e-7
0.0036829984097233297
0.0ms
-0.08282335826815045
-0.009394595806378603
Compiler

Compiled 18 to 18 computations (0% saved)

bsearch1.0ms (0%)

Memory
0.5MiB live, 0.5MiB allocated; 0ms collecting garbage
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
1.1134262729216407e-6
0.0039218963272511145
0.0ms
-0.41502849147658843
-0.40837728435695536
Compiler

Compiled 18 to 19 computations (-5.6% saved)

bsearch1.0ms (0%)

Memory
0.6MiB live, 0.6MiB allocated; 0ms collecting garbage
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
1.1134262729216407e-6
0.0039218963272511145
0.0ms
-0.02722510791101413
9.033412326228965e-307
Compiler

Compiled 18 to 19 computations (-5.6% saved)

bsearch0.0ms (0%)

Memory
0.5MiB live, 0.5MiB allocated; 0ms collecting garbage
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
1.1134262729216407e-6
0.0039218963272511145
0.0ms
-0.508796287718337
-0.4755946643103187
Compiler

Compiled 18 to 19 computations (-5.6% saved)

bsearch0.0ms (0%)

Memory
0.5MiB live, 0.5MiB allocated; 0ms collecting garbage
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
1.1134262729216407e-6
0.0039218963272511145
0.0ms
-0.508796287718337
-0.4755946643103187
Compiler

Compiled 18 to 19 computations (-5.6% saved)

bsearch0.0ms (0%)

Memory
0.5MiB live, 0.5MiB allocated; 0ms collecting garbage
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
1.1134262729216407e-6
0.0039218963272511145
0.0ms
-0.508796287718337
-0.4755946643103187
Compiler

Compiled 18 to 19 computations (-5.6% saved)

bsearch0.0ms (0%)

Memory
0.5MiB live, 0.5MiB allocated; 0ms collecting garbage
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
1.1134262729216407e-6
0.0039218963272511145
0.0ms
-0.508796287718337
-0.4755946643103187
Compiler

Compiled 18 to 19 computations (-5.6% saved)

bsearch0.0ms (0%)

Memory
0.3MiB live, 0.3MiB allocated; 0ms collecting garbage
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
1.1134262729216407e-6
0.0039218963272511145
Compiler

Compiled 18 to 19 computations (-5.6% saved)

bsearch0.0ms (0%)

Memory
0.3MiB live, 0.3MiB allocated; 0ms collecting garbage
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
1.1134262729216407e-6
0.0039218963272511145
Compiler

Compiled 18 to 19 computations (-5.6% saved)

bsearch0.0ms (0%)

Memory
0.3MiB live, 0.3MiB allocated; 0ms collecting garbage
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
1.1134262729216407e-6
0.0039218963272511145
Compiler

Compiled 18 to 19 computations (-5.6% saved)

bsearch0.0ms (0%)

Memory
0.3MiB live, 0.3MiB allocated; 0ms collecting garbage
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
1.1758899814565937e-7
1.1134262729216407e-6
Compiler

Compiled 18 to 19 computations (-5.6% saved)

derivations703.0ms (10.3%)

Memory
9.1MiB live, 553.2MiB allocated; 109ms collecting garbage
Stop Event
fuel
Compiler

Compiled 347 to 186 computations (46.4% saved)

preprocess707.0ms (10.4%)

Memory
6.7MiB live, 1 249.7MiB allocated; 150ms collecting garbage
Remove

(negabs th)

(abs kx)

Compiler

Compiled 8 774 to 6 341 computations (27.7% saved)

end0.0ms (0%)

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

Profiling

Loading profile data...