Toniolo and Linder, Equation (3b), real

Time bar (total: 10.3s)

start0.0ms (0%)

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

analyze190.0ms (1.9%)

Memory
11.0MiB live, 245.7MiB allocated; 30ms 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.8s (17.4%)

Memory
16.3MiB live, 2 232.7MiB allocated; 268ms collecting garbage
Samples
1.4s8 256×0valid
Precisions
Click to see histograms. Total time spent on operations: 1.0s
ival-sin: 612.0ms (59.9% of total)
ival-pow2: 205.0ms (20.1% of total)
ival-div: 58.0ms (5.7% of total)
ival-mult: 54.0ms (5.3% of total)
ival-sqrt: 50.0ms (4.9% of total)
ival-add: 36.0ms (3.5% of total)
adjust: 3.0ms (0.3% of total)
ival-assert: 3.0ms (0.3% of total)
Bogosity

explain178.0ms (1.7%)

Memory
28.8MiB live, 368.8MiB allocated; 15ms collecting garbage
FPErrors
Click to see full error table
Ground TruthOverpredictionsExampleUnderpredictionsExampleSubexpression
190-0-(sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
00-0-(+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))
00-0-(pow.f64 (sin.f64 ky) #s(literal 2 binary64))
00-0-(sin.f64 kx)
00-0-(sin.f64 th)
00-0-(pow.f64 (sin.f64 kx) #s(literal 2 binary64))
00-0-(/.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)))))
00-0-th
00-0-#s(literal 2 binary64)
00-0-(*.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))
00-0-(sin.f64 ky)
00-0-ky
00-0-kx
Explanations
Click to see full explanations table
OperatorSubexpressionExplanationCount
sqrt.f64(sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))uflow-rescue190
(pow.f64 (sin.f64 kx) #s(literal 2 binary64))underflow64
(pow.f64 (sin.f64 ky) #s(literal 2 binary64))underflow74
(+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))underflow19
Confusion
Predicted +Predicted -
+190
-0237
Precision
1.0
Recall
1.0
Confusion?
Predicted +Predicted MaybePredicted -
+1900
-00237
Precision?
1.0
Recall?
1.0
Freqs
test
numberfreq
0237
119
Total Confusion?
Predicted +Predicted MaybePredicted -
+100
-000
Precision?
1.0
Recall?
1.0
Samples
75.0ms512×0valid
Compiler

Compiled 152 to 43 computations (71.7% saved)

Precisions
Click to see histograms. Total time spent on operations: 51.0ms
ival-sin: 30.0ms (58.7% of total)
ival-pow2: 9.0ms (17.6% of total)
ival-div: 3.0ms (5.9% of total)
ival-mult: 3.0ms (5.9% of total)
ival-sqrt: 3.0ms (5.9% of total)
ival-add: 2.0ms (3.9% of total)
adjust: 0.0ms (0% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)
exact: 0.0ms (0% of total)

preprocess214.0ms (2.1%)

Memory
-31.0MiB live, 261.3MiB allocated; 20ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
046166
192163
2224163
3435163
4959163
53019163
01316
02216
13016
25316
311316
423816
558516
6234316
7758016
0812011
Stop Event
iter limit
node limit
iter limit
node limit
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))
Outputs
(*.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 th) (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))
Symmetry

(abs kx)

(negabs ky)

(negabs th)

Compiler

Compiled 16 to 13 computations (18.8% saved)

eval0.0ms (0%)

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

Compiled 0 to 3 computations (-∞% saved)

prune1.0ms (0%)

Memory
1.2MiB live, 1.2MiB allocated; 0ms collecting garbage
Alt Table
Click to see full alt table
StatusAccuracyProgram
92.5%
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
Compiler

Compiled 16 to 13 computations (18.8% saved)

series34.0ms (0.3%)

Memory
13.5MiB live, 60.6MiB allocated; 1ms collecting garbage
Counts
13 → 68
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 th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (+ (sin th) (* (pow kx 2) (+ (* -1/2 (/ (sin th) (pow (sin ky) 2))) (* 1/2 (* (pow kx 2) (* (pow (sin ky) 2) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))))))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (+ (sin th) (* (pow kx 2) (+ (* -1/2 (/ (sin th) (pow (sin ky) 2))) (* (pow kx 2) (+ (* -1/2 (* (pow kx 2) (* (pow (sin ky) 2) (* (sin th) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))) (pow (sin ky) 2))) (+ (* 2/45 (/ 1 (pow (sin ky) 4))) (+ (* 2/3 (/ 1 (pow (sin ky) 6))) (/ 1 (pow (sin ky) 8))))))))) (* 1/2 (* (pow (sin ky) 2) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6))))))))))))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 1))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ 1 (* -1/2 (/ (pow kx 2) (pow (sin ky) 2))))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ 1 (* (pow kx 2) (- (* 1/2 (* (pow kx 2) (* (pow (sin ky) 2) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6))))))) (* 1/2 (/ 1 (pow (sin ky) 2))))))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ 1 (* (pow kx 2) (- (* (pow kx 2) (+ (* -1/2 (* (pow kx 2) (* (pow (sin ky) 2) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))) (pow (sin ky) 2))) (+ (* 2/45 (/ 1 (pow (sin ky) 4))) (+ (* 2/3 (/ 1 (pow (sin ky) 6))) (/ 1 (pow (sin ky) 8)))))))) (* 1/2 (* (pow (sin ky) 2) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))))))) (* 1/2 (/ 1 (pow (sin ky) 2))))))))
#s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (sin ky)))
#s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (sin ky) (* 1/2 (/ (pow kx 2) (sin ky))))))
#s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (sin ky) (* (pow kx 2) (+ (* -1/2 (/ (* (pow kx 2) (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2))))) (sin ky))) (* 1/2 (/ 1 (sin ky))))))))
#s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (sin ky) (* (pow kx 2) (+ (* (pow kx 2) (+ (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (sin ky))) (* 1/2 (/ (* (pow kx 2) (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2))))) (sin ky))))) (* 1/2 (/ 1 (sin ky))))))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (pow (sin ky) 2)))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (pow kx 2) (pow (sin ky) 2))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (* (pow kx 2) (+ 1 (* -1/3 (pow kx 2)))) (pow (sin ky) 2))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (* (pow kx 2) (+ 1 (* (pow kx 2) (- (* 2/45 (pow kx 2)) 1/3)))) (pow (sin ky) 2))))
#s(approx (pow (sin kx) 2) #s(hole binary64 (pow kx 2)))
#s(approx (pow (sin kx) 2) #s(hole binary64 (* (pow kx 2) (+ 1 (* -1/3 (pow kx 2))))))
#s(approx (pow (sin kx) 2) #s(hole binary64 (* (pow kx 2) (+ 1 (* (pow kx 2) (- (* 2/45 (pow kx 2)) 1/3))))))
#s(approx (pow (sin kx) 2) #s(hole binary64 (* (pow kx 2) (+ 1 (* (pow kx 2) (- (* (pow kx 2) (+ 2/45 (* -1/315 (pow kx 2)))) 1/3))))))
#s(approx (sin kx) #s(hole binary64 kx))
#s(approx (sin kx) #s(hole binary64 (* kx (+ 1 (* -1/6 (pow kx 2))))))
#s(approx (sin kx) #s(hole binary64 (* kx (+ 1 (* (pow kx 2) (- (* 1/120 (pow kx 2)) 1/6))))))
#s(approx (sin kx) #s(hole binary64 (* kx (+ 1 (* (pow kx 2) (- (* (pow kx 2) (+ 1/120 (* -1/5040 (pow kx 2)))) 1/6))))))
#s(approx kx #s(hole binary64 kx))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (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 (/ 1 (+ (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)) (sin kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (* ky (+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx))))) (/ (sin th) (sin kx))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (* ky (+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (* (pow ky 2) (+ (* 1/120 (/ (sin th) (sin kx))) (+ (* 1/12 (/ (sin th) (pow (sin kx) 3))) (* 1/2 (* (sin kx) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))))))))) (/ (sin th) (sin kx))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (* ky (+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (* (pow ky 2) (+ (* 1/120 (/ (sin th) (sin kx))) (+ (* 1/12 (/ (sin th) (pow (sin kx) 3))) (+ (* 1/2 (* (sin kx) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))) (* (pow ky 2) (+ (* -1/2 (* (sin kx) (* (sin th) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))) (pow (sin kx) 2))) (+ (* 2/45 (/ 1 (pow (sin kx) 4))) (+ (* 2/3 (/ 1 (pow (sin kx) 6))) (/ 1 (pow (sin kx) 8)))))))) (+ (* -1/12 (* (sin kx) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))) (+ (* -1/240 (/ (sin th) (pow (sin kx) 3))) (* -1/5040 (/ (sin th) (sin kx)))))))))))))) (/ (sin th) (sin kx))))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (/ ky (sin kx))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (* ky (+ (* -1 (* (pow ky 2) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx))))))
#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 (sin kx))) (+ (* 1/2 (* (sin kx) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))))) (* 1/12 (/ 1 (pow (sin kx) 3)))))) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx))))))
#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 (sin kx))) (+ (* 1/12 (/ 1 (pow (sin kx) 3))) (+ (* 1/2 (* (sin kx) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))))) (* (pow ky 2) (- (+ (* -1/2 (* (sin kx) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))) (pow (sin kx) 2))) (+ (* 2/45 (/ 1 (pow (sin kx) 4))) (+ (* 2/3 (/ 1 (pow (sin kx) 6))) (/ 1 (pow (sin kx) 8))))))) (* -1/12 (* (sin kx) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))) (+ (* 1/5040 (/ 1 (sin kx))) (* 1/240 (/ 1 (pow (sin kx) 3)))))))))) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx))))))
#s(approx (sin ky) #s(hole binary64 ky))
#s(approx (sin ky) #s(hole binary64 (* ky (+ 1 (* -1/6 (pow ky 2))))))
#s(approx (sin ky) #s(hole binary64 (* ky (+ 1 (* (pow ky 2) (- (* 1/120 (pow ky 2)) 1/6))))))
#s(approx (sin ky) #s(hole binary64 (* ky (+ 1 (* (pow ky 2) (- (* (pow ky 2) (+ 1/120 (* -1/5040 (pow ky 2)))) 1/6))))))
#s(approx ky #s(hole binary64 ky))
#s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (sin kx)))
#s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (sin kx) (* 1/2 (/ (pow ky 2) (sin kx))))))
#s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (sin kx) (* (pow ky 2) (+ (* -1/2 (/ (* (pow ky 2) (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2))))) (sin kx))) (* 1/2 (/ 1 (sin kx))))))))
#s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (sin kx) (* (pow ky 2) (+ (* (pow ky 2) (+ (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (sin kx))) (* 1/2 (/ (* (pow ky 2) (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))))) (sin kx))))) (* 1/2 (/ 1 (sin kx))))))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (pow (sin kx) 2)))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (pow ky 2) (pow (sin kx) 2))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2)))) (pow (sin kx) 2))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3)))) (pow (sin kx) 2))))
#s(approx (pow (sin ky) 2) #s(hole binary64 (pow ky 2)))
#s(approx (pow (sin ky) 2) #s(hole binary64 (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2))))))
#s(approx (pow (sin ky) 2) #s(hole binary64 (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3))))))
#s(approx (pow (sin ky) 2) #s(hole binary64 (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* (pow ky 2) (+ 2/45 (* -1/315 (pow ky 2)))) 1/3))))))
#s(approx (sin ky) #s(hole binary64 (sin ky)))
#s(approx (pow (sin ky) 2) #s(hole binary64 (pow (sin ky) 2)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (* (* th (sin ky)) (sqrt (/ 1 (+ (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 (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* (sin ky) (sqrt (/ 1 (+ (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 (+ (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* (pow th 2) (+ (* -1/6 (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* 1/120 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ (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 (+ (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* (pow th 2) (+ (* -1/6 (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* (pow th 2) (+ (* -1/5040 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* 1/120 (* (sin ky) (sqrt (/ 1 (+ (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 th #s(hole binary64 th))
#s(approx (sin th) #s(hole binary64 (sin th)))
Calls

9 calls:

TimeVariablePointExpression
6.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)
5.0ms
th
@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)
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)
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)
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)

rewrite326.0ms (3.2%)

Memory
9.4MiB live, 338.4MiB allocated; 30ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
04322436
04482305
126952273
0114521933
Stop Event
iter limit
node limit
iter limit
Counts
81 → 164
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 th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (+ (sin th) (* (pow kx 2) (+ (* -1/2 (/ (sin th) (pow (sin ky) 2))) (* 1/2 (* (pow kx 2) (* (pow (sin ky) 2) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))))))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (+ (sin th) (* (pow kx 2) (+ (* -1/2 (/ (sin th) (pow (sin ky) 2))) (* (pow kx 2) (+ (* -1/2 (* (pow kx 2) (* (pow (sin ky) 2) (* (sin th) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))) (pow (sin ky) 2))) (+ (* 2/45 (/ 1 (pow (sin ky) 4))) (+ (* 2/3 (/ 1 (pow (sin ky) 6))) (/ 1 (pow (sin ky) 8))))))))) (* 1/2 (* (pow (sin ky) 2) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6))))))))))))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 1))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ 1 (* -1/2 (/ (pow kx 2) (pow (sin ky) 2))))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ 1 (* (pow kx 2) (- (* 1/2 (* (pow kx 2) (* (pow (sin ky) 2) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6))))))) (* 1/2 (/ 1 (pow (sin ky) 2))))))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ 1 (* (pow kx 2) (- (* (pow kx 2) (+ (* -1/2 (* (pow kx 2) (* (pow (sin ky) 2) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))) (pow (sin ky) 2))) (+ (* 2/45 (/ 1 (pow (sin ky) 4))) (+ (* 2/3 (/ 1 (pow (sin ky) 6))) (/ 1 (pow (sin ky) 8)))))))) (* 1/2 (* (pow (sin ky) 2) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))))))) (* 1/2 (/ 1 (pow (sin ky) 2))))))))
#s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (sin ky)))
#s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (sin ky) (* 1/2 (/ (pow kx 2) (sin ky))))))
#s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (sin ky) (* (pow kx 2) (+ (* -1/2 (/ (* (pow kx 2) (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2))))) (sin ky))) (* 1/2 (/ 1 (sin ky))))))))
#s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (sin ky) (* (pow kx 2) (+ (* (pow kx 2) (+ (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (sin ky))) (* 1/2 (/ (* (pow kx 2) (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2))))) (sin ky))))) (* 1/2 (/ 1 (sin ky))))))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (pow (sin ky) 2)))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (pow kx 2) (pow (sin ky) 2))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (* (pow kx 2) (+ 1 (* -1/3 (pow kx 2)))) (pow (sin ky) 2))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (* (pow kx 2) (+ 1 (* (pow kx 2) (- (* 2/45 (pow kx 2)) 1/3)))) (pow (sin ky) 2))))
#s(approx (pow (sin kx) 2) #s(hole binary64 (pow kx 2)))
#s(approx (pow (sin kx) 2) #s(hole binary64 (* (pow kx 2) (+ 1 (* -1/3 (pow kx 2))))))
#s(approx (pow (sin kx) 2) #s(hole binary64 (* (pow kx 2) (+ 1 (* (pow kx 2) (- (* 2/45 (pow kx 2)) 1/3))))))
#s(approx (pow (sin kx) 2) #s(hole binary64 (* (pow kx 2) (+ 1 (* (pow kx 2) (- (* (pow kx 2) (+ 2/45 (* -1/315 (pow kx 2)))) 1/3))))))
#s(approx (sin kx) #s(hole binary64 kx))
#s(approx (sin kx) #s(hole binary64 (* kx (+ 1 (* -1/6 (pow kx 2))))))
#s(approx (sin kx) #s(hole binary64 (* kx (+ 1 (* (pow kx 2) (- (* 1/120 (pow kx 2)) 1/6))))))
#s(approx (sin kx) #s(hole binary64 (* kx (+ 1 (* (pow kx 2) (- (* (pow kx 2) (+ 1/120 (* -1/5040 (pow kx 2)))) 1/6))))))
#s(approx kx #s(hole binary64 kx))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (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 (/ 1 (+ (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)) (sin kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (* ky (+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx))))) (/ (sin th) (sin kx))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (* ky (+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (* (pow ky 2) (+ (* 1/120 (/ (sin th) (sin kx))) (+ (* 1/12 (/ (sin th) (pow (sin kx) 3))) (* 1/2 (* (sin kx) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))))))))) (/ (sin th) (sin kx))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (* ky (+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (* (pow ky 2) (+ (* 1/120 (/ (sin th) (sin kx))) (+ (* 1/12 (/ (sin th) (pow (sin kx) 3))) (+ (* 1/2 (* (sin kx) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))) (* (pow ky 2) (+ (* -1/2 (* (sin kx) (* (sin th) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))) (pow (sin kx) 2))) (+ (* 2/45 (/ 1 (pow (sin kx) 4))) (+ (* 2/3 (/ 1 (pow (sin kx) 6))) (/ 1 (pow (sin kx) 8)))))))) (+ (* -1/12 (* (sin kx) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))) (+ (* -1/240 (/ (sin th) (pow (sin kx) 3))) (* -1/5040 (/ (sin th) (sin kx)))))))))))))) (/ (sin th) (sin kx))))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (/ ky (sin kx))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (* ky (+ (* -1 (* (pow ky 2) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx))))))
#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 (sin kx))) (+ (* 1/2 (* (sin kx) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))))) (* 1/12 (/ 1 (pow (sin kx) 3)))))) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx))))))
#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 (sin kx))) (+ (* 1/12 (/ 1 (pow (sin kx) 3))) (+ (* 1/2 (* (sin kx) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))))) (* (pow ky 2) (- (+ (* -1/2 (* (sin kx) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))) (pow (sin kx) 2))) (+ (* 2/45 (/ 1 (pow (sin kx) 4))) (+ (* 2/3 (/ 1 (pow (sin kx) 6))) (/ 1 (pow (sin kx) 8))))))) (* -1/12 (* (sin kx) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))) (+ (* 1/5040 (/ 1 (sin kx))) (* 1/240 (/ 1 (pow (sin kx) 3)))))))))) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx))))))
#s(approx (sin ky) #s(hole binary64 ky))
#s(approx (sin ky) #s(hole binary64 (* ky (+ 1 (* -1/6 (pow ky 2))))))
#s(approx (sin ky) #s(hole binary64 (* ky (+ 1 (* (pow ky 2) (- (* 1/120 (pow ky 2)) 1/6))))))
#s(approx (sin ky) #s(hole binary64 (* ky (+ 1 (* (pow ky 2) (- (* (pow ky 2) (+ 1/120 (* -1/5040 (pow ky 2)))) 1/6))))))
#s(approx ky #s(hole binary64 ky))
#s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (sin kx)))
#s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (sin kx) (* 1/2 (/ (pow ky 2) (sin kx))))))
#s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (sin kx) (* (pow ky 2) (+ (* -1/2 (/ (* (pow ky 2) (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2))))) (sin kx))) (* 1/2 (/ 1 (sin kx))))))))
#s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (sin kx) (* (pow ky 2) (+ (* (pow ky 2) (+ (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (sin kx))) (* 1/2 (/ (* (pow ky 2) (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))))) (sin kx))))) (* 1/2 (/ 1 (sin kx))))))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (pow (sin kx) 2)))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (pow ky 2) (pow (sin kx) 2))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2)))) (pow (sin kx) 2))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3)))) (pow (sin kx) 2))))
#s(approx (pow (sin ky) 2) #s(hole binary64 (pow ky 2)))
#s(approx (pow (sin ky) 2) #s(hole binary64 (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2))))))
#s(approx (pow (sin ky) 2) #s(hole binary64 (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3))))))
#s(approx (pow (sin ky) 2) #s(hole binary64 (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* (pow ky 2) (+ 2/45 (* -1/315 (pow ky 2)))) 1/3))))))
#s(approx (sin ky) #s(hole binary64 (sin ky)))
#s(approx (pow (sin ky) 2) #s(hole binary64 (pow (sin ky) 2)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (* (* th (sin ky)) (sqrt (/ 1 (+ (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 (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* (sin ky) (sqrt (/ 1 (+ (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 (+ (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* (pow th 2) (+ (* -1/6 (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* 1/120 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ (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 (+ (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* (pow th 2) (+ (* -1/6 (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* (pow th 2) (+ (* -1/5040 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* 1/120 (* (sin ky) (sqrt (/ 1 (+ (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 th #s(hole binary64 th))
#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 (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 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal 1 binary64))
(pow.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #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 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 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) (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)))
(sqrt.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
(hypot.f64 (fabs.f64 (sin.f64 kx)) (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)) (neg.f64 (sin.f64 ky)))
(hypot.f64 (fabs.f64 (sin.f64 kx)) (sin.f64 ky))
(hypot.f64 (fabs.f64 (sin.f64 ky)) (fabs.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)) (neg.f64 (sin.f64 kx)))
(hypot.f64 (fabs.f64 (sin.f64 ky)) (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))) (exp.f64 (log.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))) (sin.f64 kx))
(hypot.f64 (exp.f64 (log.f64 (sin.f64 kx))) (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))) (neg.f64 (sin.f64 ky)))
(hypot.f64 (exp.f64 (log.f64 (sin.f64 kx))) (sin.f64 ky))
(hypot.f64 (neg.f64 (sin.f64 kx)) (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)) (neg.f64 (sin.f64 ky)))
(hypot.f64 (neg.f64 (sin.f64 kx)) (sin.f64 ky))
(hypot.f64 (neg.f64 (sin.f64 ky)) (fabs.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)) (neg.f64 (sin.f64 kx)))
(hypot.f64 (neg.f64 (sin.f64 ky)) (sin.f64 kx))
(hypot.f64 (sin.f64 kx) (fabs.f64 (sin.f64 ky)))
(hypot.f64 (sin.f64 kx) (exp.f64 (log.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) (fabs.f64 (sin.f64 kx)))
(hypot.f64 (sin.f64 ky) (exp.f64 (log.f64 (sin.f64 kx))))
(hypot.f64 (sin.f64 ky) (neg.f64 (sin.f64 kx)))
(hypot.f64 (sin.f64 ky) (sin.f64 kx))
(exp.f64 (*.f64 (log.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #s(literal 1/2 binary64)))
(/.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 6 binary64)) (pow.f64 (sin.f64 kx) #s(literal 6 binary64))) (+.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 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 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 6 binary64)) (pow.f64 (sin.f64 ky) #s(literal 6 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 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
(/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 6 binary64)) (pow.f64 (sin.f64 ky) #s(literal 6 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 (sin.f64 kx)) (fabs.f64 (sin.f64 kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))
(fma.f64 (fabs.f64 (sin.f64 ky)) (fabs.f64 (sin.f64 ky)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))
(fma.f64 (exp.f64 (log.f64 (sin.f64 ky))) (exp.f64 (log.f64 (sin.f64 ky))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))
(fma.f64 (exp.f64 (log.f64 (sin.f64 kx))) (exp.f64 (log.f64 (sin.f64 kx))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))
(fma.f64 (neg.f64 (sin.f64 kx)) (neg.f64 (sin.f64 kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))
(fma.f64 (neg.f64 (sin.f64 ky)) (neg.f64 (sin.f64 ky)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))
(fma.f64 (sin.f64 kx) (sin.f64 kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))
(fma.f64 (sin.f64 ky) (sin.f64 ky) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))
(-.f64 (/.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
(+.f64 (/.f64 (pow.f64 (sin.f64 kx) #s(literal 6 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 (pow.f64 (sin.f64 ky) #s(literal 6 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 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))
(+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))
(*.f64 (fabs.f64 (sin.f64 kx)) (fabs.f64 (sin.f64 kx)))
(*.f64 (exp.f64 (log.f64 (sin.f64 kx))) (exp.f64 (log.f64 (sin.f64 kx))))
(*.f64 (neg.f64 (sin.f64 kx)) (neg.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 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(literal 1 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))))
(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))))
(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 (sin.f64 ky)) (fabs.f64 (sin.f64 ky)))
(*.f64 (exp.f64 (log.f64 (sin.f64 ky))) (exp.f64 (log.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 (log.f64 (sin.f64 ky))) #s(literal 2 binary64))
(pow.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) #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))))
(exp.f64 (*.f64 (log.f64 (sin.f64 ky)) #s(literal 2 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 (sin.f64 ky)) #s(literal 2 binary64))) (sinh.f64 (*.f64 (log.f64 (sin.f64 ky)) #s(literal 2 binary64))))
(sin.f64 th)
th
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (/.f64 (*.f64 (*.f64 kx kx) (sin.f64 th)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal -1/2 binary64) (sin.f64 th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (fma.f64 (*.f64 (pow.f64 (*.f64 kx (sin.f64 ky)) #s(literal 2 binary64)) (*.f64 (fma.f64 (pow.f64 (sin.f64 ky) #s(literal -6 binary64)) #s(literal 3/4 binary64) (*.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 1/3 binary64))) (sin.f64 th))) #s(literal 1/2 binary64) (/.f64 (*.f64 #s(literal -1/2 binary64) (sin.f64 th)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (*.f64 kx kx) (sin.f64 th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 (fma.f64 (pow.f64 (sin.f64 ky) #s(literal -6 binary64)) #s(literal 3/4 binary64) (*.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 1/3 binary64))) (sin.f64 th)) (*.f64 (*.f64 (pow.f64 (*.f64 kx (sin.f64 ky)) #s(literal 2 binary64)) (*.f64 (fma.f64 (/.f64 (fma.f64 (pow.f64 (sin.f64 ky) #s(literal -6 binary64)) #s(literal 3/4 binary64) (*.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 1/3 binary64))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal -1/2 binary64) (fma.f64 #s(literal 2/45 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) (fma.f64 #s(literal 2/3 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 binary64)) (pow.f64 (sin.f64 ky) #s(literal -8 binary64))))) (sin.f64 th))) #s(literal -1/2 binary64))) (*.f64 kx kx) (/.f64 (*.f64 #s(literal -1/2 binary64) (sin.f64 th)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (*.f64 kx kx) (sin.f64 th)))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(literal 1 binary64))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 (/.f64 (*.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1 binary64)))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (pow.f64 (*.f64 kx (sin.f64 ky)) #s(literal 2 binary64)) (fma.f64 (pow.f64 (sin.f64 ky) #s(literal -6 binary64)) #s(literal 3/4 binary64) (*.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 1/3 binary64)))) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)))) (*.f64 kx kx) #s(literal 1 binary64)))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (fma.f64 (pow.f64 (sin.f64 ky) #s(literal -6 binary64)) #s(literal 3/4 binary64) (*.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 1/3 binary64))) (*.f64 (*.f64 (pow.f64 (*.f64 kx (sin.f64 ky)) #s(literal 2 binary64)) (fma.f64 (/.f64 (fma.f64 (pow.f64 (sin.f64 ky) #s(literal -6 binary64)) #s(literal 3/4 binary64) (*.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 1/3 binary64))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal -1/2 binary64) (fma.f64 #s(literal 2/45 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) (fma.f64 #s(literal 2/3 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 binary64)) (pow.f64 (sin.f64 ky) #s(literal -8 binary64)))))) #s(literal -1/2 binary64))) (*.f64 kx kx) (*.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)))) (*.f64 kx kx) #s(literal 1 binary64)))
#s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sin.f64 ky))
#s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fma.f64 (/.f64 (*.f64 kx kx) (sin.f64 ky)) #s(literal 1/2 binary64) (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 (fma.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)) #s(literal 1/3 binary64)) (*.f64 kx kx)) #s(literal 1/2 binary64)) (sin.f64 ky)) (*.f64 kx kx) (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 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)) #s(literal 1/3 binary64))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (*.f64 kx kx)) (*.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)) #s(literal 1/3 binary64)))) (sin.f64 ky)) (*.f64 kx kx) (/.f64 #s(literal 1/2 binary64) (sin.f64 ky))) (*.f64 kx kx) (sin.f64 ky)))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 kx kx (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
#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) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
#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) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
#s(approx (pow (sin kx) 2) (*.f64 kx kx))
#s(approx (pow (sin kx) 2) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))
#s(approx (pow (sin kx) 2) (*.f64 (fma.f64 (-.f64 (*.f64 #s(literal 2/45 binary64) (*.f64 kx kx)) #s(literal 1/3 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))
#s(approx (pow (sin kx) 2) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -1/315 binary64) (*.f64 kx kx) #s(literal 2/45 binary64)) (*.f64 kx kx)) #s(literal 1/3 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))
#s(approx (sin kx) kx)
#s(approx (sin kx) (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 kx kx) #s(literal 1 binary64)) kx))
#s(approx (sin kx) (*.f64 (fma.f64 (-.f64 (*.f64 #s(literal 1/120 binary64) (*.f64 kx kx)) #s(literal 1/6 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) kx))
#s(approx (sin kx) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 kx kx) #s(literal 1/120 binary64)) (*.f64 kx kx)) #s(literal 1/6 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) kx))
#s(approx kx kx)
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)) (*.f64 (sin.f64 th) (sin.f64 ky))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (*.f64 (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)) (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)) (fma.f64 (sin.f64 kx) (sin.f64 kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
#s(approx (pow (sin kx) 2) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))
#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) (sin.f64 kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (fma.f64 (fma.f64 (/.f64 (sin.f64 th) (sin.f64 kx)) #s(literal -1/6 binary64) (/.f64 (*.f64 #s(literal -1/2 binary64) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))) (*.f64 ky ky) (/.f64 (sin.f64 th) (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) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) #s(literal -1/2 binary64) (fma.f64 (fma.f64 (/.f64 (sin.f64 th) (sin.f64 kx)) #s(literal 1/120 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) (sin.f64 kx)) (*.f64 (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -6 binary64)) #s(literal 3/4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64))) (sin.f64 th)) (/.f64 (*.f64 #s(literal 1/12 binary64) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))))) (*.f64 ky ky) (/.f64 (*.f64 #s(literal -1/6 binary64) (sin.f64 th)) (sin.f64 kx)))) (*.f64 ky ky) (/.f64 (sin.f64 th) (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) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) #s(literal -1/2 binary64) (fma.f64 (fma.f64 (/.f64 (sin.f64 th) (sin.f64 kx)) #s(literal 1/120 binary64) (fma.f64 #s(literal 1/12 binary64) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (sin.f64 kx)) (*.f64 (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -6 binary64)) #s(literal 3/4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64))) (sin.f64 th)) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (sin.f64 kx)) (*.f64 (fma.f64 (/.f64 (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -6 binary64)) #s(literal 3/4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64) (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 2/45 binary64) (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -6 binary64)) #s(literal 2/3 binary64) (pow.f64 (sin.f64 kx) #s(literal -8 binary64))))) (sin.f64 th)) (fma.f64 (*.f64 #s(literal -1/12 binary64) (sin.f64 kx)) (*.f64 (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -6 binary64)) #s(literal 3/4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64))) (sin.f64 th)) (fma.f64 #s(literal -1/240 binary64) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (/.f64 (*.f64 #s(literal -1/5040 binary64) (sin.f64 th)) (sin.f64 kx))))) (*.f64 ky ky))))) (*.f64 ky ky) (/.f64 (*.f64 #s(literal -1/6 binary64) (sin.f64 th)) (sin.f64 kx)))) (*.f64 ky ky) (/.f64 (sin.f64 th) (sin.f64 kx))) ky))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (sin.f64 kx)))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (*.f64 (fma.f64 (*.f64 #s(literal -1 binary64) (*.f64 ky ky)) (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -3 binary64)) #s(literal 1/2 binary64) (/.f64 #s(literal 1/6 binary64) (sin.f64 kx))) (pow.f64 (sin.f64 kx) #s(literal -1 binary64))) ky))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (*.f64 (fma.f64 (-.f64 (*.f64 (+.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (sin.f64 kx)) (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -6 binary64)) #s(literal 3/4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64))) (*.f64 (pow.f64 (sin.f64 kx) #s(literal -3 binary64)) #s(literal 1/12 binary64))) (/.f64 #s(literal 1/120 binary64) (sin.f64 kx))) (*.f64 ky ky)) (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -3 binary64)) #s(literal 1/2 binary64) (/.f64 #s(literal 1/6 binary64) (sin.f64 kx)))) (*.f64 ky ky) (pow.f64 (sin.f64 kx) #s(literal -1 binary64))) ky))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (*.f64 (fma.f64 (-.f64 (*.f64 (+.f64 (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -3 binary64)) #s(literal 1/12 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) (sin.f64 kx)) (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -6 binary64)) #s(literal 3/4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64))) (*.f64 (-.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (sin.f64 kx)) (fma.f64 (/.f64 (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -6 binary64)) #s(literal 3/4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64) (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 2/45 binary64) (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -6 binary64)) #s(literal 2/3 binary64) (pow.f64 (sin.f64 kx) #s(literal -8 binary64))))) (*.f64 (*.f64 #s(literal -1/12 binary64) (sin.f64 kx)) (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -6 binary64)) #s(literal 3/4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64))))) (fma.f64 #s(literal 1/240 binary64) (pow.f64 (sin.f64 kx) #s(literal -3 binary64)) (/.f64 #s(literal 1/5040 binary64) (sin.f64 kx)))) (*.f64 ky ky)))) (/.f64 #s(literal 1/120 binary64) (sin.f64 kx))) (*.f64 ky ky)) (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -3 binary64)) #s(literal 1/2 binary64) (/.f64 #s(literal 1/6 binary64) (sin.f64 kx)))) (*.f64 ky ky) (pow.f64 (sin.f64 kx) #s(literal -1 binary64))) ky))
#s(approx (sin ky) ky)
#s(approx (sin ky) (*.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky))
#s(approx (sin ky) (*.f64 (fma.f64 (-.f64 (*.f64 (*.f64 ky ky) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (*.f64 ky ky) #s(literal 1 binary64)) ky))
#s(approx (sin ky) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (*.f64 ky ky)) #s(literal 1/6 binary64)) (*.f64 ky ky) #s(literal 1 binary64)) ky))
#s(approx ky ky)
#s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sin.f64 kx))
#s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fma.f64 (/.f64 (*.f64 ky ky) (sin.f64 kx)) #s(literal 1/2 binary64) (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 (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -2 binary64)) #s(literal 1/4 binary64) #s(literal 1/3 binary64)) (*.f64 ky ky)) #s(literal 1/2 binary64)) (sin.f64 kx)) (*.f64 ky ky) (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 (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -2 binary64)) #s(literal 1/4 binary64) #s(literal 1/3 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (*.f64 ky ky)) (*.f64 #s(literal -1/2 binary64) (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -2 binary64)) #s(literal 1/4 binary64) #s(literal 1/3 binary64)))) (sin.f64 kx)) (*.f64 ky ky) (/.f64 #s(literal 1/2 binary64) (sin.f64 kx))) (*.f64 ky ky) (sin.f64 kx)))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 ky ky (pow.f64 (sin.f64 kx) #s(literal 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) (pow.f64 (sin.f64 kx) #s(literal 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) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))
#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 (pow (sin ky) 2) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (*.f64 (sin.f64 ky) th) (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 th th) (sin.f64 ky))) (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)) (*.f64 (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)) (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 #s(literal -1/6 binary64) (sin.f64 ky)) (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)) (*.f64 (*.f64 #s(literal 1/120 binary64) (*.f64 (*.f64 th th) (sin.f64 ky))) (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)))) (*.f64 th th) (*.f64 (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)) (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 #s(literal -1/5040 binary64) (*.f64 (*.f64 th th) (sin.f64 ky))) (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)) (*.f64 (*.f64 #s(literal 1/120 binary64) (sin.f64 ky)) (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)))) (*.f64 th th) (*.f64 (*.f64 #s(literal -1/6 binary64) (sin.f64 ky)) (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)))) (*.f64 th th) (*.f64 (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)) (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 th th)
#s(approx (sin th) (sin.f64 th))

eval27.0ms (0.3%)

Memory
-27.0MiB live, 63.2MiB allocated; 8ms collecting garbage
Compiler

Compiled 4 471 to 910 computations (79.6% saved)

prune233.0ms (2.3%)

Memory
10.9MiB live, 378.7MiB allocated; 62ms collecting garbage
Pruning

11 alts after pruning (11 fresh and 0 done)

PrunedKeptTotal
New16411175
Fresh000
Picked101
Done000
Total16511176
Accuracy
99.9%
Counts
176 → 11
Alt Table
Click to see full alt table
StatusAccuracyProgram
94.5%
(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))
84.2%
(*.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))
43.2%
(*.f64 (/.f64 (sin.f64 ky) (/.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 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (sin.f64 th))
83.8%
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) (sin.f64 th))
82.5%
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (/.f64 (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx))) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
91.2%
(*.f64 (/.f64 (sin.f64 ky) (exp.f64 (*.f64 (log.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #s(literal 1/2 binary64)))) (sin.f64 th))
48.3%
(*.f64 (/.f64 #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)) (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%
(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (*.f64 (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)) (sin.f64 ky))) (sin.f64 th))
23.3%
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (/.f64 (*.f64 (*.f64 kx kx) (sin.f64 th)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal -1/2 binary64) (sin.f64 th)))
26.0%
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (fma.f64 (fma.f64 (/.f64 (sin.f64 th) (sin.f64 kx)) #s(literal -1/6 binary64) (/.f64 (*.f64 #s(literal -1/2 binary64) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))) (*.f64 ky ky) (/.f64 (sin.f64 th) (sin.f64 kx))) ky))
94.3%
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)) (*.f64 (sin.f64 th) (sin.f64 ky))))
Compiler

Compiled 638 to 436 computations (31.7% saved)

series194.0ms (1.9%)

Memory
-0.7MiB live, 329.6MiB allocated; 20ms collecting garbage
Counts
41 → 261
Calls
Call 1
Inputs
(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (*.f64 (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)) (sin.f64 ky))) (sin.f64 th))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (*.f64 (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)) (sin.f64 ky)))
(*.f64 (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)) (sin.f64 ky))
(pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64))
(hypot.f64 (sin.f64 kx) (sin.f64 ky))
(sin.f64 kx)
kx
(sin.f64 ky)
ky
#s(literal -1 binary64)
(sin.f64 th)
th
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)) (*.f64 (sin.f64 th) (sin.f64 ky))))
(*.f64 (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)) (*.f64 (sin.f64 th) (sin.f64 ky)))
(*.f64 (sin.f64 th) (sin.f64 ky))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (/.f64 (*.f64 (*.f64 kx kx) (sin.f64 th)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal -1/2 binary64) (sin.f64 th)))
(fma.f64 (/.f64 (*.f64 (*.f64 kx kx) (sin.f64 th)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal -1/2 binary64) (sin.f64 th))
(/.f64 (*.f64 (*.f64 kx kx) (sin.f64 th)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))
(*.f64 (*.f64 kx kx) (sin.f64 th))
(*.f64 kx kx)
(pow.f64 (sin.f64 ky) #s(literal 2 binary64))
#s(literal 2 binary64)
#s(literal -1/2 binary64)
(*.f64 (/.f64 (sin.f64 ky) (exp.f64 (*.f64 (log.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #s(literal 1/2 binary64)))) (sin.f64 th))
(/.f64 (sin.f64 ky) (exp.f64 (*.f64 (log.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #s(literal 1/2 binary64))))
(exp.f64 (*.f64 (log.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #s(literal 1/2 binary64)))
(*.f64 (log.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #s(literal 1/2 binary64))
(log.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
(fma.f64 (sin.f64 kx) (sin.f64 kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))
#s(literal 1/2 binary64)
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (-.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 (/.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))))
(sqrt.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(-.f64 (/.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (-.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 4 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 4 binary64))
#s(literal 4 binary64)
(-.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))
(pow.f64 (sin.f64 kx) #s(literal 2 binary64))
(/.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
(pow.f64 (sin.f64 ky) #s(literal 4 binary64))
Outputs
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (sin th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (+ (sin th) (* (pow kx 2) (+ (* -1/2 (/ (sin th) (pow (sin ky) 2))) (* 1/2 (* (pow kx 2) (* (pow (sin ky) 2) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))))))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (+ (sin th) (* (pow kx 2) (+ (* -1/2 (/ (sin th) (pow (sin ky) 2))) (* (pow kx 2) (+ (* -1/2 (* (pow kx 2) (* (pow (sin ky) 2) (* (sin th) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))) (pow (sin ky) 2))) (+ (* 2/45 (/ 1 (pow (sin ky) 4))) (+ (* 2/3 (/ 1 (pow (sin ky) 6))) (/ 1 (pow (sin ky) 8))))))))) (* 1/2 (* (pow (sin ky) 2) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6))))))))))))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 1))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ 1 (* -1/2 (/ (pow kx 2) (pow (sin ky) 2))))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ 1 (* (pow kx 2) (- (* 1/2 (* (pow kx 2) (* (pow (sin ky) 2) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6))))))) (* 1/2 (/ 1 (pow (sin ky) 2))))))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ 1 (* (pow kx 2) (- (* (pow kx 2) (+ (* -1/2 (* (pow kx 2) (* (pow (sin ky) 2) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))) (pow (sin ky) 2))) (+ (* 2/45 (/ 1 (pow (sin ky) 4))) (+ (* 2/3 (/ 1 (pow (sin ky) 6))) (/ 1 (pow (sin ky) 8)))))))) (* 1/2 (* (pow (sin ky) 2) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))))))) (* 1/2 (/ 1 (pow (sin ky) 2))))))))
#s(approx (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (sin ky)) #s(hole binary64 1))
#s(approx (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (sin ky)) #s(hole binary64 (+ 1 (* -1/2 (/ (pow kx 2) (pow (sin ky) 2))))))
#s(approx (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (sin ky)) #s(hole binary64 (+ 1 (* (pow kx 2) (- (* 1/2 (* (pow kx 2) (* (pow (sin ky) 2) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6))))))) (* 1/2 (/ 1 (pow (sin ky) 2))))))))
#s(approx (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (sin ky)) #s(hole binary64 (+ 1 (* (pow kx 2) (- (* (pow kx 2) (+ (* -1/2 (* (pow kx 2) (* (pow (sin ky) 2) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))) (pow (sin ky) 2))) (+ (* 2/45 (/ 1 (pow (sin ky) 4))) (+ (* 2/3 (/ 1 (pow (sin ky) 6))) (/ 1 (pow (sin ky) 8)))))))) (* 1/2 (* (pow (sin ky) 2) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))))))) (* 1/2 (/ 1 (pow (sin ky) 2))))))))
#s(approx (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) #s(hole binary64 (/ 1 (sin ky))))
#s(approx (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) #s(hole binary64 (+ (* -1/2 (/ (pow kx 2) (pow (sin ky) 3))) (/ 1 (sin ky)))))
#s(approx (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) #s(hole binary64 (+ (* (pow kx 2) (- (* 1/2 (* (pow kx 2) (* (sin ky) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6))))))) (* 1/2 (/ 1 (pow (sin ky) 3))))) (/ 1 (sin ky)))))
#s(approx (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) #s(hole binary64 (+ (* (pow kx 2) (- (* (pow kx 2) (+ (* -1/2 (* (pow kx 2) (* (sin ky) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))) (pow (sin ky) 2))) (+ (* 2/45 (/ 1 (pow (sin ky) 4))) (+ (* 2/3 (/ 1 (pow (sin ky) 6))) (/ 1 (pow (sin ky) 8)))))))) (* 1/2 (* (sin ky) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))))))) (* 1/2 (/ 1 (pow (sin ky) 3))))) (/ 1 (sin ky)))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) #s(hole binary64 (sin ky)))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) #s(hole binary64 (+ (sin ky) (* 1/2 (/ (pow kx 2) (sin ky))))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) #s(hole binary64 (+ (sin ky) (* (pow kx 2) (+ (* -1/2 (/ (* (pow kx 2) (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2))))) (sin ky))) (* 1/2 (/ 1 (sin ky))))))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) #s(hole binary64 (+ (sin ky) (* (pow kx 2) (+ (* (pow kx 2) (+ (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (sin ky))) (* 1/2 (/ (* (pow kx 2) (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2))))) (sin ky))))) (* 1/2 (/ 1 (sin ky))))))))
#s(approx (sin kx) #s(hole binary64 kx))
#s(approx (sin kx) #s(hole binary64 (* kx (+ 1 (* -1/6 (pow kx 2))))))
#s(approx (sin kx) #s(hole binary64 (* kx (+ 1 (* (pow kx 2) (- (* 1/120 (pow kx 2)) 1/6))))))
#s(approx (sin kx) #s(hole binary64 (* kx (+ 1 (* (pow kx 2) (- (* (pow kx 2) (+ 1/120 (* -1/5040 (pow kx 2)))) 1/6))))))
#s(approx kx #s(hole binary64 kx))
#s(approx (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (* (sin th) (sin ky))) #s(hole binary64 (sin th)))
#s(approx (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (* (sin th) (sin ky))) #s(hole binary64 (+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2))))))
#s(approx (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (* (sin th) (sin ky))) #s(hole binary64 (+ (sin th) (* (pow kx 2) (+ (* -1/2 (/ (sin th) (pow (sin ky) 2))) (* 1/2 (* (pow kx 2) (* (pow (sin ky) 2) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))))))))))))
#s(approx (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (* (sin th) (sin ky))) #s(hole binary64 (+ (sin th) (* (pow kx 2) (+ (* -1/2 (/ (sin th) (pow (sin ky) 2))) (* (pow kx 2) (+ (* -1/2 (* (pow kx 2) (* (pow (sin ky) 2) (* (sin th) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))) (pow (sin ky) 2))) (+ (* 2/45 (/ 1 (pow (sin ky) 4))) (+ (* 2/3 (/ 1 (pow (sin ky) 6))) (/ 1 (pow (sin ky) 8))))))))) (* 1/2 (* (pow (sin ky) 2) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6))))))))))))))
#s(approx (+ (* (/ (* (* kx kx) (sin th)) (pow (sin ky) 2)) -1/2) (sin th)) #s(hole binary64 (sin th)))
#s(approx (+ (* (/ (* (* kx kx) (sin th)) (pow (sin ky) 2)) -1/2) (sin th)) #s(hole binary64 (+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2))))))
#s(approx (/ (* (* kx kx) (sin th)) (pow (sin ky) 2)) #s(hole binary64 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2))))
#s(approx (* (* kx kx) (sin th)) #s(hole binary64 (* (pow kx 2) (sin th))))
#s(approx (* kx kx) #s(hole binary64 (pow kx 2)))
#s(approx (* (/ (sin ky) (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2))) (sin th)) #s(hole binary64 (sin th)))
#s(approx (* (/ (sin ky) (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2))) (sin th)) #s(hole binary64 (+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2))))))
#s(approx (* (/ (sin ky) (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2))) (sin th)) #s(hole binary64 (+ (sin th) (* (pow kx 2) (+ (* -1/2 (/ (sin th) (pow (sin ky) 2))) (* 1/2 (* (pow kx 2) (* (pow (sin ky) 2) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))))))))))))
#s(approx (* (/ (sin ky) (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2))) (sin th)) #s(hole binary64 (+ (sin th) (* (pow kx 2) (+ (* -1/2 (/ (sin th) (pow (sin ky) 2))) (* (pow kx 2) (+ (* -1/2 (* (pow kx 2) (* (pow (sin ky) 2) (* (sin th) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))) (pow (sin ky) 2))) (+ (* 2/45 (/ 1 (pow (sin ky) 4))) (+ (* 2/3 (/ 1 (pow (sin ky) 6))) (/ 1 (pow (sin ky) 8))))))))) (* 1/2 (* (pow (sin ky) 2) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6))))))))))))))
#s(approx (/ (sin ky) (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2))) #s(hole binary64 1))
#s(approx (/ (sin ky) (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2))) #s(hole binary64 (+ 1 (* -1/2 (/ (pow kx 2) (pow (sin ky) 2))))))
#s(approx (/ (sin ky) (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2))) #s(hole binary64 (+ 1 (* (pow kx 2) (- (* 1/2 (* (pow kx 2) (* (pow (sin ky) 2) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6))))))) (* 1/2 (/ 1 (pow (sin ky) 2))))))))
#s(approx (/ (sin ky) (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2))) #s(hole binary64 (+ 1 (* (pow kx 2) (- (* (pow kx 2) (+ (* -1/2 (* (pow kx 2) (* (pow (sin ky) 2) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))) (pow (sin ky) 2))) (+ (* 2/45 (/ 1 (pow (sin ky) 4))) (+ (* 2/3 (/ 1 (pow (sin ky) 6))) (/ 1 (pow (sin ky) 8)))))))) (* 1/2 (* (pow (sin ky) 2) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))))))) (* 1/2 (/ 1 (pow (sin ky) 2))))))))
#s(approx (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2)) #s(hole binary64 (sin ky)))
#s(approx (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2)) #s(hole binary64 (+ (sin ky) (* 1/2 (/ (pow kx 2) (sin ky))))))
#s(approx (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2)) #s(hole binary64 (+ (sin ky) (* (pow kx 2) (+ (* -1/2 (/ (* (pow kx 2) (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2))))) (sin ky))) (* 1/2 (/ 1 (sin ky))))))))
#s(approx (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2)) #s(hole binary64 (+ (sin ky) (* (pow kx 2) (+ (* (pow kx 2) (+ (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (sin ky))) (* 1/2 (/ (* (pow kx 2) (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2))))) (sin ky))))) (* 1/2 (/ 1 (sin ky))))))))
#s(approx (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2) #s(hole binary64 (* 1/2 (log (pow (sin ky) 2)))))
#s(approx (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2) #s(hole binary64 (+ (* 1/2 (log (pow (sin ky) 2))) (* 1/2 (/ (pow kx 2) (pow (sin ky) 2))))))
#s(approx (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2) #s(hole binary64 (+ (* 1/2 (log (pow (sin ky) 2))) (* (pow kx 2) (+ (* -1/48 (* (pow kx 2) (+ (* 8 (/ 1 (pow (sin ky) 2))) (* 12 (/ 1 (pow (sin ky) 4)))))) (* 1/2 (/ 1 (pow (sin ky) 2))))))))
#s(approx (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2) #s(hole binary64 (+ (* 1/2 (log (pow (sin ky) 2))) (* (pow kx 2) (+ (* (pow kx 2) (+ (* -1/48 (+ (* 8 (/ 1 (pow (sin ky) 2))) (* 12 (/ 1 (pow (sin ky) 4))))) (* 1/1440 (* (pow kx 2) (+ (* 240 (/ 1 (pow (sin ky) 4))) (+ (* 240 (/ 1 (pow (sin ky) 6))) (* 32 (/ 1 (pow (sin ky) 2))))))))) (* 1/2 (/ 1 (pow (sin ky) 2))))))))
#s(approx (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) #s(hole binary64 (log (pow (sin ky) 2))))
#s(approx (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) #s(hole binary64 (+ (log (pow (sin ky) 2)) (/ (pow kx 2) (pow (sin ky) 2)))))
#s(approx (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) #s(hole binary64 (+ (log (pow (sin ky) 2)) (* (pow kx 2) (+ (* -1/24 (* (pow kx 2) (+ (* 8 (/ 1 (pow (sin ky) 2))) (* 12 (/ 1 (pow (sin ky) 4)))))) (/ 1 (pow (sin ky) 2)))))))
#s(approx (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) #s(hole binary64 (+ (log (pow (sin ky) 2)) (* (pow kx 2) (+ (* (pow kx 2) (+ (* -1/24 (+ (* 8 (/ 1 (pow (sin ky) 2))) (* 12 (/ 1 (pow (sin ky) 4))))) (* 1/720 (* (pow kx 2) (+ (* 32 (/ 1 (pow (sin ky) 2))) (+ (* 240 (/ 1 (pow (sin ky) 6))) (* 240 (/ 1 (pow (sin ky) 4))))))))) (/ 1 (pow (sin ky) 2)))))))
#s(approx (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) #s(hole binary64 (pow (sin ky) 2)))
#s(approx (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) #s(hole binary64 (+ (pow kx 2) (pow (sin ky) 2))))
#s(approx (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) #s(hole binary64 (+ (* (pow kx 2) (+ 1 (* -1/3 (pow kx 2)))) (pow (sin ky) 2))))
#s(approx (+ (* (sin kx) (sin kx)) (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 (* (/ (sin ky) (sqrt (- (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))) (sin th)) #s(hole binary64 (sin th)))
#s(approx (* (/ (sin ky) (sqrt (- (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))) (sin th)) #s(hole binary64 (+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2))))))
#s(approx (* (/ (sin ky) (sqrt (- (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))) (sin th)) #s(hole binary64 (+ (sin th) (* (pow kx 2) (+ (* -1/2 (/ (sin th) (pow (sin ky) 2))) (* 1/2 (* (pow kx 2) (* (pow (sin ky) 2) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))))))))))))
#s(approx (* (/ (sin ky) (sqrt (- (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))) (sin th)) #s(hole binary64 (+ (sin th) (* (pow kx 2) (+ (* -1/2 (/ (sin th) (pow (sin ky) 2))) (* (pow kx 2) (+ (* -1/2 (* (pow kx 2) (* (pow (sin ky) 2) (* (sin th) (+ (* -1 (/ (- 1/3 (/ 1 (pow (sin ky) 2))) (pow (sin ky) 6))) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))) (pow (sin ky) 2))) (+ (* 2/45 (/ 1 (pow (sin ky) 4))) (/ 1 (pow (sin ky) 6))))))))) (* 1/2 (* (pow (sin ky) 2) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6))))))))))))))
#s(approx (/ (sin ky) (sqrt (- (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 1))
#s(approx (/ (sin ky) (sqrt (- (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (+ 1 (* -1/2 (/ (pow kx 2) (pow (sin ky) 2))))))
#s(approx (/ (sin ky) (sqrt (- (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (+ 1 (* (pow kx 2) (- (* 1/2 (* (pow kx 2) (* (pow (sin ky) 2) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6))))))) (* 1/2 (/ 1 (pow (sin ky) 2))))))))
#s(approx (/ (sin ky) (sqrt (- (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (+ 1 (* (pow kx 2) (- (* (pow kx 2) (+ (* -1/2 (* (pow kx 2) (* (pow (sin ky) 2) (+ (* -1 (/ (- 1/3 (/ 1 (pow (sin ky) 2))) (pow (sin ky) 6))) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))) (pow (sin ky) 2))) (+ (* 2/45 (/ 1 (pow (sin ky) 4))) (/ 1 (pow (sin ky) 6)))))))) (* 1/2 (* (pow (sin ky) 2) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))))))) (* 1/2 (/ 1 (pow (sin ky) 2))))))))
#s(approx (sqrt (- (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (sin ky)))
#s(approx (sqrt (- (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (+ (sin ky) (* 1/2 (/ (pow kx 2) (sin ky))))))
#s(approx (sqrt (- (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (+ (sin ky) (* (pow kx 2) (+ (* -1/2 (/ (* (pow kx 2) (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2))))) (sin ky))) (* 1/2 (/ 1 (sin ky))))))))
#s(approx (sqrt (- (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (+ (sin ky) (* (pow kx 2) (+ (* (pow kx 2) (+ (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (sin ky))) (* 1/2 (/ (* (pow kx 2) (- (+ 2/45 (+ (* -1 (/ (- 1/3 (/ 1 (pow (sin ky) 2))) (pow (sin ky) 2))) (* 2/3 (/ 1 (pow (sin ky) 2))))) (+ (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2))) (+ (* 1/3 (/ 1 (pow (sin ky) 2))) (/ 1 (pow (sin ky) 4)))))) (sin ky))))) (* 1/2 (/ 1 (sin ky))))))))
#s(approx (- (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (pow (sin ky) 2)))
#s(approx (- (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (- (pow kx 2) (* -1 (pow (sin ky) 2)))))
#s(approx (- (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (- (* (pow kx 2) (+ 1 (* -1/3 (pow kx 2)))) (* -1 (pow (sin ky) 2)))))
#s(approx (- (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (- (* (pow kx 2) (+ 1 (* (pow kx 2) (- (* (pow kx 2) (- (+ 2/45 (+ (* -1 (/ (- 1/3 (/ 1 (pow (sin ky) 2))) (pow (sin ky) 2))) (* 2/3 (/ 1 (pow (sin ky) 2))))) (+ (* 1/3 (/ 1 (pow (sin ky) 2))) (/ 1 (pow (sin ky) 4))))) 1/3)))) (* -1 (pow (sin ky) 2)))))
#s(approx (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (* -1 (/ (pow kx 4) (pow (sin ky) 2)))))
#s(approx (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (* (pow kx 4) (- (* (pow kx 2) (- (* 2/3 (/ 1 (pow (sin ky) 2))) (/ 1 (pow (sin ky) 4)))) (/ 1 (pow (sin ky) 2))))))
#s(approx (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (* (pow kx 4) (- (* (pow kx 2) (- (+ (* 2/3 (/ 1 (pow (sin ky) 2))) (* (pow kx 2) (- (* 1/3 (/ 1 (pow (sin ky) 4))) (+ (* -1 (/ (- (* 2/3 (/ 1 (pow (sin ky) 2))) (/ 1 (pow (sin ky) 4))) (pow (sin ky) 2))) (* 1/5 (/ 1 (pow (sin ky) 2))))))) (/ 1 (pow (sin ky) 4)))) (/ 1 (pow (sin ky) 2))))))
#s(approx (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (* (pow kx 4) (- (* (pow kx 2) (- (+ (* 2/3 (/ 1 (pow (sin ky) 2))) (* (pow kx 2) (- (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* (pow kx 2) (- (* 34/945 (/ 1 (pow (sin ky) 2))) (+ (* -1 (/ (- (* 1/3 (/ 1 (pow (sin ky) 4))) (+ (* -1 (/ (- (* 2/3 (/ 1 (pow (sin ky) 2))) (/ 1 (pow (sin ky) 4))) (pow (sin ky) 2))) (* 1/5 (/ 1 (pow (sin ky) 2))))) (pow (sin ky) 2))) (+ (* 2/45 (/ 1 (pow (sin ky) 4))) (* 1/3 (/ (- (* 2/3 (/ 1 (pow (sin ky) 2))) (/ 1 (pow (sin ky) 4))) (pow (sin ky) 2)))))))) (+ (* -1 (/ (- (* 2/3 (/ 1 (pow (sin ky) 2))) (/ 1 (pow (sin ky) 4))) (pow (sin ky) 2))) (* 1/5 (/ 1 (pow (sin ky) 2))))))) (/ 1 (pow (sin ky) 4)))) (/ 1 (pow (sin ky) 2))))))
#s(approx (pow (sin kx) 4) #s(hole binary64 (pow kx 4)))
#s(approx (pow (sin kx) 4) #s(hole binary64 (* (pow kx 4) (+ 1 (* -2/3 (pow kx 2))))))
#s(approx (pow (sin kx) 4) #s(hole binary64 (* (pow kx 4) (+ 1 (* (pow kx 2) (- (* 1/5 (pow kx 2)) 2/3))))))
#s(approx (pow (sin kx) 4) #s(hole binary64 (* (pow kx 4) (+ 1 (* (pow kx 2) (- (* (pow kx 2) (+ 1/5 (* -34/945 (pow kx 2)))) 2/3))))))
#s(approx (- (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (* -1 (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 (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (* -1 (pow (sin ky) 2))))
#s(approx (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (* -1 (pow kx 2)) (* -1 (pow (sin ky) 2)))))
#s(approx (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (* -1 (pow (sin ky) 2)) (* (pow kx 2) (- (* (pow kx 2) (- 1/3 (/ 1 (pow (sin ky) 2)))) 1)))))
#s(approx (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (* -1 (pow (sin ky) 2)) (* (pow kx 2) (- (* (pow kx 2) (- (+ 1/3 (* (pow kx 2) (- (* 1/3 (/ 1 (pow (sin ky) 2))) (+ 2/45 (* -1 (/ (- 1/3 (/ 1 (pow (sin ky) 2))) (pow (sin ky) 2))))))) (/ 1 (pow (sin ky) 2)))) 1)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (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 (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
#s(approx (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (sin ky)) #s(hole binary64 (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
#s(approx (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) #s(hole binary64 (sqrt (/ 1 (+ (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 (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (* (sin th) (sin ky))) #s(hole binary64 (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
#s(approx (+ (* (/ (* (* kx kx) (sin th)) (pow (sin ky) 2)) -1/2) (sin th)) #s(hole binary64 (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2)))))
#s(approx (+ (* (/ (* (* kx kx) (sin th)) (pow (sin ky) 2)) -1/2) (sin th)) #s(hole binary64 (* (pow kx 2) (+ (* -1/2 (/ (sin th) (pow (sin ky) 2))) (/ (sin th) (pow kx 2))))))
#s(approx (* (/ (sin ky) (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2))) (sin th)) #s(hole binary64 (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
#s(approx (/ (sin ky) (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2))) #s(hole binary64 (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
#s(approx (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2)) #s(hole binary64 (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
#s(approx (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2) #s(hole binary64 (* 1/2 (log (+ (pow (sin kx) 2) (pow (sin ky) 2))))))
#s(approx (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) #s(hole binary64 (log (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
#s(approx (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) #s(hole binary64 (+ (pow (sin kx) 2) (pow (sin ky) 2))))
#s(approx (* (/ (sin ky) (sqrt (- (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))) (sin th)) #s(hole binary64 (* (* (sin ky) (sin th)) (sqrt (/ 1 (- (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))))))
#s(approx (/ (sin ky) (sqrt (- (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (* (sin ky) (sqrt (/ 1 (- (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))))))
#s(approx (sqrt (- (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (sqrt (- (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))))
#s(approx (- (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (- (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))))))
#s(approx (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))
#s(approx (pow (sin kx) 4) #s(hole binary64 (pow (sin kx) 4)))
#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 (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (/ (pow (sin ky) 4) (- (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 (/ (* ky (sin th)) (sin kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (* ky (+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx))))) (/ (sin th) (sin kx))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (* ky (+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (* (pow ky 2) (+ (* 1/120 (/ (sin th) (sin kx))) (+ (* 1/12 (/ (sin th) (pow (sin kx) 3))) (* 1/2 (* (sin kx) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))))))))) (/ (sin th) (sin kx))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (* ky (+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (* (pow ky 2) (+ (* 1/120 (/ (sin th) (sin kx))) (+ (* 1/12 (/ (sin th) (pow (sin kx) 3))) (+ (* 1/2 (* (sin kx) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))) (* (pow ky 2) (+ (* -1/2 (* (sin kx) (* (sin th) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))) (pow (sin kx) 2))) (+ (* 2/45 (/ 1 (pow (sin kx) 4))) (+ (* 2/3 (/ 1 (pow (sin kx) 6))) (/ 1 (pow (sin kx) 8)))))))) (+ (* -1/12 (* (sin kx) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))) (+ (* -1/240 (/ (sin th) (pow (sin kx) 3))) (* -1/5040 (/ (sin th) (sin kx)))))))))))))) (/ (sin th) (sin kx))))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (/ ky (sin kx))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (* ky (+ (* -1 (* (pow ky 2) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx))))))
#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 (sin kx))) (+ (* 1/2 (* (sin kx) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))))) (* 1/12 (/ 1 (pow (sin kx) 3)))))) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx))))))
#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 (sin kx))) (+ (* 1/12 (/ 1 (pow (sin kx) 3))) (+ (* 1/2 (* (sin kx) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))))) (* (pow ky 2) (- (+ (* -1/2 (* (sin kx) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))) (pow (sin kx) 2))) (+ (* 2/45 (/ 1 (pow (sin kx) 4))) (+ (* 2/3 (/ 1 (pow (sin kx) 6))) (/ 1 (pow (sin kx) 8))))))) (* -1/12 (* (sin kx) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))) (+ (* 1/5040 (/ 1 (sin kx))) (* 1/240 (/ 1 (pow (sin kx) 3)))))))))) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx))))))
#s(approx (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (sin ky)) #s(hole binary64 (/ ky (sin kx))))
#s(approx (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (sin ky)) #s(hole binary64 (* ky (+ (* -1 (* (pow ky 2) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx))))))
#s(approx (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (sin ky)) #s(hole binary64 (* ky (+ (* (pow ky 2) (- (* (pow ky 2) (+ (* 1/120 (/ 1 (sin kx))) (+ (* 1/2 (* (sin kx) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))))) (* 1/12 (/ 1 (pow (sin kx) 3)))))) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx))))))
#s(approx (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (sin ky)) #s(hole binary64 (* ky (+ (* (pow ky 2) (- (* (pow ky 2) (+ (* 1/120 (/ 1 (sin kx))) (+ (* 1/12 (/ 1 (pow (sin kx) 3))) (+ (* 1/2 (* (sin kx) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))))) (* (pow ky 2) (- (+ (* -1/2 (* (sin kx) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))) (pow (sin kx) 2))) (+ (* 2/45 (/ 1 (pow (sin kx) 4))) (+ (* 2/3 (/ 1 (pow (sin kx) 6))) (/ 1 (pow (sin kx) 8))))))) (* -1/12 (* (sin kx) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))) (+ (* 1/5040 (/ 1 (sin kx))) (* 1/240 (/ 1 (pow (sin kx) 3)))))))))) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx))))))
#s(approx (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) #s(hole binary64 (/ 1 (sin kx))))
#s(approx (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) #s(hole binary64 (+ (* -1/2 (/ (pow ky 2) (pow (sin kx) 3))) (/ 1 (sin kx)))))
#s(approx (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) #s(hole binary64 (+ (* (pow ky 2) (- (* 1/2 (* (pow ky 2) (* (sin kx) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))) (* 1/2 (/ 1 (pow (sin kx) 3))))) (/ 1 (sin kx)))))
#s(approx (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) #s(hole binary64 (+ (* (pow ky 2) (- (* (pow ky 2) (+ (* -1/2 (* (pow ky 2) (* (sin kx) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))) (pow (sin kx) 2))) (+ (* 2/45 (/ 1 (pow (sin kx) 4))) (+ (* 2/3 (/ 1 (pow (sin kx) 6))) (/ 1 (pow (sin kx) 8)))))))) (* 1/2 (* (sin kx) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))))))) (* 1/2 (/ 1 (pow (sin kx) 3))))) (/ 1 (sin kx)))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) #s(hole binary64 (sin kx)))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) #s(hole binary64 (+ (sin kx) (* 1/2 (/ (pow ky 2) (sin kx))))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) #s(hole binary64 (+ (sin kx) (* (pow ky 2) (+ (* -1/2 (/ (* (pow ky 2) (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2))))) (sin kx))) (* 1/2 (/ 1 (sin kx))))))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) #s(hole binary64 (+ (sin kx) (* (pow ky 2) (+ (* (pow ky 2) (+ (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (sin kx))) (* 1/2 (/ (* (pow ky 2) (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))))) (sin kx))))) (* 1/2 (/ 1 (sin kx))))))))
#s(approx (sin ky) #s(hole binary64 ky))
#s(approx (sin ky) #s(hole binary64 (* ky (+ 1 (* -1/6 (pow ky 2))))))
#s(approx (sin ky) #s(hole binary64 (* ky (+ 1 (* (pow ky 2) (- (* 1/120 (pow ky 2)) 1/6))))))
#s(approx (sin ky) #s(hole binary64 (* ky (+ 1 (* (pow ky 2) (- (* (pow ky 2) (+ 1/120 (* -1/5040 (pow ky 2)))) 1/6))))))
#s(approx ky #s(hole binary64 ky))
#s(approx (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (* (sin th) (sin ky))) #s(hole binary64 (/ (* ky (sin th)) (sin kx))))
#s(approx (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (* (sin th) (sin ky))) #s(hole binary64 (* ky (+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx))))) (/ (sin th) (sin kx))))))
#s(approx (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (* (sin th) (sin ky))) #s(hole binary64 (* ky (+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (* (pow ky 2) (+ (* 1/120 (/ (sin th) (sin kx))) (+ (* 1/12 (/ (sin th) (pow (sin kx) 3))) (* 1/2 (* (sin kx) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))))))))) (/ (sin th) (sin kx))))))
#s(approx (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (* (sin th) (sin ky))) #s(hole binary64 (* ky (+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (* (pow ky 2) (+ (* 1/120 (/ (sin th) (sin kx))) (+ (* 1/12 (/ (sin th) (pow (sin kx) 3))) (+ (* 1/2 (* (sin kx) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))) (* (pow ky 2) (+ (* -1/2 (* (sin kx) (* (sin th) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))) (pow (sin kx) 2))) (+ (* 2/45 (/ 1 (pow (sin kx) 4))) (+ (* 2/3 (/ 1 (pow (sin kx) 6))) (/ 1 (pow (sin kx) 8)))))))) (+ (* -1/12 (* (sin kx) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))) (+ (* -1/240 (/ (sin th) (pow (sin kx) 3))) (* -1/5040 (/ (sin th) (sin kx)))))))))))))) (/ (sin th) (sin kx))))))
#s(approx (* (sin th) (sin ky)) #s(hole binary64 (* ky (sin th))))
#s(approx (* (sin th) (sin ky)) #s(hole binary64 (* ky (+ (sin th) (* -1/6 (* (pow ky 2) (sin th)))))))
#s(approx (* (sin th) (sin ky)) #s(hole binary64 (* ky (+ (sin th) (* (pow ky 2) (+ (* -1/6 (sin th)) (* 1/120 (* (pow ky 2) (sin th)))))))))
#s(approx (* (sin th) (sin ky)) #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 (+ (* (/ (* (* kx kx) (sin th)) (pow (sin ky) 2)) -1/2) (sin th)) #s(hole binary64 (* -1/2 (/ (* (pow kx 2) (sin th)) (pow ky 2)))))
#s(approx (+ (* (/ (* (* kx kx) (sin th)) (pow (sin ky) 2)) -1/2) (sin th)) #s(hole binary64 (/ (+ (* -1/2 (* (pow kx 2) (sin th))) (* (pow ky 2) (+ (sin th) (* -1/6 (* (pow kx 2) (sin th)))))) (pow ky 2))))
#s(approx (+ (* (/ (* (* kx kx) (sin th)) (pow (sin ky) 2)) -1/2) (sin th)) #s(hole binary64 (/ (+ (* -1/2 (* (pow kx 2) (sin th))) (* (pow ky 2) (+ (sin th) (+ (* -1/6 (* (pow kx 2) (sin th))) (* 1/2 (* (pow ky 2) (+ (* -1/9 (* (pow kx 2) (sin th))) (* 2/45 (* (pow kx 2) (sin th)))))))))) (pow ky 2))))
#s(approx (+ (* (/ (* (* kx kx) (sin th)) (pow (sin ky) 2)) -1/2) (sin th)) #s(hole binary64 (/ (+ (* -1/2 (* (pow kx 2) (sin th))) (* (pow ky 2) (+ (sin th) (+ (* -1/6 (* (pow kx 2) (sin th))) (* (pow ky 2) (+ (* 1/2 (* (pow ky 2) (+ (* -1/315 (* (pow kx 2) (sin th))) (+ (* 2/135 (* (pow kx 2) (sin th))) (* 1/3 (+ (* -1/9 (* (pow kx 2) (sin th))) (* 2/45 (* (pow kx 2) (sin th))))))))) (* 1/2 (+ (* -1/9 (* (pow kx 2) (sin th))) (* 2/45 (* (pow kx 2) (sin th))))))))))) (pow ky 2))))
#s(approx (/ (* (* kx kx) (sin th)) (pow (sin ky) 2)) #s(hole binary64 (/ (* (pow kx 2) (sin th)) (pow ky 2))))
#s(approx (/ (* (* kx kx) (sin th)) (pow (sin ky) 2)) #s(hole binary64 (/ (+ (* 1/3 (* (pow kx 2) (* (pow ky 2) (sin th)))) (* (pow kx 2) (sin th))) (pow ky 2))))
#s(approx (/ (* (* kx kx) (sin th)) (pow (sin ky) 2)) #s(hole binary64 (/ (+ (* (pow kx 2) (sin th)) (* (pow ky 2) (- (* -1 (* (pow ky 2) (+ (* -1/9 (* (pow kx 2) (sin th))) (* 2/45 (* (pow kx 2) (sin th)))))) (* -1/3 (* (pow kx 2) (sin th)))))) (pow ky 2))))
#s(approx (/ (* (* kx kx) (sin th)) (pow (sin ky) 2)) #s(hole binary64 (/ (+ (* (pow kx 2) (sin th)) (* (pow ky 2) (- (* (pow ky 2) (- (* -1 (* (pow ky 2) (+ (* -1/315 (* (pow kx 2) (sin th))) (+ (* 2/135 (* (pow kx 2) (sin th))) (* 1/3 (+ (* -1/9 (* (pow kx 2) (sin th))) (* 2/45 (* (pow kx 2) (sin th))))))))) (+ (* -1/9 (* (pow kx 2) (sin th))) (* 2/45 (* (pow kx 2) (sin th)))))) (* -1/3 (* (pow kx 2) (sin th)))))) (pow ky 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) (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2))) (sin th)) #s(hole binary64 (/ (* ky (sin th)) (sin kx))))
#s(approx (* (/ (sin ky) (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2))) (sin th)) #s(hole binary64 (* ky (+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx))))) (/ (sin th) (sin kx))))))
#s(approx (* (/ (sin ky) (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2))) (sin th)) #s(hole binary64 (* ky (+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (* (pow ky 2) (+ (* 1/120 (/ (sin th) (sin kx))) (+ (* 1/12 (/ (sin th) (pow (sin kx) 3))) (* 1/2 (* (sin kx) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))))))))) (/ (sin th) (sin kx))))))
#s(approx (* (/ (sin ky) (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2))) (sin th)) #s(hole binary64 (* ky (+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (* (pow ky 2) (+ (* 1/120 (/ (sin th) (sin kx))) (+ (* 1/12 (/ (sin th) (pow (sin kx) 3))) (+ (* 1/2 (* (sin kx) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))) (* (pow ky 2) (+ (* -1/2 (* (sin kx) (* (sin th) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))) (pow (sin kx) 2))) (+ (* 2/45 (/ 1 (pow (sin kx) 4))) (+ (* 2/3 (/ 1 (pow (sin kx) 6))) (/ 1 (pow (sin kx) 8)))))))) (+ (* -1/12 (* (sin kx) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))) (+ (* -1/240 (/ (sin th) (pow (sin kx) 3))) (* -1/5040 (/ (sin th) (sin kx)))))))))))))) (/ (sin th) (sin kx))))))
#s(approx (/ (sin ky) (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2))) #s(hole binary64 (/ ky (sin kx))))
#s(approx (/ (sin ky) (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2))) #s(hole binary64 (* ky (+ (* -1 (* (pow ky 2) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx))))))
#s(approx (/ (sin ky) (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2))) #s(hole binary64 (* ky (+ (* (pow ky 2) (- (* (pow ky 2) (+ (* 1/120 (/ 1 (sin kx))) (+ (* 1/2 (* (sin kx) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))))) (* 1/12 (/ 1 (pow (sin kx) 3)))))) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx))))))
#s(approx (/ (sin ky) (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2))) #s(hole binary64 (* ky (+ (* (pow ky 2) (- (* (pow ky 2) (+ (* 1/120 (/ 1 (sin kx))) (+ (* 1/12 (/ 1 (pow (sin kx) 3))) (+ (* 1/2 (* (sin kx) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))))) (* (pow ky 2) (- (+ (* -1/2 (* (sin kx) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))) (pow (sin kx) 2))) (+ (* 2/45 (/ 1 (pow (sin kx) 4))) (+ (* 2/3 (/ 1 (pow (sin kx) 6))) (/ 1 (pow (sin kx) 8))))))) (* -1/12 (* (sin kx) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))) (+ (* 1/5040 (/ 1 (sin kx))) (* 1/240 (/ 1 (pow (sin kx) 3)))))))))) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx))))))
#s(approx (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2)) #s(hole binary64 (sin kx)))
#s(approx (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2)) #s(hole binary64 (+ (sin kx) (* 1/2 (/ (pow ky 2) (sin kx))))))
#s(approx (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2)) #s(hole binary64 (+ (sin kx) (* (pow ky 2) (+ (* -1/2 (/ (* (pow ky 2) (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2))))) (sin kx))) (* 1/2 (/ 1 (sin kx))))))))
#s(approx (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2)) #s(hole binary64 (+ (sin kx) (* (pow ky 2) (+ (* (pow ky 2) (+ (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (sin kx))) (* 1/2 (/ (* (pow ky 2) (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))))) (sin kx))))) (* 1/2 (/ 1 (sin kx))))))))
#s(approx (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2) #s(hole binary64 (* 1/2 (log (pow (sin kx) 2)))))
#s(approx (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2) #s(hole binary64 (+ (* 1/2 (log (pow (sin kx) 2))) (* 1/2 (/ (pow ky 2) (pow (sin kx) 2))))))
#s(approx (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2) #s(hole binary64 (+ (* 1/2 (log (pow (sin kx) 2))) (* (pow ky 2) (+ (* -1/48 (* (pow ky 2) (+ (* 8 (/ 1 (pow (sin kx) 2))) (* 12 (/ 1 (pow (sin kx) 4)))))) (* 1/2 (/ 1 (pow (sin kx) 2))))))))
#s(approx (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2) #s(hole binary64 (+ (* 1/2 (log (pow (sin kx) 2))) (* (pow ky 2) (+ (* (pow ky 2) (+ (* -1/48 (+ (* 8 (/ 1 (pow (sin kx) 2))) (* 12 (/ 1 (pow (sin kx) 4))))) (* 1/1440 (* (pow ky 2) (+ (* 240 (/ 1 (pow (sin kx) 4))) (+ (* 240 (/ 1 (pow (sin kx) 6))) (* 32 (/ 1 (pow (sin kx) 2))))))))) (* 1/2 (/ 1 (pow (sin kx) 2))))))))
#s(approx (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) #s(hole binary64 (log (pow (sin kx) 2))))
#s(approx (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) #s(hole binary64 (+ (log (pow (sin kx) 2)) (/ (pow ky 2) (pow (sin kx) 2)))))
#s(approx (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) #s(hole binary64 (+ (log (pow (sin kx) 2)) (* (pow ky 2) (+ (* -1/24 (* (pow ky 2) (+ (* 8 (/ 1 (pow (sin kx) 2))) (* 12 (/ 1 (pow (sin kx) 4)))))) (/ 1 (pow (sin kx) 2)))))))
#s(approx (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) #s(hole binary64 (+ (log (pow (sin kx) 2)) (* (pow ky 2) (+ (* (pow ky 2) (+ (* -1/24 (+ (* 8 (/ 1 (pow (sin kx) 2))) (* 12 (/ 1 (pow (sin kx) 4))))) (* 1/720 (* (pow ky 2) (+ (* 32 (/ 1 (pow (sin kx) 2))) (+ (* 240 (/ 1 (pow (sin kx) 6))) (* 240 (/ 1 (pow (sin kx) 4))))))))) (/ 1 (pow (sin kx) 2)))))))
#s(approx (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) #s(hole binary64 (pow (sin kx) 2)))
#s(approx (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) #s(hole binary64 (+ (pow ky 2) (pow (sin kx) 2))))
#s(approx (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) #s(hole binary64 (+ (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2)))) (pow (sin kx) 2))))
#s(approx (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) #s(hole binary64 (+ (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3)))) (pow (sin kx) 2))))
#s(approx (* (/ (sin ky) (sqrt (- (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))) (sin th)) #s(hole binary64 (/ (* ky (sin th)) (sin kx))))
#s(approx (* (/ (sin ky) (sqrt (- (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))) (sin th)) #s(hole binary64 (* ky (+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx))))) (/ (sin th) (sin kx))))))
#s(approx (* (/ (sin ky) (sqrt (- (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))) (sin th)) #s(hole binary64 (* ky (+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (* (pow ky 2) (+ (* 1/120 (/ (sin th) (sin kx))) (+ (* 1/12 (/ (sin th) (pow (sin kx) 3))) (* 1/2 (* (sin kx) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))))))))) (/ (sin th) (sin kx))))))
#s(approx (* (/ (sin ky) (sqrt (- (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))) (sin th)) #s(hole binary64 (* ky (+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (* (pow ky 2) (+ (* 1/120 (/ (sin th) (sin kx))) (+ (* 1/12 (/ (sin th) (pow (sin kx) 3))) (+ (* 1/2 (* (sin kx) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))) (* (pow ky 2) (+ (* -1/12 (* (sin kx) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))) (+ (* -1/240 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/5040 (/ (sin th) (sin kx))) (* 1/2 (* (sin kx) (* (sin th) (- (* -1 (/ (- (/ 1 (pow (sin kx) 2)) 1/3) (pow (sin kx) 6))) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))) (pow (sin kx) 2))) (+ (* 2/45 (/ 1 (pow (sin kx) 4))) (/ 1 (pow (sin kx) 6))))))))))))))))))) (/ (sin th) (sin kx))))))
#s(approx (/ (sin ky) (sqrt (- (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (/ ky (sin kx))))
#s(approx (/ (sin ky) (sqrt (- (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (* ky (+ (* -1 (* (pow ky 2) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx))))))
#s(approx (/ (sin ky) (sqrt (- (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (* ky (+ (* (pow ky 2) (- (* (pow ky 2) (+ (* 1/120 (/ 1 (sin kx))) (+ (* 1/2 (* (sin kx) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))))) (* 1/12 (/ 1 (pow (sin kx) 3)))))) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx))))))
#s(approx (/ (sin ky) (sqrt (- (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (* ky (+ (* (pow ky 2) (- (* (pow ky 2) (+ (* 1/120 (/ 1 (sin kx))) (+ (* 1/12 (/ 1 (pow (sin kx) 3))) (+ (* 1/2 (* (sin kx) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))))) (* (pow ky 2) (- (+ (* -1/12 (* (sin kx) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))))) (* 1/2 (* (sin kx) (- (* -1 (/ (- (/ 1 (pow (sin kx) 2)) 1/3) (pow (sin kx) 6))) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))) (pow (sin kx) 2))) (+ (* 2/45 (/ 1 (pow (sin kx) 4))) (/ 1 (pow (sin kx) 6)))))))) (+ (* 1/5040 (/ 1 (sin kx))) (* 1/240 (/ 1 (pow (sin kx) 3)))))))))) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx))))))
#s(approx (sqrt (- (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (sin kx)))
#s(approx (sqrt (- (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (+ (sin kx) (* 1/2 (/ (pow ky 2) (sin kx))))))
#s(approx (sqrt (- (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (+ (sin kx) (* (pow ky 2) (+ (* -1/2 (/ (* (pow ky 2) (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2))))) (sin kx))) (* 1/2 (/ 1 (sin kx))))))))
#s(approx (sqrt (- (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (+ (sin kx) (* (pow ky 2) (+ (* (pow ky 2) (+ (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (sin kx))) (* 1/2 (/ (* (pow ky 2) (- (+ 2/45 (* 2/3 (/ 1 (pow (sin kx) 2)))) (+ (* -1 (/ (- (/ 1 (pow (sin kx) 2)) 1/3) (pow (sin kx) 2))) (+ (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))) (+ (* 1/3 (/ 1 (pow (sin kx) 2))) (/ 1 (pow (sin kx) 4))))))) (sin kx))))) (* 1/2 (/ 1 (sin kx))))))))
#s(approx (- (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (pow (sin kx) 2)))
#s(approx (- (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ (pow ky 2) (pow (sin kx) 2))))
#s(approx (- (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (/ (pow (sin ky) 4) (- (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) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* (pow ky 2) (- (+ 2/45 (* 2/3 (/ 1 (pow (sin kx) 2)))) (+ (* -1 (/ (- (/ 1 (pow (sin kx) 2)) 1/3) (pow (sin kx) 2))) (+ (* 1/3 (/ 1 (pow (sin kx) 2))) (/ 1 (pow (sin kx) 4)))))) 1/3)))) (pow (sin kx) 2))))
#s(approx (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (pow (sin kx) 2)))
#s(approx (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (pow ky 2) (pow (sin kx) 2))))
#s(approx (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (* (pow ky 2) (+ 1 (* (pow ky 2) (- (/ 1 (pow (sin kx) 2)) 1/3)))) (pow (sin kx) 2))))
#s(approx (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (* (pow ky 2) (+ 1 (* (pow ky 2) (- (+ (* (pow ky 2) (- 2/45 (+ (* -1 (/ (- (/ 1 (pow (sin kx) 2)) 1/3) (pow (sin kx) 2))) (* 1/3 (/ 1 (pow (sin kx) 2)))))) (/ 1 (pow (sin kx) 2))) 1/3)))) (pow (sin kx) 2))))
#s(approx (- (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (pow (sin kx) 2)))
#s(approx (- (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (* -1 (pow ky 2)) (pow (sin kx) 2))))
#s(approx (- (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (* (pow ky 2) (- (* 1/3 (pow ky 2)) 1)) (pow (sin kx) 2))))
#s(approx (- (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (* (pow ky 2) (- (* (pow ky 2) (+ 1/3 (* -2/45 (pow ky 2)))) 1)) (pow (sin kx) 2))))
#s(approx (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (/ (pow ky 4) (pow (sin kx) 2))))
#s(approx (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (* (pow ky 4) (+ (* (pow ky 2) (- (/ 1 (pow (sin kx) 4)) (* 2/3 (/ 1 (pow (sin kx) 2))))) (/ 1 (pow (sin kx) 2))))))
#s(approx (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (* (pow ky 4) (+ (* (pow ky 2) (- (+ (* (pow ky 2) (- (* 1/5 (/ 1 (pow (sin kx) 2))) (+ (* -1 (/ (- (/ 1 (pow (sin kx) 4)) (* 2/3 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))) (* 1/3 (/ 1 (pow (sin kx) 4)))))) (/ 1 (pow (sin kx) 4))) (* 2/3 (/ 1 (pow (sin kx) 2))))) (/ 1 (pow (sin kx) 2))))))
#s(approx (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (* (pow ky 4) (+ (* (pow ky 2) (- (+ (* (pow ky 2) (- (+ (* 1/5 (/ 1 (pow (sin kx) 2))) (* (pow ky 2) (- (* 2/45 (/ 1 (pow (sin kx) 4))) (+ (* -1 (/ (- (* 1/5 (/ 1 (pow (sin kx) 2))) (+ (* -1 (/ (- (/ 1 (pow (sin kx) 4)) (* 2/3 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))) (* 1/3 (/ 1 (pow (sin kx) 4))))) (pow (sin kx) 2))) (+ (* 34/945 (/ 1 (pow (sin kx) 2))) (* 1/3 (/ (- (/ 1 (pow (sin kx) 4)) (* 2/3 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2)))))))) (+ (* -1 (/ (- (/ 1 (pow (sin kx) 4)) (* 2/3 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))) (* 1/3 (/ 1 (pow (sin kx) 4)))))) (/ 1 (pow (sin kx) 4))) (* 2/3 (/ 1 (pow (sin kx) 2))))) (/ 1 (pow (sin kx) 2))))))
#s(approx (pow (sin ky) 4) #s(hole binary64 (pow ky 4)))
#s(approx (pow (sin ky) 4) #s(hole binary64 (* (pow ky 4) (+ 1 (* -2/3 (pow ky 2))))))
#s(approx (pow (sin ky) 4) #s(hole binary64 (* (pow ky 4) (+ 1 (* (pow ky 2) (- (* 1/5 (pow ky 2)) 2/3))))))
#s(approx (pow (sin ky) 4) #s(hole binary64 (* (pow ky 4) (+ 1 (* (pow ky 2) (- (* (pow ky 2) (+ 1/5 (* -34/945 (pow ky 2)))) 2/3))))))
#s(approx (sin ky) #s(hole binary64 (sin ky)))
#s(approx (* (sin th) (sin ky)) #s(hole binary64 (* (sin ky) (sin th))))
#s(approx (pow (sin ky) 2) #s(hole binary64 (pow (sin ky) 2)))
#s(approx (pow (sin ky) 4) #s(hole binary64 (pow (sin ky) 4)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (* (* th (sin ky)) (sqrt (/ 1 (+ (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 (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* (sin ky) (sqrt (/ 1 (+ (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 (+ (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* (pow th 2) (+ (* -1/6 (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* 1/120 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ (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 (+ (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* (pow th 2) (+ (* -1/6 (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* (pow th 2) (+ (* -1/5040 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* 1/120 (* (sin ky) (sqrt (/ 1 (+ (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 th #s(hole binary64 th))
#s(approx (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (* (sin th) (sin ky))) #s(hole binary64 (* (* th (sin ky)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
#s(approx (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (* (sin th) (sin ky))) #s(hole binary64 (* th (+ (* -1/6 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))
#s(approx (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (* (sin th) (sin ky))) #s(hole binary64 (* th (+ (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* (pow th 2) (+ (* -1/6 (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* 1/120 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))))))
#s(approx (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (* (sin th) (sin ky))) #s(hole binary64 (* th (+ (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* (pow th 2) (+ (* -1/6 (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* (pow th 2) (+ (* -1/5040 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* 1/120 (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))))))))
#s(approx (* (sin th) (sin ky)) #s(hole binary64 (* th (sin ky))))
#s(approx (* (sin th) (sin ky)) #s(hole binary64 (* th (+ (sin ky) (* -1/6 (* (pow th 2) (sin ky)))))))
#s(approx (* (sin th) (sin ky)) #s(hole binary64 (* th (+ (sin ky) (* (pow th 2) (+ (* -1/6 (sin ky)) (* 1/120 (* (pow th 2) (sin ky)))))))))
#s(approx (* (sin th) (sin ky)) #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 (+ (* (/ (* (* kx kx) (sin th)) (pow (sin ky) 2)) -1/2) (sin th)) #s(hole binary64 (* th (+ 1 (* -1/2 (/ (pow kx 2) (pow (sin ky) 2)))))))
#s(approx (+ (* (/ (* (* kx kx) (sin th)) (pow (sin ky) 2)) -1/2) (sin th)) #s(hole binary64 (* th (+ 1 (+ (* -1/2 (/ (pow kx 2) (pow (sin ky) 2))) (* (pow th 2) (- (* 1/12 (/ (pow kx 2) (pow (sin ky) 2))) 1/6)))))))
#s(approx (+ (* (/ (* (* kx kx) (sin th)) (pow (sin ky) 2)) -1/2) (sin th)) #s(hole binary64 (* th (+ 1 (+ (* -1/2 (/ (pow kx 2) (pow (sin ky) 2))) (* (pow th 2) (- (+ (* 1/12 (/ (pow kx 2) (pow (sin ky) 2))) (* (pow th 2) (+ 1/120 (* -1/240 (/ (pow kx 2) (pow (sin ky) 2)))))) 1/6)))))))
#s(approx (+ (* (/ (* (* kx kx) (sin th)) (pow (sin ky) 2)) -1/2) (sin th)) #s(hole binary64 (* th (+ 1 (+ (* -1/2 (/ (pow kx 2) (pow (sin ky) 2))) (* (pow th 2) (- (+ (* 1/12 (/ (pow kx 2) (pow (sin ky) 2))) (* (pow th 2) (+ 1/120 (+ (* -1/240 (/ (pow kx 2) (pow (sin ky) 2))) (* (pow th 2) (- (* 1/10080 (/ (pow kx 2) (pow (sin ky) 2))) 1/5040)))))) 1/6)))))))
#s(approx (/ (* (* kx kx) (sin th)) (pow (sin ky) 2)) #s(hole binary64 (/ (* (pow kx 2) th) (pow (sin ky) 2))))
#s(approx (/ (* (* kx kx) (sin th)) (pow (sin ky) 2)) #s(hole binary64 (* th (+ (* -1/6 (/ (* (pow kx 2) (pow th 2)) (pow (sin ky) 2))) (/ (pow kx 2) (pow (sin ky) 2))))))
#s(approx (/ (* (* kx kx) (sin th)) (pow (sin ky) 2)) #s(hole binary64 (* th (+ (* (pow th 2) (+ (* -1/6 (/ (pow kx 2) (pow (sin ky) 2))) (* 1/120 (/ (* (pow kx 2) (pow th 2)) (pow (sin ky) 2))))) (/ (pow kx 2) (pow (sin ky) 2))))))
#s(approx (/ (* (* kx kx) (sin th)) (pow (sin ky) 2)) #s(hole binary64 (* th (+ (* (pow th 2) (+ (* -1/6 (/ (pow kx 2) (pow (sin ky) 2))) (* (pow th 2) (+ (* -1/5040 (/ (* (pow kx 2) (pow th 2)) (pow (sin ky) 2))) (* 1/120 (/ (pow kx 2) (pow (sin ky) 2))))))) (/ (pow kx 2) (pow (sin ky) 2))))))
#s(approx (* (* kx kx) (sin th)) #s(hole binary64 (* (pow kx 2) th)))
#s(approx (* (* kx kx) (sin th)) #s(hole binary64 (* th (+ (* -1/6 (* (pow kx 2) (pow th 2))) (pow kx 2)))))
#s(approx (* (* kx kx) (sin th)) #s(hole binary64 (* th (+ (* (pow th 2) (+ (* -1/6 (pow kx 2)) (* 1/120 (* (pow kx 2) (pow th 2))))) (pow kx 2)))))
#s(approx (* (* kx kx) (sin th)) #s(hole binary64 (* th (+ (* (pow th 2) (+ (* -1/6 (pow kx 2)) (* (pow th 2) (+ (* -1/5040 (* (pow kx 2) (pow th 2))) (* 1/120 (pow kx 2)))))) (pow kx 2)))))
#s(approx (* (/ (sin ky) (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2))) (sin th)) #s(hole binary64 (* (* th (sin ky)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
#s(approx (* (/ (sin ky) (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2))) (sin th)) #s(hole binary64 (* th (+ (* -1/6 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))
#s(approx (* (/ (sin ky) (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2))) (sin th)) #s(hole binary64 (* th (+ (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* (pow th 2) (+ (* -1/6 (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* 1/120 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))))))
#s(approx (* (/ (sin ky) (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2))) (sin th)) #s(hole binary64 (* th (+ (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* (pow th 2) (+ (* -1/6 (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* (pow th 2) (+ (* -1/5040 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* 1/120 (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))))))))
#s(approx (* (/ (sin ky) (sqrt (- (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))) (sin th)) #s(hole binary64 (* (* th (sin ky)) (sqrt (/ 1 (- (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))))))
#s(approx (* (/ (sin ky) (sqrt (- (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))) (sin th)) #s(hole binary64 (* th (+ (* -1/6 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (- (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))))) (* (sin ky) (sqrt (/ 1 (- (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))))))))
#s(approx (* (/ (sin ky) (sqrt (- (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))) (sin th)) #s(hole binary64 (* th (+ (* (sin ky) (sqrt (/ 1 (- (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))))))) (* (pow th 2) (+ (* -1/6 (* (sin ky) (sqrt (/ 1 (- (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))))) (* 1/120 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (- (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))))))))))))))
#s(approx (* (/ (sin ky) (sqrt (- (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))) (sin th)) #s(hole binary64 (* th (+ (* (sin ky) (sqrt (/ 1 (- (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))))))) (* (pow th 2) (+ (* -1/6 (* (sin ky) (sqrt (/ 1 (- (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))))) (* (pow th 2) (+ (* -1/5040 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (- (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))))) (* 1/120 (* (sin ky) (sqrt (/ 1 (- (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))))))))))))))))
#s(approx (sin th) #s(hole binary64 (sin th)))
Calls

9 calls:

TimeVariablePointExpression
49.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)))) (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (sin ky)) (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (sin kx) kx (sin ky) ky -1 (sin th) th (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (* (sin th) (sin ky))) (* (sin th) (sin ky)) (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (+ (* (/ (* (* kx kx) (sin th)) (pow (sin ky) 2)) -1/2) (sin th)) (/ (* (* kx kx) (sin th)) (pow (sin ky) 2)) (* (* kx kx) (sin th)) (* kx kx) (pow (sin ky) 2) 2 -1/2 (* (/ (sin ky) (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2))) (sin th)) (/ (sin ky) (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2))) (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2)) (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2) (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) 1/2 (* (/ (sin ky) (sqrt (- (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))) (sin th)) (/ (sin ky) (sqrt (- (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))) (sqrt (- (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))))) (- (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))) (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (pow (sin kx) 4) 4 (- (pow (sin kx) 2) (pow (sin ky) 2)) (pow (sin kx) 2) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (pow (sin ky) 4))
45.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)))) (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (sin ky)) (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (sin kx) kx (sin ky) ky -1 (sin th) th (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (* (sin th) (sin ky))) (* (sin th) (sin ky)) (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (+ (* (/ (* (* kx kx) (sin th)) (pow (sin ky) 2)) -1/2) (sin th)) (/ (* (* kx kx) (sin th)) (pow (sin ky) 2)) (* (* kx kx) (sin th)) (* kx kx) (pow (sin ky) 2) 2 -1/2 (* (/ (sin ky) (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2))) (sin th)) (/ (sin ky) (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2))) (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2)) (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2) (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) 1/2 (* (/ (sin ky) (sqrt (- (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))) (sin th)) (/ (sin ky) (sqrt (- (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))) (sqrt (- (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))))) (- (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))) (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (pow (sin kx) 4) 4 (- (pow (sin kx) 2) (pow (sin ky) 2)) (pow (sin kx) 2) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (pow (sin ky) 4))
24.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)))) (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (sin ky)) (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (sin kx) kx (sin ky) ky -1 (sin th) th (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (* (sin th) (sin ky))) (* (sin th) (sin ky)) (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (+ (* (/ (* (* kx kx) (sin th)) (pow (sin ky) 2)) -1/2) (sin th)) (/ (* (* kx kx) (sin th)) (pow (sin ky) 2)) (* (* kx kx) (sin th)) (* kx kx) (pow (sin ky) 2) 2 -1/2 (* (/ (sin ky) (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2))) (sin th)) (/ (sin ky) (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2))) (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2)) (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2) (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) 1/2 (* (/ (sin ky) (sqrt (- (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))) (sin th)) (/ (sin ky) (sqrt (- (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))) (sqrt (- (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))))) (- (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))) (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (pow (sin kx) 4) 4 (- (pow (sin kx) 2) (pow (sin ky) 2)) (pow (sin kx) 2) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (pow (sin ky) 4))
23.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)))) (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (sin ky)) (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (sin kx) kx (sin ky) ky -1 (sin th) th (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (* (sin th) (sin ky))) (* (sin th) (sin ky)) (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (+ (* (/ (* (* kx kx) (sin th)) (pow (sin ky) 2)) -1/2) (sin th)) (/ (* (* kx kx) (sin th)) (pow (sin ky) 2)) (* (* kx kx) (sin th)) (* kx kx) (pow (sin ky) 2) 2 -1/2 (* (/ (sin ky) (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2))) (sin th)) (/ (sin ky) (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2))) (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2)) (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2) (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) 1/2 (* (/ (sin ky) (sqrt (- (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))) (sin th)) (/ (sin ky) (sqrt (- (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))) (sqrt (- (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))))) (- (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))) (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (pow (sin kx) 4) 4 (- (pow (sin kx) 2) (pow (sin ky) 2)) (pow (sin kx) 2) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (pow (sin ky) 4))
11.0ms
th
@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)))) (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (sin ky)) (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (sin kx) kx (sin ky) ky -1 (sin th) th (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (* (sin th) (sin ky))) (* (sin th) (sin ky)) (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (+ (* (/ (* (* kx kx) (sin th)) (pow (sin ky) 2)) -1/2) (sin th)) (/ (* (* kx kx) (sin th)) (pow (sin ky) 2)) (* (* kx kx) (sin th)) (* kx kx) (pow (sin ky) 2) 2 -1/2 (* (/ (sin ky) (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2))) (sin th)) (/ (sin ky) (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2))) (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2)) (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2) (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) 1/2 (* (/ (sin ky) (sqrt (- (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))) (sin th)) (/ (sin ky) (sqrt (- (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))) (sqrt (- (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))))) (- (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))) (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (pow (sin kx) 4) 4 (- (pow (sin kx) 2) (pow (sin ky) 2)) (pow (sin kx) 2) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (pow (sin ky) 4))

rewrite228.0ms (2.2%)

Memory
-11.1MiB live, 318.9MiB allocated; 21ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0123513350
0131010404
1788510404
080099883
Stop Event
iter limit
node limit
iter limit
Counts
302 → 509
Calls
Call 1
Inputs
(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (*.f64 (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)) (sin.f64 ky))) (sin.f64 th))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (*.f64 (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)) (sin.f64 ky)))
(*.f64 (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)) (sin.f64 ky))
(pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64))
(hypot.f64 (sin.f64 kx) (sin.f64 ky))
(sin.f64 kx)
kx
(sin.f64 ky)
ky
#s(literal -1 binary64)
(sin.f64 th)
th
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)) (*.f64 (sin.f64 th) (sin.f64 ky))))
(*.f64 (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)) (*.f64 (sin.f64 th) (sin.f64 ky)))
(*.f64 (sin.f64 th) (sin.f64 ky))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (/.f64 (*.f64 (*.f64 kx kx) (sin.f64 th)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal -1/2 binary64) (sin.f64 th)))
(fma.f64 (/.f64 (*.f64 (*.f64 kx kx) (sin.f64 th)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal -1/2 binary64) (sin.f64 th))
(/.f64 (*.f64 (*.f64 kx kx) (sin.f64 th)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))
(*.f64 (*.f64 kx kx) (sin.f64 th))
(*.f64 kx kx)
(pow.f64 (sin.f64 ky) #s(literal 2 binary64))
#s(literal 2 binary64)
#s(literal -1/2 binary64)
(*.f64 (/.f64 (sin.f64 ky) (exp.f64 (*.f64 (log.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #s(literal 1/2 binary64)))) (sin.f64 th))
(/.f64 (sin.f64 ky) (exp.f64 (*.f64 (log.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #s(literal 1/2 binary64))))
(exp.f64 (*.f64 (log.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #s(literal 1/2 binary64)))
(*.f64 (log.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #s(literal 1/2 binary64))
(log.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
(fma.f64 (sin.f64 kx) (sin.f64 kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))
#s(literal 1/2 binary64)
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (-.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 (/.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))))
(sqrt.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(-.f64 (/.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (-.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 4 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 4 binary64))
#s(literal 4 binary64)
(-.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))
(pow.f64 (sin.f64 kx) #s(literal 2 binary64))
(/.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
(pow.f64 (sin.f64 ky) #s(literal 4 binary64))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (sin th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (+ (sin th) (* (pow kx 2) (+ (* -1/2 (/ (sin th) (pow (sin ky) 2))) (* 1/2 (* (pow kx 2) (* (pow (sin ky) 2) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))))))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (+ (sin th) (* (pow kx 2) (+ (* -1/2 (/ (sin th) (pow (sin ky) 2))) (* (pow kx 2) (+ (* -1/2 (* (pow kx 2) (* (pow (sin ky) 2) (* (sin th) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))) (pow (sin ky) 2))) (+ (* 2/45 (/ 1 (pow (sin ky) 4))) (+ (* 2/3 (/ 1 (pow (sin ky) 6))) (/ 1 (pow (sin ky) 8))))))))) (* 1/2 (* (pow (sin ky) 2) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6))))))))))))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 1))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ 1 (* -1/2 (/ (pow kx 2) (pow (sin ky) 2))))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ 1 (* (pow kx 2) (- (* 1/2 (* (pow kx 2) (* (pow (sin ky) 2) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6))))))) (* 1/2 (/ 1 (pow (sin ky) 2))))))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ 1 (* (pow kx 2) (- (* (pow kx 2) (+ (* -1/2 (* (pow kx 2) (* (pow (sin ky) 2) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))) (pow (sin ky) 2))) (+ (* 2/45 (/ 1 (pow (sin ky) 4))) (+ (* 2/3 (/ 1 (pow (sin ky) 6))) (/ 1 (pow (sin ky) 8)))))))) (* 1/2 (* (pow (sin ky) 2) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))))))) (* 1/2 (/ 1 (pow (sin ky) 2))))))))
#s(approx (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (sin ky)) #s(hole binary64 1))
#s(approx (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (sin ky)) #s(hole binary64 (+ 1 (* -1/2 (/ (pow kx 2) (pow (sin ky) 2))))))
#s(approx (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (sin ky)) #s(hole binary64 (+ 1 (* (pow kx 2) (- (* 1/2 (* (pow kx 2) (* (pow (sin ky) 2) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6))))))) (* 1/2 (/ 1 (pow (sin ky) 2))))))))
#s(approx (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (sin ky)) #s(hole binary64 (+ 1 (* (pow kx 2) (- (* (pow kx 2) (+ (* -1/2 (* (pow kx 2) (* (pow (sin ky) 2) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))) (pow (sin ky) 2))) (+ (* 2/45 (/ 1 (pow (sin ky) 4))) (+ (* 2/3 (/ 1 (pow (sin ky) 6))) (/ 1 (pow (sin ky) 8)))))))) (* 1/2 (* (pow (sin ky) 2) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))))))) (* 1/2 (/ 1 (pow (sin ky) 2))))))))
#s(approx (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) #s(hole binary64 (/ 1 (sin ky))))
#s(approx (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) #s(hole binary64 (+ (* -1/2 (/ (pow kx 2) (pow (sin ky) 3))) (/ 1 (sin ky)))))
#s(approx (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) #s(hole binary64 (+ (* (pow kx 2) (- (* 1/2 (* (pow kx 2) (* (sin ky) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6))))))) (* 1/2 (/ 1 (pow (sin ky) 3))))) (/ 1 (sin ky)))))
#s(approx (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) #s(hole binary64 (+ (* (pow kx 2) (- (* (pow kx 2) (+ (* -1/2 (* (pow kx 2) (* (sin ky) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))) (pow (sin ky) 2))) (+ (* 2/45 (/ 1 (pow (sin ky) 4))) (+ (* 2/3 (/ 1 (pow (sin ky) 6))) (/ 1 (pow (sin ky) 8)))))))) (* 1/2 (* (sin ky) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))))))) (* 1/2 (/ 1 (pow (sin ky) 3))))) (/ 1 (sin ky)))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) #s(hole binary64 (sin ky)))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) #s(hole binary64 (+ (sin ky) (* 1/2 (/ (pow kx 2) (sin ky))))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) #s(hole binary64 (+ (sin ky) (* (pow kx 2) (+ (* -1/2 (/ (* (pow kx 2) (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2))))) (sin ky))) (* 1/2 (/ 1 (sin ky))))))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) #s(hole binary64 (+ (sin ky) (* (pow kx 2) (+ (* (pow kx 2) (+ (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (sin ky))) (* 1/2 (/ (* (pow kx 2) (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2))))) (sin ky))))) (* 1/2 (/ 1 (sin ky))))))))
#s(approx (sin kx) #s(hole binary64 kx))
#s(approx (sin kx) #s(hole binary64 (* kx (+ 1 (* -1/6 (pow kx 2))))))
#s(approx (sin kx) #s(hole binary64 (* kx (+ 1 (* (pow kx 2) (- (* 1/120 (pow kx 2)) 1/6))))))
#s(approx (sin kx) #s(hole binary64 (* kx (+ 1 (* (pow kx 2) (- (* (pow kx 2) (+ 1/120 (* -1/5040 (pow kx 2)))) 1/6))))))
#s(approx kx #s(hole binary64 kx))
#s(approx (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (* (sin th) (sin ky))) #s(hole binary64 (sin th)))
#s(approx (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (* (sin th) (sin ky))) #s(hole binary64 (+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2))))))
#s(approx (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (* (sin th) (sin ky))) #s(hole binary64 (+ (sin th) (* (pow kx 2) (+ (* -1/2 (/ (sin th) (pow (sin ky) 2))) (* 1/2 (* (pow kx 2) (* (pow (sin ky) 2) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))))))))))))
#s(approx (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (* (sin th) (sin ky))) #s(hole binary64 (+ (sin th) (* (pow kx 2) (+ (* -1/2 (/ (sin th) (pow (sin ky) 2))) (* (pow kx 2) (+ (* -1/2 (* (pow kx 2) (* (pow (sin ky) 2) (* (sin th) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))) (pow (sin ky) 2))) (+ (* 2/45 (/ 1 (pow (sin ky) 4))) (+ (* 2/3 (/ 1 (pow (sin ky) 6))) (/ 1 (pow (sin ky) 8))))))))) (* 1/2 (* (pow (sin ky) 2) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6))))))))))))))
#s(approx (+ (* (/ (* (* kx kx) (sin th)) (pow (sin ky) 2)) -1/2) (sin th)) #s(hole binary64 (sin th)))
#s(approx (+ (* (/ (* (* kx kx) (sin th)) (pow (sin ky) 2)) -1/2) (sin th)) #s(hole binary64 (+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2))))))
#s(approx (/ (* (* kx kx) (sin th)) (pow (sin ky) 2)) #s(hole binary64 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2))))
#s(approx (* (* kx kx) (sin th)) #s(hole binary64 (* (pow kx 2) (sin th))))
#s(approx (* kx kx) #s(hole binary64 (pow kx 2)))
#s(approx (* (/ (sin ky) (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2))) (sin th)) #s(hole binary64 (sin th)))
#s(approx (* (/ (sin ky) (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2))) (sin th)) #s(hole binary64 (+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2))))))
#s(approx (* (/ (sin ky) (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2))) (sin th)) #s(hole binary64 (+ (sin th) (* (pow kx 2) (+ (* -1/2 (/ (sin th) (pow (sin ky) 2))) (* 1/2 (* (pow kx 2) (* (pow (sin ky) 2) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))))))))))))
#s(approx (* (/ (sin ky) (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2))) (sin th)) #s(hole binary64 (+ (sin th) (* (pow kx 2) (+ (* -1/2 (/ (sin th) (pow (sin ky) 2))) (* (pow kx 2) (+ (* -1/2 (* (pow kx 2) (* (pow (sin ky) 2) (* (sin th) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))) (pow (sin ky) 2))) (+ (* 2/45 (/ 1 (pow (sin ky) 4))) (+ (* 2/3 (/ 1 (pow (sin ky) 6))) (/ 1 (pow (sin ky) 8))))))))) (* 1/2 (* (pow (sin ky) 2) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6))))))))))))))
#s(approx (/ (sin ky) (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2))) #s(hole binary64 1))
#s(approx (/ (sin ky) (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2))) #s(hole binary64 (+ 1 (* -1/2 (/ (pow kx 2) (pow (sin ky) 2))))))
#s(approx (/ (sin ky) (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2))) #s(hole binary64 (+ 1 (* (pow kx 2) (- (* 1/2 (* (pow kx 2) (* (pow (sin ky) 2) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6))))))) (* 1/2 (/ 1 (pow (sin ky) 2))))))))
#s(approx (/ (sin ky) (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2))) #s(hole binary64 (+ 1 (* (pow kx 2) (- (* (pow kx 2) (+ (* -1/2 (* (pow kx 2) (* (pow (sin ky) 2) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))) (pow (sin ky) 2))) (+ (* 2/45 (/ 1 (pow (sin ky) 4))) (+ (* 2/3 (/ 1 (pow (sin ky) 6))) (/ 1 (pow (sin ky) 8)))))))) (* 1/2 (* (pow (sin ky) 2) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))))))) (* 1/2 (/ 1 (pow (sin ky) 2))))))))
#s(approx (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2)) #s(hole binary64 (sin ky)))
#s(approx (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2)) #s(hole binary64 (+ (sin ky) (* 1/2 (/ (pow kx 2) (sin ky))))))
#s(approx (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2)) #s(hole binary64 (+ (sin ky) (* (pow kx 2) (+ (* -1/2 (/ (* (pow kx 2) (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2))))) (sin ky))) (* 1/2 (/ 1 (sin ky))))))))
#s(approx (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2)) #s(hole binary64 (+ (sin ky) (* (pow kx 2) (+ (* (pow kx 2) (+ (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (sin ky))) (* 1/2 (/ (* (pow kx 2) (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2))))) (sin ky))))) (* 1/2 (/ 1 (sin ky))))))))
#s(approx (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2) #s(hole binary64 (* 1/2 (log (pow (sin ky) 2)))))
#s(approx (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2) #s(hole binary64 (+ (* 1/2 (log (pow (sin ky) 2))) (* 1/2 (/ (pow kx 2) (pow (sin ky) 2))))))
#s(approx (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2) #s(hole binary64 (+ (* 1/2 (log (pow (sin ky) 2))) (* (pow kx 2) (+ (* -1/48 (* (pow kx 2) (+ (* 8 (/ 1 (pow (sin ky) 2))) (* 12 (/ 1 (pow (sin ky) 4)))))) (* 1/2 (/ 1 (pow (sin ky) 2))))))))
#s(approx (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2) #s(hole binary64 (+ (* 1/2 (log (pow (sin ky) 2))) (* (pow kx 2) (+ (* (pow kx 2) (+ (* -1/48 (+ (* 8 (/ 1 (pow (sin ky) 2))) (* 12 (/ 1 (pow (sin ky) 4))))) (* 1/1440 (* (pow kx 2) (+ (* 240 (/ 1 (pow (sin ky) 4))) (+ (* 240 (/ 1 (pow (sin ky) 6))) (* 32 (/ 1 (pow (sin ky) 2))))))))) (* 1/2 (/ 1 (pow (sin ky) 2))))))))
#s(approx (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) #s(hole binary64 (log (pow (sin ky) 2))))
#s(approx (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) #s(hole binary64 (+ (log (pow (sin ky) 2)) (/ (pow kx 2) (pow (sin ky) 2)))))
#s(approx (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) #s(hole binary64 (+ (log (pow (sin ky) 2)) (* (pow kx 2) (+ (* -1/24 (* (pow kx 2) (+ (* 8 (/ 1 (pow (sin ky) 2))) (* 12 (/ 1 (pow (sin ky) 4)))))) (/ 1 (pow (sin ky) 2)))))))
#s(approx (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) #s(hole binary64 (+ (log (pow (sin ky) 2)) (* (pow kx 2) (+ (* (pow kx 2) (+ (* -1/24 (+ (* 8 (/ 1 (pow (sin ky) 2))) (* 12 (/ 1 (pow (sin ky) 4))))) (* 1/720 (* (pow kx 2) (+ (* 32 (/ 1 (pow (sin ky) 2))) (+ (* 240 (/ 1 (pow (sin ky) 6))) (* 240 (/ 1 (pow (sin ky) 4))))))))) (/ 1 (pow (sin ky) 2)))))))
#s(approx (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) #s(hole binary64 (pow (sin ky) 2)))
#s(approx (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) #s(hole binary64 (+ (pow kx 2) (pow (sin ky) 2))))
#s(approx (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) #s(hole binary64 (+ (* (pow kx 2) (+ 1 (* -1/3 (pow kx 2)))) (pow (sin ky) 2))))
#s(approx (+ (* (sin kx) (sin kx)) (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 (* (/ (sin ky) (sqrt (- (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))) (sin th)) #s(hole binary64 (sin th)))
#s(approx (* (/ (sin ky) (sqrt (- (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))) (sin th)) #s(hole binary64 (+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2))))))
#s(approx (* (/ (sin ky) (sqrt (- (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))) (sin th)) #s(hole binary64 (+ (sin th) (* (pow kx 2) (+ (* -1/2 (/ (sin th) (pow (sin ky) 2))) (* 1/2 (* (pow kx 2) (* (pow (sin ky) 2) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))))))))))))
#s(approx (* (/ (sin ky) (sqrt (- (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))) (sin th)) #s(hole binary64 (+ (sin th) (* (pow kx 2) (+ (* -1/2 (/ (sin th) (pow (sin ky) 2))) (* (pow kx 2) (+ (* -1/2 (* (pow kx 2) (* (pow (sin ky) 2) (* (sin th) (+ (* -1 (/ (- 1/3 (/ 1 (pow (sin ky) 2))) (pow (sin ky) 6))) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))) (pow (sin ky) 2))) (+ (* 2/45 (/ 1 (pow (sin ky) 4))) (/ 1 (pow (sin ky) 6))))))))) (* 1/2 (* (pow (sin ky) 2) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6))))))))))))))
#s(approx (/ (sin ky) (sqrt (- (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 1))
#s(approx (/ (sin ky) (sqrt (- (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (+ 1 (* -1/2 (/ (pow kx 2) (pow (sin ky) 2))))))
#s(approx (/ (sin ky) (sqrt (- (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (+ 1 (* (pow kx 2) (- (* 1/2 (* (pow kx 2) (* (pow (sin ky) 2) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6))))))) (* 1/2 (/ 1 (pow (sin ky) 2))))))))
#s(approx (/ (sin ky) (sqrt (- (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (+ 1 (* (pow kx 2) (- (* (pow kx 2) (+ (* -1/2 (* (pow kx 2) (* (pow (sin ky) 2) (+ (* -1 (/ (- 1/3 (/ 1 (pow (sin ky) 2))) (pow (sin ky) 6))) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))) (pow (sin ky) 2))) (+ (* 2/45 (/ 1 (pow (sin ky) 4))) (/ 1 (pow (sin ky) 6)))))))) (* 1/2 (* (pow (sin ky) 2) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))))))) (* 1/2 (/ 1 (pow (sin ky) 2))))))))
#s(approx (sqrt (- (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (sin ky)))
#s(approx (sqrt (- (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (+ (sin ky) (* 1/2 (/ (pow kx 2) (sin ky))))))
#s(approx (sqrt (- (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (+ (sin ky) (* (pow kx 2) (+ (* -1/2 (/ (* (pow kx 2) (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2))))) (sin ky))) (* 1/2 (/ 1 (sin ky))))))))
#s(approx (sqrt (- (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (+ (sin ky) (* (pow kx 2) (+ (* (pow kx 2) (+ (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (sin ky))) (* 1/2 (/ (* (pow kx 2) (- (+ 2/45 (+ (* -1 (/ (- 1/3 (/ 1 (pow (sin ky) 2))) (pow (sin ky) 2))) (* 2/3 (/ 1 (pow (sin ky) 2))))) (+ (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2))) (+ (* 1/3 (/ 1 (pow (sin ky) 2))) (/ 1 (pow (sin ky) 4)))))) (sin ky))))) (* 1/2 (/ 1 (sin ky))))))))
#s(approx (- (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (pow (sin ky) 2)))
#s(approx (- (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (- (pow kx 2) (* -1 (pow (sin ky) 2)))))
#s(approx (- (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (- (* (pow kx 2) (+ 1 (* -1/3 (pow kx 2)))) (* -1 (pow (sin ky) 2)))))
#s(approx (- (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (- (* (pow kx 2) (+ 1 (* (pow kx 2) (- (* (pow kx 2) (- (+ 2/45 (+ (* -1 (/ (- 1/3 (/ 1 (pow (sin ky) 2))) (pow (sin ky) 2))) (* 2/3 (/ 1 (pow (sin ky) 2))))) (+ (* 1/3 (/ 1 (pow (sin ky) 2))) (/ 1 (pow (sin ky) 4))))) 1/3)))) (* -1 (pow (sin ky) 2)))))
#s(approx (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (* -1 (/ (pow kx 4) (pow (sin ky) 2)))))
#s(approx (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (* (pow kx 4) (- (* (pow kx 2) (- (* 2/3 (/ 1 (pow (sin ky) 2))) (/ 1 (pow (sin ky) 4)))) (/ 1 (pow (sin ky) 2))))))
#s(approx (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (* (pow kx 4) (- (* (pow kx 2) (- (+ (* 2/3 (/ 1 (pow (sin ky) 2))) (* (pow kx 2) (- (* 1/3 (/ 1 (pow (sin ky) 4))) (+ (* -1 (/ (- (* 2/3 (/ 1 (pow (sin ky) 2))) (/ 1 (pow (sin ky) 4))) (pow (sin ky) 2))) (* 1/5 (/ 1 (pow (sin ky) 2))))))) (/ 1 (pow (sin ky) 4)))) (/ 1 (pow (sin ky) 2))))))
#s(approx (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (* (pow kx 4) (- (* (pow kx 2) (- (+ (* 2/3 (/ 1 (pow (sin ky) 2))) (* (pow kx 2) (- (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* (pow kx 2) (- (* 34/945 (/ 1 (pow (sin ky) 2))) (+ (* -1 (/ (- (* 1/3 (/ 1 (pow (sin ky) 4))) (+ (* -1 (/ (- (* 2/3 (/ 1 (pow (sin ky) 2))) (/ 1 (pow (sin ky) 4))) (pow (sin ky) 2))) (* 1/5 (/ 1 (pow (sin ky) 2))))) (pow (sin ky) 2))) (+ (* 2/45 (/ 1 (pow (sin ky) 4))) (* 1/3 (/ (- (* 2/3 (/ 1 (pow (sin ky) 2))) (/ 1 (pow (sin ky) 4))) (pow (sin ky) 2)))))))) (+ (* -1 (/ (- (* 2/3 (/ 1 (pow (sin ky) 2))) (/ 1 (pow (sin ky) 4))) (pow (sin ky) 2))) (* 1/5 (/ 1 (pow (sin ky) 2))))))) (/ 1 (pow (sin ky) 4)))) (/ 1 (pow (sin ky) 2))))))
#s(approx (pow (sin kx) 4) #s(hole binary64 (pow kx 4)))
#s(approx (pow (sin kx) 4) #s(hole binary64 (* (pow kx 4) (+ 1 (* -2/3 (pow kx 2))))))
#s(approx (pow (sin kx) 4) #s(hole binary64 (* (pow kx 4) (+ 1 (* (pow kx 2) (- (* 1/5 (pow kx 2)) 2/3))))))
#s(approx (pow (sin kx) 4) #s(hole binary64 (* (pow kx 4) (+ 1 (* (pow kx 2) (- (* (pow kx 2) (+ 1/5 (* -34/945 (pow kx 2)))) 2/3))))))
#s(approx (- (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (* -1 (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 (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (* -1 (pow (sin ky) 2))))
#s(approx (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (* -1 (pow kx 2)) (* -1 (pow (sin ky) 2)))))
#s(approx (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (* -1 (pow (sin ky) 2)) (* (pow kx 2) (- (* (pow kx 2) (- 1/3 (/ 1 (pow (sin ky) 2)))) 1)))))
#s(approx (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (* -1 (pow (sin ky) 2)) (* (pow kx 2) (- (* (pow kx 2) (- (+ 1/3 (* (pow kx 2) (- (* 1/3 (/ 1 (pow (sin ky) 2))) (+ 2/45 (* -1 (/ (- 1/3 (/ 1 (pow (sin ky) 2))) (pow (sin ky) 2))))))) (/ 1 (pow (sin ky) 2)))) 1)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (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 (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
#s(approx (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (sin ky)) #s(hole binary64 (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
#s(approx (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) #s(hole binary64 (sqrt (/ 1 (+ (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 (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (* (sin th) (sin ky))) #s(hole binary64 (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
#s(approx (+ (* (/ (* (* kx kx) (sin th)) (pow (sin ky) 2)) -1/2) (sin th)) #s(hole binary64 (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2)))))
#s(approx (+ (* (/ (* (* kx kx) (sin th)) (pow (sin ky) 2)) -1/2) (sin th)) #s(hole binary64 (* (pow kx 2) (+ (* -1/2 (/ (sin th) (pow (sin ky) 2))) (/ (sin th) (pow kx 2))))))
#s(approx (* (/ (sin ky) (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2))) (sin th)) #s(hole binary64 (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
#s(approx (/ (sin ky) (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2))) #s(hole binary64 (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
#s(approx (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2)) #s(hole binary64 (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
#s(approx (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2) #s(hole binary64 (* 1/2 (log (+ (pow (sin kx) 2) (pow (sin ky) 2))))))
#s(approx (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) #s(hole binary64 (log (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
#s(approx (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) #s(hole binary64 (+ (pow (sin kx) 2) (pow (sin ky) 2))))
#s(approx (* (/ (sin ky) (sqrt (- (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))) (sin th)) #s(hole binary64 (* (* (sin ky) (sin th)) (sqrt (/ 1 (- (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))))))
#s(approx (/ (sin ky) (sqrt (- (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (* (sin ky) (sqrt (/ 1 (- (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))))))
#s(approx (sqrt (- (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (sqrt (- (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))))
#s(approx (- (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (- (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))))))
#s(approx (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))
#s(approx (pow (sin kx) 4) #s(hole binary64 (pow (sin kx) 4)))
#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 (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (/ (pow (sin ky) 4) (- (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 (/ (* ky (sin th)) (sin kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (* ky (+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx))))) (/ (sin th) (sin kx))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (* ky (+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (* (pow ky 2) (+ (* 1/120 (/ (sin th) (sin kx))) (+ (* 1/12 (/ (sin th) (pow (sin kx) 3))) (* 1/2 (* (sin kx) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))))))))) (/ (sin th) (sin kx))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (* ky (+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (* (pow ky 2) (+ (* 1/120 (/ (sin th) (sin kx))) (+ (* 1/12 (/ (sin th) (pow (sin kx) 3))) (+ (* 1/2 (* (sin kx) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))) (* (pow ky 2) (+ (* -1/2 (* (sin kx) (* (sin th) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))) (pow (sin kx) 2))) (+ (* 2/45 (/ 1 (pow (sin kx) 4))) (+ (* 2/3 (/ 1 (pow (sin kx) 6))) (/ 1 (pow (sin kx) 8)))))))) (+ (* -1/12 (* (sin kx) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))) (+ (* -1/240 (/ (sin th) (pow (sin kx) 3))) (* -1/5040 (/ (sin th) (sin kx)))))))))))))) (/ (sin th) (sin kx))))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (/ ky (sin kx))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (* ky (+ (* -1 (* (pow ky 2) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx))))))
#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 (sin kx))) (+ (* 1/2 (* (sin kx) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))))) (* 1/12 (/ 1 (pow (sin kx) 3)))))) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx))))))
#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 (sin kx))) (+ (* 1/12 (/ 1 (pow (sin kx) 3))) (+ (* 1/2 (* (sin kx) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))))) (* (pow ky 2) (- (+ (* -1/2 (* (sin kx) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))) (pow (sin kx) 2))) (+ (* 2/45 (/ 1 (pow (sin kx) 4))) (+ (* 2/3 (/ 1 (pow (sin kx) 6))) (/ 1 (pow (sin kx) 8))))))) (* -1/12 (* (sin kx) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))) (+ (* 1/5040 (/ 1 (sin kx))) (* 1/240 (/ 1 (pow (sin kx) 3)))))))))) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx))))))
#s(approx (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (sin ky)) #s(hole binary64 (/ ky (sin kx))))
#s(approx (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (sin ky)) #s(hole binary64 (* ky (+ (* -1 (* (pow ky 2) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx))))))
#s(approx (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (sin ky)) #s(hole binary64 (* ky (+ (* (pow ky 2) (- (* (pow ky 2) (+ (* 1/120 (/ 1 (sin kx))) (+ (* 1/2 (* (sin kx) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))))) (* 1/12 (/ 1 (pow (sin kx) 3)))))) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx))))))
#s(approx (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (sin ky)) #s(hole binary64 (* ky (+ (* (pow ky 2) (- (* (pow ky 2) (+ (* 1/120 (/ 1 (sin kx))) (+ (* 1/12 (/ 1 (pow (sin kx) 3))) (+ (* 1/2 (* (sin kx) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))))) (* (pow ky 2) (- (+ (* -1/2 (* (sin kx) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))) (pow (sin kx) 2))) (+ (* 2/45 (/ 1 (pow (sin kx) 4))) (+ (* 2/3 (/ 1 (pow (sin kx) 6))) (/ 1 (pow (sin kx) 8))))))) (* -1/12 (* (sin kx) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))) (+ (* 1/5040 (/ 1 (sin kx))) (* 1/240 (/ 1 (pow (sin kx) 3)))))))))) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx))))))
#s(approx (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) #s(hole binary64 (/ 1 (sin kx))))
#s(approx (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) #s(hole binary64 (+ (* -1/2 (/ (pow ky 2) (pow (sin kx) 3))) (/ 1 (sin kx)))))
#s(approx (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) #s(hole binary64 (+ (* (pow ky 2) (- (* 1/2 (* (pow ky 2) (* (sin kx) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))) (* 1/2 (/ 1 (pow (sin kx) 3))))) (/ 1 (sin kx)))))
#s(approx (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) #s(hole binary64 (+ (* (pow ky 2) (- (* (pow ky 2) (+ (* -1/2 (* (pow ky 2) (* (sin kx) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))) (pow (sin kx) 2))) (+ (* 2/45 (/ 1 (pow (sin kx) 4))) (+ (* 2/3 (/ 1 (pow (sin kx) 6))) (/ 1 (pow (sin kx) 8)))))))) (* 1/2 (* (sin kx) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))))))) (* 1/2 (/ 1 (pow (sin kx) 3))))) (/ 1 (sin kx)))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) #s(hole binary64 (sin kx)))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) #s(hole binary64 (+ (sin kx) (* 1/2 (/ (pow ky 2) (sin kx))))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) #s(hole binary64 (+ (sin kx) (* (pow ky 2) (+ (* -1/2 (/ (* (pow ky 2) (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2))))) (sin kx))) (* 1/2 (/ 1 (sin kx))))))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) #s(hole binary64 (+ (sin kx) (* (pow ky 2) (+ (* (pow ky 2) (+ (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (sin kx))) (* 1/2 (/ (* (pow ky 2) (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))))) (sin kx))))) (* 1/2 (/ 1 (sin kx))))))))
#s(approx (sin ky) #s(hole binary64 ky))
#s(approx (sin ky) #s(hole binary64 (* ky (+ 1 (* -1/6 (pow ky 2))))))
#s(approx (sin ky) #s(hole binary64 (* ky (+ 1 (* (pow ky 2) (- (* 1/120 (pow ky 2)) 1/6))))))
#s(approx (sin ky) #s(hole binary64 (* ky (+ 1 (* (pow ky 2) (- (* (pow ky 2) (+ 1/120 (* -1/5040 (pow ky 2)))) 1/6))))))
#s(approx ky #s(hole binary64 ky))
#s(approx (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (* (sin th) (sin ky))) #s(hole binary64 (/ (* ky (sin th)) (sin kx))))
#s(approx (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (* (sin th) (sin ky))) #s(hole binary64 (* ky (+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx))))) (/ (sin th) (sin kx))))))
#s(approx (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (* (sin th) (sin ky))) #s(hole binary64 (* ky (+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (* (pow ky 2) (+ (* 1/120 (/ (sin th) (sin kx))) (+ (* 1/12 (/ (sin th) (pow (sin kx) 3))) (* 1/2 (* (sin kx) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))))))))) (/ (sin th) (sin kx))))))
#s(approx (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (* (sin th) (sin ky))) #s(hole binary64 (* ky (+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (* (pow ky 2) (+ (* 1/120 (/ (sin th) (sin kx))) (+ (* 1/12 (/ (sin th) (pow (sin kx) 3))) (+ (* 1/2 (* (sin kx) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))) (* (pow ky 2) (+ (* -1/2 (* (sin kx) (* (sin th) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))) (pow (sin kx) 2))) (+ (* 2/45 (/ 1 (pow (sin kx) 4))) (+ (* 2/3 (/ 1 (pow (sin kx) 6))) (/ 1 (pow (sin kx) 8)))))))) (+ (* -1/12 (* (sin kx) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))) (+ (* -1/240 (/ (sin th) (pow (sin kx) 3))) (* -1/5040 (/ (sin th) (sin kx)))))))))))))) (/ (sin th) (sin kx))))))
#s(approx (* (sin th) (sin ky)) #s(hole binary64 (* ky (sin th))))
#s(approx (* (sin th) (sin ky)) #s(hole binary64 (* ky (+ (sin th) (* -1/6 (* (pow ky 2) (sin th)))))))
#s(approx (* (sin th) (sin ky)) #s(hole binary64 (* ky (+ (sin th) (* (pow ky 2) (+ (* -1/6 (sin th)) (* 1/120 (* (pow ky 2) (sin th)))))))))
#s(approx (* (sin th) (sin ky)) #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 (+ (* (/ (* (* kx kx) (sin th)) (pow (sin ky) 2)) -1/2) (sin th)) #s(hole binary64 (* -1/2 (/ (* (pow kx 2) (sin th)) (pow ky 2)))))
#s(approx (+ (* (/ (* (* kx kx) (sin th)) (pow (sin ky) 2)) -1/2) (sin th)) #s(hole binary64 (/ (+ (* -1/2 (* (pow kx 2) (sin th))) (* (pow ky 2) (+ (sin th) (* -1/6 (* (pow kx 2) (sin th)))))) (pow ky 2))))
#s(approx (+ (* (/ (* (* kx kx) (sin th)) (pow (sin ky) 2)) -1/2) (sin th)) #s(hole binary64 (/ (+ (* -1/2 (* (pow kx 2) (sin th))) (* (pow ky 2) (+ (sin th) (+ (* -1/6 (* (pow kx 2) (sin th))) (* 1/2 (* (pow ky 2) (+ (* -1/9 (* (pow kx 2) (sin th))) (* 2/45 (* (pow kx 2) (sin th)))))))))) (pow ky 2))))
#s(approx (+ (* (/ (* (* kx kx) (sin th)) (pow (sin ky) 2)) -1/2) (sin th)) #s(hole binary64 (/ (+ (* -1/2 (* (pow kx 2) (sin th))) (* (pow ky 2) (+ (sin th) (+ (* -1/6 (* (pow kx 2) (sin th))) (* (pow ky 2) (+ (* 1/2 (* (pow ky 2) (+ (* -1/315 (* (pow kx 2) (sin th))) (+ (* 2/135 (* (pow kx 2) (sin th))) (* 1/3 (+ (* -1/9 (* (pow kx 2) (sin th))) (* 2/45 (* (pow kx 2) (sin th))))))))) (* 1/2 (+ (* -1/9 (* (pow kx 2) (sin th))) (* 2/45 (* (pow kx 2) (sin th))))))))))) (pow ky 2))))
#s(approx (/ (* (* kx kx) (sin th)) (pow (sin ky) 2)) #s(hole binary64 (/ (* (pow kx 2) (sin th)) (pow ky 2))))
#s(approx (/ (* (* kx kx) (sin th)) (pow (sin ky) 2)) #s(hole binary64 (/ (+ (* 1/3 (* (pow kx 2) (* (pow ky 2) (sin th)))) (* (pow kx 2) (sin th))) (pow ky 2))))
#s(approx (/ (* (* kx kx) (sin th)) (pow (sin ky) 2)) #s(hole binary64 (/ (+ (* (pow kx 2) (sin th)) (* (pow ky 2) (- (* -1 (* (pow ky 2) (+ (* -1/9 (* (pow kx 2) (sin th))) (* 2/45 (* (pow kx 2) (sin th)))))) (* -1/3 (* (pow kx 2) (sin th)))))) (pow ky 2))))
#s(approx (/ (* (* kx kx) (sin th)) (pow (sin ky) 2)) #s(hole binary64 (/ (+ (* (pow kx 2) (sin th)) (* (pow ky 2) (- (* (pow ky 2) (- (* -1 (* (pow ky 2) (+ (* -1/315 (* (pow kx 2) (sin th))) (+ (* 2/135 (* (pow kx 2) (sin th))) (* 1/3 (+ (* -1/9 (* (pow kx 2) (sin th))) (* 2/45 (* (pow kx 2) (sin th))))))))) (+ (* -1/9 (* (pow kx 2) (sin th))) (* 2/45 (* (pow kx 2) (sin th)))))) (* -1/3 (* (pow kx 2) (sin th)))))) (pow ky 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) (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2))) (sin th)) #s(hole binary64 (/ (* ky (sin th)) (sin kx))))
#s(approx (* (/ (sin ky) (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2))) (sin th)) #s(hole binary64 (* ky (+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx))))) (/ (sin th) (sin kx))))))
#s(approx (* (/ (sin ky) (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2))) (sin th)) #s(hole binary64 (* ky (+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (* (pow ky 2) (+ (* 1/120 (/ (sin th) (sin kx))) (+ (* 1/12 (/ (sin th) (pow (sin kx) 3))) (* 1/2 (* (sin kx) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))))))))) (/ (sin th) (sin kx))))))
#s(approx (* (/ (sin ky) (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2))) (sin th)) #s(hole binary64 (* ky (+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (* (pow ky 2) (+ (* 1/120 (/ (sin th) (sin kx))) (+ (* 1/12 (/ (sin th) (pow (sin kx) 3))) (+ (* 1/2 (* (sin kx) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))) (* (pow ky 2) (+ (* -1/2 (* (sin kx) (* (sin th) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))) (pow (sin kx) 2))) (+ (* 2/45 (/ 1 (pow (sin kx) 4))) (+ (* 2/3 (/ 1 (pow (sin kx) 6))) (/ 1 (pow (sin kx) 8)))))))) (+ (* -1/12 (* (sin kx) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))) (+ (* -1/240 (/ (sin th) (pow (sin kx) 3))) (* -1/5040 (/ (sin th) (sin kx)))))))))))))) (/ (sin th) (sin kx))))))
#s(approx (/ (sin ky) (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2))) #s(hole binary64 (/ ky (sin kx))))
#s(approx (/ (sin ky) (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2))) #s(hole binary64 (* ky (+ (* -1 (* (pow ky 2) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx))))))
#s(approx (/ (sin ky) (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2))) #s(hole binary64 (* ky (+ (* (pow ky 2) (- (* (pow ky 2) (+ (* 1/120 (/ 1 (sin kx))) (+ (* 1/2 (* (sin kx) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))))) (* 1/12 (/ 1 (pow (sin kx) 3)))))) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx))))))
#s(approx (/ (sin ky) (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2))) #s(hole binary64 (* ky (+ (* (pow ky 2) (- (* (pow ky 2) (+ (* 1/120 (/ 1 (sin kx))) (+ (* 1/12 (/ 1 (pow (sin kx) 3))) (+ (* 1/2 (* (sin kx) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))))) (* (pow ky 2) (- (+ (* -1/2 (* (sin kx) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))) (pow (sin kx) 2))) (+ (* 2/45 (/ 1 (pow (sin kx) 4))) (+ (* 2/3 (/ 1 (pow (sin kx) 6))) (/ 1 (pow (sin kx) 8))))))) (* -1/12 (* (sin kx) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))) (+ (* 1/5040 (/ 1 (sin kx))) (* 1/240 (/ 1 (pow (sin kx) 3)))))))))) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx))))))
#s(approx (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2)) #s(hole binary64 (sin kx)))
#s(approx (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2)) #s(hole binary64 (+ (sin kx) (* 1/2 (/ (pow ky 2) (sin kx))))))
#s(approx (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2)) #s(hole binary64 (+ (sin kx) (* (pow ky 2) (+ (* -1/2 (/ (* (pow ky 2) (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2))))) (sin kx))) (* 1/2 (/ 1 (sin kx))))))))
#s(approx (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2)) #s(hole binary64 (+ (sin kx) (* (pow ky 2) (+ (* (pow ky 2) (+ (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (sin kx))) (* 1/2 (/ (* (pow ky 2) (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))))) (sin kx))))) (* 1/2 (/ 1 (sin kx))))))))
#s(approx (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2) #s(hole binary64 (* 1/2 (log (pow (sin kx) 2)))))
#s(approx (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2) #s(hole binary64 (+ (* 1/2 (log (pow (sin kx) 2))) (* 1/2 (/ (pow ky 2) (pow (sin kx) 2))))))
#s(approx (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2) #s(hole binary64 (+ (* 1/2 (log (pow (sin kx) 2))) (* (pow ky 2) (+ (* -1/48 (* (pow ky 2) (+ (* 8 (/ 1 (pow (sin kx) 2))) (* 12 (/ 1 (pow (sin kx) 4)))))) (* 1/2 (/ 1 (pow (sin kx) 2))))))))
#s(approx (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2) #s(hole binary64 (+ (* 1/2 (log (pow (sin kx) 2))) (* (pow ky 2) (+ (* (pow ky 2) (+ (* -1/48 (+ (* 8 (/ 1 (pow (sin kx) 2))) (* 12 (/ 1 (pow (sin kx) 4))))) (* 1/1440 (* (pow ky 2) (+ (* 240 (/ 1 (pow (sin kx) 4))) (+ (* 240 (/ 1 (pow (sin kx) 6))) (* 32 (/ 1 (pow (sin kx) 2))))))))) (* 1/2 (/ 1 (pow (sin kx) 2))))))))
#s(approx (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) #s(hole binary64 (log (pow (sin kx) 2))))
#s(approx (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) #s(hole binary64 (+ (log (pow (sin kx) 2)) (/ (pow ky 2) (pow (sin kx) 2)))))
#s(approx (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) #s(hole binary64 (+ (log (pow (sin kx) 2)) (* (pow ky 2) (+ (* -1/24 (* (pow ky 2) (+ (* 8 (/ 1 (pow (sin kx) 2))) (* 12 (/ 1 (pow (sin kx) 4)))))) (/ 1 (pow (sin kx) 2)))))))
#s(approx (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) #s(hole binary64 (+ (log (pow (sin kx) 2)) (* (pow ky 2) (+ (* (pow ky 2) (+ (* -1/24 (+ (* 8 (/ 1 (pow (sin kx) 2))) (* 12 (/ 1 (pow (sin kx) 4))))) (* 1/720 (* (pow ky 2) (+ (* 32 (/ 1 (pow (sin kx) 2))) (+ (* 240 (/ 1 (pow (sin kx) 6))) (* 240 (/ 1 (pow (sin kx) 4))))))))) (/ 1 (pow (sin kx) 2)))))))
#s(approx (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) #s(hole binary64 (pow (sin kx) 2)))
#s(approx (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) #s(hole binary64 (+ (pow ky 2) (pow (sin kx) 2))))
#s(approx (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) #s(hole binary64 (+ (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2)))) (pow (sin kx) 2))))
#s(approx (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) #s(hole binary64 (+ (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3)))) (pow (sin kx) 2))))
#s(approx (* (/ (sin ky) (sqrt (- (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))) (sin th)) #s(hole binary64 (/ (* ky (sin th)) (sin kx))))
#s(approx (* (/ (sin ky) (sqrt (- (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))) (sin th)) #s(hole binary64 (* ky (+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx))))) (/ (sin th) (sin kx))))))
#s(approx (* (/ (sin ky) (sqrt (- (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))) (sin th)) #s(hole binary64 (* ky (+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (* (pow ky 2) (+ (* 1/120 (/ (sin th) (sin kx))) (+ (* 1/12 (/ (sin th) (pow (sin kx) 3))) (* 1/2 (* (sin kx) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))))))))) (/ (sin th) (sin kx))))))
#s(approx (* (/ (sin ky) (sqrt (- (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))) (sin th)) #s(hole binary64 (* ky (+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (* (pow ky 2) (+ (* 1/120 (/ (sin th) (sin kx))) (+ (* 1/12 (/ (sin th) (pow (sin kx) 3))) (+ (* 1/2 (* (sin kx) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))) (* (pow ky 2) (+ (* -1/12 (* (sin kx) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))) (+ (* -1/240 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/5040 (/ (sin th) (sin kx))) (* 1/2 (* (sin kx) (* (sin th) (- (* -1 (/ (- (/ 1 (pow (sin kx) 2)) 1/3) (pow (sin kx) 6))) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))) (pow (sin kx) 2))) (+ (* 2/45 (/ 1 (pow (sin kx) 4))) (/ 1 (pow (sin kx) 6))))))))))))))))))) (/ (sin th) (sin kx))))))
#s(approx (/ (sin ky) (sqrt (- (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (/ ky (sin kx))))
#s(approx (/ (sin ky) (sqrt (- (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (* ky (+ (* -1 (* (pow ky 2) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx))))))
#s(approx (/ (sin ky) (sqrt (- (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (* ky (+ (* (pow ky 2) (- (* (pow ky 2) (+ (* 1/120 (/ 1 (sin kx))) (+ (* 1/2 (* (sin kx) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))))) (* 1/12 (/ 1 (pow (sin kx) 3)))))) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx))))))
#s(approx (/ (sin ky) (sqrt (- (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (* ky (+ (* (pow ky 2) (- (* (pow ky 2) (+ (* 1/120 (/ 1 (sin kx))) (+ (* 1/12 (/ 1 (pow (sin kx) 3))) (+ (* 1/2 (* (sin kx) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))))) (* (pow ky 2) (- (+ (* -1/12 (* (sin kx) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))))) (* 1/2 (* (sin kx) (- (* -1 (/ (- (/ 1 (pow (sin kx) 2)) 1/3) (pow (sin kx) 6))) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))) (pow (sin kx) 2))) (+ (* 2/45 (/ 1 (pow (sin kx) 4))) (/ 1 (pow (sin kx) 6)))))))) (+ (* 1/5040 (/ 1 (sin kx))) (* 1/240 (/ 1 (pow (sin kx) 3)))))))))) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx))))))
#s(approx (sqrt (- (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (sin kx)))
#s(approx (sqrt (- (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (+ (sin kx) (* 1/2 (/ (pow ky 2) (sin kx))))))
#s(approx (sqrt (- (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (+ (sin kx) (* (pow ky 2) (+ (* -1/2 (/ (* (pow ky 2) (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2))))) (sin kx))) (* 1/2 (/ 1 (sin kx))))))))
#s(approx (sqrt (- (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (+ (sin kx) (* (pow ky 2) (+ (* (pow ky 2) (+ (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (sin kx))) (* 1/2 (/ (* (pow ky 2) (- (+ 2/45 (* 2/3 (/ 1 (pow (sin kx) 2)))) (+ (* -1 (/ (- (/ 1 (pow (sin kx) 2)) 1/3) (pow (sin kx) 2))) (+ (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))) (+ (* 1/3 (/ 1 (pow (sin kx) 2))) (/ 1 (pow (sin kx) 4))))))) (sin kx))))) (* 1/2 (/ 1 (sin kx))))))))
#s(approx (- (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (pow (sin kx) 2)))
#s(approx (- (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ (pow ky 2) (pow (sin kx) 2))))
#s(approx (- (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (/ (pow (sin ky) 4) (- (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) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* (pow ky 2) (- (+ 2/45 (* 2/3 (/ 1 (pow (sin kx) 2)))) (+ (* -1 (/ (- (/ 1 (pow (sin kx) 2)) 1/3) (pow (sin kx) 2))) (+ (* 1/3 (/ 1 (pow (sin kx) 2))) (/ 1 (pow (sin kx) 4)))))) 1/3)))) (pow (sin kx) 2))))
#s(approx (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (pow (sin kx) 2)))
#s(approx (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (pow ky 2) (pow (sin kx) 2))))
#s(approx (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (* (pow ky 2) (+ 1 (* (pow ky 2) (- (/ 1 (pow (sin kx) 2)) 1/3)))) (pow (sin kx) 2))))
#s(approx (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (* (pow ky 2) (+ 1 (* (pow ky 2) (- (+ (* (pow ky 2) (- 2/45 (+ (* -1 (/ (- (/ 1 (pow (sin kx) 2)) 1/3) (pow (sin kx) 2))) (* 1/3 (/ 1 (pow (sin kx) 2)))))) (/ 1 (pow (sin kx) 2))) 1/3)))) (pow (sin kx) 2))))
#s(approx (- (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (pow (sin kx) 2)))
#s(approx (- (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (* -1 (pow ky 2)) (pow (sin kx) 2))))
#s(approx (- (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (* (pow ky 2) (- (* 1/3 (pow ky 2)) 1)) (pow (sin kx) 2))))
#s(approx (- (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (* (pow ky 2) (- (* (pow ky 2) (+ 1/3 (* -2/45 (pow ky 2)))) 1)) (pow (sin kx) 2))))
#s(approx (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (/ (pow ky 4) (pow (sin kx) 2))))
#s(approx (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (* (pow ky 4) (+ (* (pow ky 2) (- (/ 1 (pow (sin kx) 4)) (* 2/3 (/ 1 (pow (sin kx) 2))))) (/ 1 (pow (sin kx) 2))))))
#s(approx (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (* (pow ky 4) (+ (* (pow ky 2) (- (+ (* (pow ky 2) (- (* 1/5 (/ 1 (pow (sin kx) 2))) (+ (* -1 (/ (- (/ 1 (pow (sin kx) 4)) (* 2/3 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))) (* 1/3 (/ 1 (pow (sin kx) 4)))))) (/ 1 (pow (sin kx) 4))) (* 2/3 (/ 1 (pow (sin kx) 2))))) (/ 1 (pow (sin kx) 2))))))
#s(approx (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (* (pow ky 4) (+ (* (pow ky 2) (- (+ (* (pow ky 2) (- (+ (* 1/5 (/ 1 (pow (sin kx) 2))) (* (pow ky 2) (- (* 2/45 (/ 1 (pow (sin kx) 4))) (+ (* -1 (/ (- (* 1/5 (/ 1 (pow (sin kx) 2))) (+ (* -1 (/ (- (/ 1 (pow (sin kx) 4)) (* 2/3 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))) (* 1/3 (/ 1 (pow (sin kx) 4))))) (pow (sin kx) 2))) (+ (* 34/945 (/ 1 (pow (sin kx) 2))) (* 1/3 (/ (- (/ 1 (pow (sin kx) 4)) (* 2/3 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2)))))))) (+ (* -1 (/ (- (/ 1 (pow (sin kx) 4)) (* 2/3 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))) (* 1/3 (/ 1 (pow (sin kx) 4)))))) (/ 1 (pow (sin kx) 4))) (* 2/3 (/ 1 (pow (sin kx) 2))))) (/ 1 (pow (sin kx) 2))))))
#s(approx (pow (sin ky) 4) #s(hole binary64 (pow ky 4)))
#s(approx (pow (sin ky) 4) #s(hole binary64 (* (pow ky 4) (+ 1 (* -2/3 (pow ky 2))))))
#s(approx (pow (sin ky) 4) #s(hole binary64 (* (pow ky 4) (+ 1 (* (pow ky 2) (- (* 1/5 (pow ky 2)) 2/3))))))
#s(approx (pow (sin ky) 4) #s(hole binary64 (* (pow ky 4) (+ 1 (* (pow ky 2) (- (* (pow ky 2) (+ 1/5 (* -34/945 (pow ky 2)))) 2/3))))))
#s(approx (sin ky) #s(hole binary64 (sin ky)))
#s(approx (* (sin th) (sin ky)) #s(hole binary64 (* (sin ky) (sin th))))
#s(approx (pow (sin ky) 2) #s(hole binary64 (pow (sin ky) 2)))
#s(approx (pow (sin ky) 4) #s(hole binary64 (pow (sin ky) 4)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (* (* th (sin ky)) (sqrt (/ 1 (+ (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 (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* (sin ky) (sqrt (/ 1 (+ (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 (+ (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* (pow th 2) (+ (* -1/6 (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* 1/120 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ (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 (+ (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* (pow th 2) (+ (* -1/6 (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* (pow th 2) (+ (* -1/5040 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* 1/120 (* (sin ky) (sqrt (/ 1 (+ (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 th #s(hole binary64 th))
#s(approx (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (* (sin th) (sin ky))) #s(hole binary64 (* (* th (sin ky)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
#s(approx (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (* (sin th) (sin ky))) #s(hole binary64 (* th (+ (* -1/6 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))
#s(approx (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (* (sin th) (sin ky))) #s(hole binary64 (* th (+ (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* (pow th 2) (+ (* -1/6 (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* 1/120 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))))))
#s(approx (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (* (sin th) (sin ky))) #s(hole binary64 (* th (+ (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* (pow th 2) (+ (* -1/6 (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* (pow th 2) (+ (* -1/5040 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* 1/120 (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))))))))
#s(approx (* (sin th) (sin ky)) #s(hole binary64 (* th (sin ky))))
#s(approx (* (sin th) (sin ky)) #s(hole binary64 (* th (+ (sin ky) (* -1/6 (* (pow th 2) (sin ky)))))))
#s(approx (* (sin th) (sin ky)) #s(hole binary64 (* th (+ (sin ky) (* (pow th 2) (+ (* -1/6 (sin ky)) (* 1/120 (* (pow th 2) (sin ky)))))))))
#s(approx (* (sin th) (sin ky)) #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 (+ (* (/ (* (* kx kx) (sin th)) (pow (sin ky) 2)) -1/2) (sin th)) #s(hole binary64 (* th (+ 1 (* -1/2 (/ (pow kx 2) (pow (sin ky) 2)))))))
#s(approx (+ (* (/ (* (* kx kx) (sin th)) (pow (sin ky) 2)) -1/2) (sin th)) #s(hole binary64 (* th (+ 1 (+ (* -1/2 (/ (pow kx 2) (pow (sin ky) 2))) (* (pow th 2) (- (* 1/12 (/ (pow kx 2) (pow (sin ky) 2))) 1/6)))))))
#s(approx (+ (* (/ (* (* kx kx) (sin th)) (pow (sin ky) 2)) -1/2) (sin th)) #s(hole binary64 (* th (+ 1 (+ (* -1/2 (/ (pow kx 2) (pow (sin ky) 2))) (* (pow th 2) (- (+ (* 1/12 (/ (pow kx 2) (pow (sin ky) 2))) (* (pow th 2) (+ 1/120 (* -1/240 (/ (pow kx 2) (pow (sin ky) 2)))))) 1/6)))))))
#s(approx (+ (* (/ (* (* kx kx) (sin th)) (pow (sin ky) 2)) -1/2) (sin th)) #s(hole binary64 (* th (+ 1 (+ (* -1/2 (/ (pow kx 2) (pow (sin ky) 2))) (* (pow th 2) (- (+ (* 1/12 (/ (pow kx 2) (pow (sin ky) 2))) (* (pow th 2) (+ 1/120 (+ (* -1/240 (/ (pow kx 2) (pow (sin ky) 2))) (* (pow th 2) (- (* 1/10080 (/ (pow kx 2) (pow (sin ky) 2))) 1/5040)))))) 1/6)))))))
#s(approx (/ (* (* kx kx) (sin th)) (pow (sin ky) 2)) #s(hole binary64 (/ (* (pow kx 2) th) (pow (sin ky) 2))))
#s(approx (/ (* (* kx kx) (sin th)) (pow (sin ky) 2)) #s(hole binary64 (* th (+ (* -1/6 (/ (* (pow kx 2) (pow th 2)) (pow (sin ky) 2))) (/ (pow kx 2) (pow (sin ky) 2))))))
#s(approx (/ (* (* kx kx) (sin th)) (pow (sin ky) 2)) #s(hole binary64 (* th (+ (* (pow th 2) (+ (* -1/6 (/ (pow kx 2) (pow (sin ky) 2))) (* 1/120 (/ (* (pow kx 2) (pow th 2)) (pow (sin ky) 2))))) (/ (pow kx 2) (pow (sin ky) 2))))))
#s(approx (/ (* (* kx kx) (sin th)) (pow (sin ky) 2)) #s(hole binary64 (* th (+ (* (pow th 2) (+ (* -1/6 (/ (pow kx 2) (pow (sin ky) 2))) (* (pow th 2) (+ (* -1/5040 (/ (* (pow kx 2) (pow th 2)) (pow (sin ky) 2))) (* 1/120 (/ (pow kx 2) (pow (sin ky) 2))))))) (/ (pow kx 2) (pow (sin ky) 2))))))
#s(approx (* (* kx kx) (sin th)) #s(hole binary64 (* (pow kx 2) th)))
#s(approx (* (* kx kx) (sin th)) #s(hole binary64 (* th (+ (* -1/6 (* (pow kx 2) (pow th 2))) (pow kx 2)))))
#s(approx (* (* kx kx) (sin th)) #s(hole binary64 (* th (+ (* (pow th 2) (+ (* -1/6 (pow kx 2)) (* 1/120 (* (pow kx 2) (pow th 2))))) (pow kx 2)))))
#s(approx (* (* kx kx) (sin th)) #s(hole binary64 (* th (+ (* (pow th 2) (+ (* -1/6 (pow kx 2)) (* (pow th 2) (+ (* -1/5040 (* (pow kx 2) (pow th 2))) (* 1/120 (pow kx 2)))))) (pow kx 2)))))
#s(approx (* (/ (sin ky) (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2))) (sin th)) #s(hole binary64 (* (* th (sin ky)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
#s(approx (* (/ (sin ky) (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2))) (sin th)) #s(hole binary64 (* th (+ (* -1/6 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))
#s(approx (* (/ (sin ky) (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2))) (sin th)) #s(hole binary64 (* th (+ (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* (pow th 2) (+ (* -1/6 (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* 1/120 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))))))
#s(approx (* (/ (sin ky) (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2))) (sin th)) #s(hole binary64 (* th (+ (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* (pow th 2) (+ (* -1/6 (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* (pow th 2) (+ (* -1/5040 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* 1/120 (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))))))))
#s(approx (* (/ (sin ky) (sqrt (- (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))) (sin th)) #s(hole binary64 (* (* th (sin ky)) (sqrt (/ 1 (- (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))))))
#s(approx (* (/ (sin ky) (sqrt (- (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))) (sin th)) #s(hole binary64 (* th (+ (* -1/6 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (- (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))))) (* (sin ky) (sqrt (/ 1 (- (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))))))))
#s(approx (* (/ (sin ky) (sqrt (- (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))) (sin th)) #s(hole binary64 (* th (+ (* (sin ky) (sqrt (/ 1 (- (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))))))) (* (pow th 2) (+ (* -1/6 (* (sin ky) (sqrt (/ 1 (- (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))))) (* 1/120 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (- (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))))))))))))))
#s(approx (* (/ (sin ky) (sqrt (- (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))) (sin th)) #s(hole binary64 (* th (+ (* (sin ky) (sqrt (/ 1 (- (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))))))) (* (pow th 2) (+ (* -1/6 (* (sin ky) (sqrt (/ 1 (- (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))))) (* (pow th 2) (+ (* -1/5040 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (- (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))))) (* 1/120 (* (sin ky) (sqrt (/ 1 (- (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))))))))))))))))
#s(approx (sin th) #s(hole binary64 (sin th)))
Outputs
(*.f64 (sin.f64 th) #s(approx (/ (sin ky) (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2))) (*.f64 (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)) (sin.f64 ky))))
(*.f64 #s(approx (/ (sin ky) (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2))) (*.f64 (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)) (sin.f64 ky))) (sin.f64 th))
#s(approx (/ (sin ky) (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2))) (*.f64 (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)) (sin.f64 ky)))
(*.f64 (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)) (sin.f64 ky))
(*.f64 (sin.f64 ky) (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)))
(*.f64 (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1/2 binary64)) (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1/2 binary64)))
(pow.f64 (pow.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal -1 binary64)) #s(literal 1/2 binary64))
(pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64))
(pow.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal -1/2 binary64))
(/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))
(sqrt.f64 (pow.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal -1 binary64)))
(exp.f64 (*.f64 (log.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky))) #s(literal -1 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky))) #s(literal -1 binary64))) (sinh.f64 (*.f64 (log.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky))) #s(literal -1 binary64))))
(pow.f64 (exp.f64 (log.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal 1/2 binary64))
(pow.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 1/2 binary64))
(sqrt.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
(hypot.f64 (pow.f64 (sin.f64 ky) #s(literal 1 binary64)) (pow.f64 (sin.f64 kx) #s(literal 1 binary64)))
(hypot.f64 (pow.f64 (sin.f64 ky) #s(literal 1 binary64)) (neg.f64 (sin.f64 kx)))
(hypot.f64 (pow.f64 (sin.f64 ky) #s(literal 1 binary64)) (fabs.f64 (sin.f64 kx)))
(hypot.f64 (pow.f64 (sin.f64 ky) #s(literal 1 binary64)) (sin.f64 kx))
(hypot.f64 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) (pow.f64 (sin.f64 ky) #s(literal 1 binary64)))
(hypot.f64 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) (neg.f64 (sin.f64 ky)))
(hypot.f64 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) (fabs.f64 (sin.f64 ky)))
(hypot.f64 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) (sin.f64 ky))
(hypot.f64 (neg.f64 (sin.f64 kx)) (pow.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)) (fabs.f64 (sin.f64 ky)))
(hypot.f64 (neg.f64 (sin.f64 kx)) (sin.f64 ky))
(hypot.f64 (neg.f64 (sin.f64 ky)) (pow.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 (fabs.f64 (sin.f64 kx)) (pow.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)) (fabs.f64 (sin.f64 ky)))
(hypot.f64 (fabs.f64 (sin.f64 kx)) (sin.f64 ky))
(hypot.f64 (fabs.f64 (sin.f64 ky)) (pow.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 (sin.f64 kx) (pow.f64 (sin.f64 ky) #s(literal 1 binary64)))
(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) (pow.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 (log.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky))))
(+.f64 (cosh.f64 (log.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) (sinh.f64 (log.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))
(sin.f64 kx)
kx
(sin.f64 ky)
ky
#s(literal -1 binary64)
(sin.f64 th)
th
#s(approx (* (/ (sin ky) (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2))) (sin th)) (*.f64 (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)) (*.f64 (sin.f64 th) (sin.f64 ky))))
(*.f64 (*.f64 (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)) (sin.f64 th)) (sin.f64 ky))
(*.f64 (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)) (*.f64 (sin.f64 th) (sin.f64 ky)))
(*.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)))
(*.f64 (sin.f64 ky) (*.f64 (sin.f64 th) (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64))))
(*.f64 (sin.f64 th) (sin.f64 ky))
(*.f64 (sin.f64 ky) (sin.f64 th))
(/.f64 (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 ky th))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 th ky)) (cos.f64 (+.f64 th ky))) #s(literal 2 binary64))
#s(approx (* (/ (sin ky) (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2))) (sin th)) (fma.f64 (*.f64 (*.f64 kx kx) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #s(literal -1/2 binary64) (sin.f64 th)))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 kx kx) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #s(literal -1/2 binary64)) (*.f64 (*.f64 (*.f64 kx kx) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #s(literal -1/2 binary64))) (*.f64 (sin.f64 th) (sin.f64 th))) (-.f64 (*.f64 (*.f64 (*.f64 kx kx) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #s(literal -1/2 binary64)) (sin.f64 th)))
(/.f64 (-.f64 (*.f64 (sin.f64 th) (sin.f64 th)) (*.f64 (*.f64 (*.f64 (*.f64 kx kx) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #s(literal -1/2 binary64)) (*.f64 (*.f64 (*.f64 kx kx) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #s(literal -1/2 binary64)))) (-.f64 (sin.f64 th) (*.f64 (*.f64 (*.f64 kx kx) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #s(literal -1/2 binary64))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 kx kx) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #s(literal -1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (sin.f64 th) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (*.f64 kx kx) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #s(literal -1/2 binary64)) (*.f64 (*.f64 (*.f64 kx kx) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #s(literal -1/2 binary64)) (-.f64 (*.f64 (sin.f64 th) (sin.f64 th)) (*.f64 (*.f64 (*.f64 (*.f64 kx kx) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #s(literal -1/2 binary64)) (sin.f64 th)))))
(/.f64 (+.f64 (pow.f64 (sin.f64 th) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 kx kx) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #s(literal -1/2 binary64)) #s(literal 3 binary64))) (fma.f64 (sin.f64 th) (sin.f64 th) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 kx kx) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #s(literal -1/2 binary64)) (*.f64 (*.f64 (*.f64 kx kx) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #s(literal -1/2 binary64))) (*.f64 (sin.f64 th) (*.f64 (*.f64 (*.f64 kx kx) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #s(literal -1/2 binary64))))))
(fma.f64 (*.f64 (*.f64 kx kx) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #s(literal -1/2 binary64) (sin.f64 th))
(fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 kx kx) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (sin.f64 th))
(-.f64 (sin.f64 th) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 kx kx) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(+.f64 (*.f64 (*.f64 (*.f64 kx kx) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #s(literal -1/2 binary64)) (sin.f64 th))
(+.f64 (sin.f64 th) (*.f64 (*.f64 (*.f64 kx kx) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #s(literal -1/2 binary64)))
(*.f64 (*.f64 kx kx) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 (*.f64 kx kx) (sin.f64 th))) (neg.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
(/.f64 (*.f64 (*.f64 kx kx) (sin.f64 th)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))
(*.f64 (*.f64 kx kx) (sin.f64 th))
(*.f64 (sin.f64 th) (*.f64 kx kx))
(*.f64 kx (*.f64 kx (sin.f64 th)))
(*.f64 (pow.f64 kx #s(literal 1 binary64)) (pow.f64 kx #s(literal 1 binary64)))
(*.f64 (neg.f64 kx) (neg.f64 kx))
(*.f64 (fabs.f64 kx) (fabs.f64 kx))
(*.f64 kx kx)
(pow.f64 kx #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 kx) #s(literal 2 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 kx) #s(literal 2 binary64))) (sinh.f64 (*.f64 (log.f64 kx) #s(literal 2 binary64))))
(*.f64 (pow.f64 (sin.f64 ky) #s(literal 1 binary64)) (pow.f64 (sin.f64 ky) #s(literal 1 binary64)))
(*.f64 (neg.f64 (sin.f64 ky)) (neg.f64 (sin.f64 ky)))
(*.f64 (fabs.f64 (sin.f64 ky)) (fabs.f64 (sin.f64 ky)))
(*.f64 (sin.f64 ky) (sin.f64 ky))
(pow.f64 (sin.f64 ky) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 ky ky)) (cos.f64 (+.f64 ky ky))) #s(literal 2 binary64))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))
(exp.f64 (*.f64 (log.f64 (sin.f64 ky)) #s(literal 2 binary64)))
(+.f64 (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(literal 2 binary64)
#s(literal -1/2 binary64)
(*.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (sin.f64 th))
(*.f64 (sin.f64 th) (/.f64 (sin.f64 ky) (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 (exp.f64 (log.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal 1/2 binary64))
(pow.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 1/2 binary64))
(sqrt.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
(hypot.f64 (pow.f64 (sin.f64 ky) #s(literal 1 binary64)) (pow.f64 (sin.f64 kx) #s(literal 1 binary64)))
(hypot.f64 (pow.f64 (sin.f64 ky) #s(literal 1 binary64)) (neg.f64 (sin.f64 kx)))
(hypot.f64 (pow.f64 (sin.f64 ky) #s(literal 1 binary64)) (fabs.f64 (sin.f64 kx)))
(hypot.f64 (pow.f64 (sin.f64 ky) #s(literal 1 binary64)) (sin.f64 kx))
(hypot.f64 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) (pow.f64 (sin.f64 ky) #s(literal 1 binary64)))
(hypot.f64 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) (neg.f64 (sin.f64 ky)))
(hypot.f64 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) (fabs.f64 (sin.f64 ky)))
(hypot.f64 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) (sin.f64 ky))
(hypot.f64 (neg.f64 (sin.f64 kx)) (pow.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)) (fabs.f64 (sin.f64 ky)))
(hypot.f64 (neg.f64 (sin.f64 kx)) (sin.f64 ky))
(hypot.f64 (neg.f64 (sin.f64 ky)) (pow.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 (fabs.f64 (sin.f64 kx)) (pow.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)) (fabs.f64 (sin.f64 ky)))
(hypot.f64 (fabs.f64 (sin.f64 kx)) (sin.f64 ky))
(hypot.f64 (fabs.f64 (sin.f64 ky)) (pow.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 (sin.f64 kx) (pow.f64 (sin.f64 ky) #s(literal 1 binary64)))
(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) (pow.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 (log.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky))))
(+.f64 (cosh.f64 (log.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) (sinh.f64 (log.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))
(*.f64 (log.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
(log.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)))
(log.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 (/.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (-.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 4 binary64)) (-.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (*.f64 (/.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (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 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
(/.f64 (-.f64 (pow.f64 (/.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (/.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #s(literal 3 binary64))) (fma.f64 (/.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (-.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 4 binary64)) (-.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (fma.f64 (/.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (*.f64 (/.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))
(/.f64 (+.f64 (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (pow.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)) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(/.f64 (-.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (*.f64 (-.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 (sin.f64 ky) #s(literal 4 binary64)))) (*.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)))))
(fma.f64 (pow.f64 (sin.f64 ky) #s(literal 1 binary64)) (pow.f64 (sin.f64 ky) #s(literal 1 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))
(fma.f64 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))
(fma.f64 (neg.f64 (sin.f64 kx)) (neg.f64 (sin.f64 kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))
(fma.f64 (neg.f64 (sin.f64 ky)) (neg.f64 (sin.f64 ky)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))
(fma.f64 (fabs.f64 (sin.f64 kx)) (fabs.f64 (sin.f64 kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))
(fma.f64 (fabs.f64 (sin.f64 ky)) (fabs.f64 (sin.f64 ky)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))
(fma.f64 (sin.f64 kx) (sin.f64 kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))
(fma.f64 (sin.f64 ky) (sin.f64 ky) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))
(-.f64 (/.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (-.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)) (*.f64 (neg.f64 (sin.f64 ky)) (sin.f64 ky)))
(+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))
(+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))
#s(literal 1/2 binary64)
(*.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (sin.f64 th))
(*.f64 (sin.f64 th) (/.f64 (sin.f64 ky) (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 (exp.f64 (log.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal 1/2 binary64))
(pow.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 1/2 binary64))
(sqrt.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
(hypot.f64 (pow.f64 (sin.f64 ky) #s(literal 1 binary64)) (pow.f64 (sin.f64 kx) #s(literal 1 binary64)))
(hypot.f64 (pow.f64 (sin.f64 ky) #s(literal 1 binary64)) (neg.f64 (sin.f64 kx)))
(hypot.f64 (pow.f64 (sin.f64 ky) #s(literal 1 binary64)) (fabs.f64 (sin.f64 kx)))
(hypot.f64 (pow.f64 (sin.f64 ky) #s(literal 1 binary64)) (sin.f64 kx))
(hypot.f64 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) (pow.f64 (sin.f64 ky) #s(literal 1 binary64)))
(hypot.f64 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) (neg.f64 (sin.f64 ky)))
(hypot.f64 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) (fabs.f64 (sin.f64 ky)))
(hypot.f64 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) (sin.f64 ky))
(hypot.f64 (neg.f64 (sin.f64 kx)) (pow.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)) (fabs.f64 (sin.f64 ky)))
(hypot.f64 (neg.f64 (sin.f64 kx)) (sin.f64 ky))
(hypot.f64 (neg.f64 (sin.f64 ky)) (pow.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 (fabs.f64 (sin.f64 kx)) (pow.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)) (fabs.f64 (sin.f64 ky)))
(hypot.f64 (fabs.f64 (sin.f64 kx)) (sin.f64 ky))
(hypot.f64 (fabs.f64 (sin.f64 ky)) (pow.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 (sin.f64 kx) (pow.f64 (sin.f64 ky) #s(literal 1 binary64)))
(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) (pow.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 (log.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky))))
(+.f64 (cosh.f64 (log.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) (sinh.f64 (log.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))
(/.f64 (-.f64 (*.f64 (/.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (-.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 4 binary64)) (-.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (*.f64 (/.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (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 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
(/.f64 (-.f64 (pow.f64 (/.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (/.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #s(literal 3 binary64))) (fma.f64 (/.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (-.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 4 binary64)) (-.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (fma.f64 (/.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (*.f64 (/.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))
(/.f64 (+.f64 (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (pow.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)) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(/.f64 (-.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (*.f64 (-.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 (sin.f64 ky) #s(literal 4 binary64)))) (*.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)))))
(fma.f64 (pow.f64 (sin.f64 ky) #s(literal 1 binary64)) (pow.f64 (sin.f64 ky) #s(literal 1 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))
(fma.f64 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))
(fma.f64 (neg.f64 (sin.f64 kx)) (neg.f64 (sin.f64 kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))
(fma.f64 (neg.f64 (sin.f64 ky)) (neg.f64 (sin.f64 ky)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))
(fma.f64 (fabs.f64 (sin.f64 kx)) (fabs.f64 (sin.f64 kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))
(fma.f64 (fabs.f64 (sin.f64 ky)) (fabs.f64 (sin.f64 ky)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))
(fma.f64 (sin.f64 kx) (sin.f64 kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))
(fma.f64 (sin.f64 ky) (sin.f64 ky) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))
(-.f64 (/.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (-.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)) (*.f64 (neg.f64 (sin.f64 ky)) (sin.f64 ky)))
(+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))
(+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))
(/.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
(/.f64 (neg.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64))) (neg.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 kx) #s(literal 2 binary64)))
(pow.f64 (sin.f64 kx) #s(literal 4 binary64))
(exp.f64 (*.f64 (log.f64 (sin.f64 kx)) #s(literal 4 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 (sin.f64 kx)) #s(literal 4 binary64))) (sinh.f64 (*.f64 (log.f64 (sin.f64 kx)) #s(literal 4 binary64))))
#s(literal 4 binary64)
(/.f64 (-.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 (sin.f64 ky) #s(literal 4 binary64))) (fma.f64 (sin.f64 kx) (sin.f64 kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
(/.f64 (-.f64 (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (pow.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)) (*.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)))
(*.f64 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) (pow.f64 (sin.f64 kx) #s(literal 1 binary64)))
(*.f64 (neg.f64 (sin.f64 kx)) (neg.f64 (sin.f64 kx)))
(*.f64 (fabs.f64 (sin.f64 kx)) (fabs.f64 (sin.f64 kx)))
(*.f64 (sin.f64 kx) (sin.f64 kx))
(pow.f64 (sin.f64 kx) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx))) #s(literal 2 binary64))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))
(exp.f64 (*.f64 (log.f64 (sin.f64 kx)) #s(literal 2 binary64)))
(+.f64 (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 (neg.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64))) (neg.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 ky) #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
(*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))
(pow.f64 (sin.f64 ky) #s(literal 4 binary64))
(exp.f64 (*.f64 (log.f64 (sin.f64 ky)) #s(literal 4 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 (sin.f64 ky)) #s(literal 4 binary64))) (sinh.f64 (*.f64 (log.f64 (sin.f64 ky)) #s(literal 4 binary64))))
#s(approx (* (/ (sin ky) (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2))) (sin th)) (sin.f64 th))
#s(approx (* (/ (sin ky) (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2))) (sin th)) (fma.f64 (*.f64 (*.f64 kx kx) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #s(literal -1/2 binary64) (sin.f64 th)))
#s(approx (* (/ (sin ky) (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2))) (sin th)) (fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 kx kx)) (*.f64 (*.f64 (fma.f64 (pow.f64 (sin.f64 ky) #s(literal -6 binary64)) #s(literal 3/4 binary64) (*.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 1/3 binary64))) (sin.f64 th)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (/.f64 (*.f64 #s(literal -1/2 binary64) (sin.f64 th)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (*.f64 kx kx) (sin.f64 th)))
#s(approx (* (/ (sin ky) (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2))) (sin th)) (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 (fma.f64 (pow.f64 (sin.f64 ky) #s(literal -6 binary64)) #s(literal 3/4 binary64) (*.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 1/3 binary64))) (sin.f64 th)) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 kx kx)) (*.f64 (*.f64 (fma.f64 (/.f64 (fma.f64 (pow.f64 (sin.f64 ky) #s(literal -6 binary64)) #s(literal 3/4 binary64) (*.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 1/3 binary64))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal -1/2 binary64) (fma.f64 #s(literal 2/45 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) (fma.f64 #s(literal 2/3 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 binary64)) (pow.f64 (sin.f64 ky) #s(literal -8 binary64))))) (sin.f64 th)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (*.f64 kx kx) (/.f64 (*.f64 #s(literal -1/2 binary64) (sin.f64 th)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (*.f64 kx kx) (sin.f64 th)))
#s(approx (/ (sin ky) (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2))) #s(literal 1 binary64))
#s(approx (/ (sin ky) (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2))) (fma.f64 (/.f64 (*.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1 binary64)))
#s(approx (/ (sin ky) (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (*.f64 (fma.f64 (pow.f64 (sin.f64 ky) #s(literal -6 binary64)) #s(literal 3/4 binary64) (*.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 1/3 binary64))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)))) (*.f64 kx kx) #s(literal 1 binary64)))
#s(approx (/ (sin ky) (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2))) (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (fma.f64 (pow.f64 (sin.f64 ky) #s(literal -6 binary64)) #s(literal 3/4 binary64) (*.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 1/3 binary64))) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 kx kx)) (*.f64 (fma.f64 (/.f64 (fma.f64 (pow.f64 (sin.f64 ky) #s(literal -6 binary64)) #s(literal 3/4 binary64) (*.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 1/3 binary64))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal -1/2 binary64) (fma.f64 #s(literal 2/45 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) (fma.f64 #s(literal 2/3 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 binary64)) (pow.f64 (sin.f64 ky) #s(literal -8 binary64))))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (*.f64 kx kx) (*.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)))) (*.f64 kx kx) #s(literal 1 binary64)))
#s(approx (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (sin ky)) #s(literal 1 binary64))
#s(approx (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (sin ky)) (fma.f64 (/.f64 (*.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1 binary64)))
#s(approx (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (sin ky)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (*.f64 (fma.f64 (pow.f64 (sin.f64 ky) #s(literal -6 binary64)) #s(literal 3/4 binary64) (*.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 1/3 binary64))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)))) (*.f64 kx kx) #s(literal 1 binary64)))
#s(approx (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (sin ky)) (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (fma.f64 (pow.f64 (sin.f64 ky) #s(literal -6 binary64)) #s(literal 3/4 binary64) (*.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 1/3 binary64))) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 kx kx)) (*.f64 (fma.f64 (/.f64 (fma.f64 (pow.f64 (sin.f64 ky) #s(literal -6 binary64)) #s(literal 3/4 binary64) (*.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 1/3 binary64))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal -1/2 binary64) (fma.f64 #s(literal 2/45 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) (fma.f64 #s(literal 2/3 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 binary64)) (pow.f64 (sin.f64 ky) #s(literal -8 binary64))))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (*.f64 kx kx) (*.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)))) (*.f64 kx kx) #s(literal 1 binary64)))
#s(approx (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (pow.f64 (sin.f64 ky) #s(literal -1 binary64)))
#s(approx (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (fma.f64 (/.f64 (*.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal 3 binary64))) #s(literal -1/2 binary64) (pow.f64 (sin.f64 ky) #s(literal -1 binary64))))
#s(approx (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (fma.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (*.f64 (fma.f64 (pow.f64 (sin.f64 ky) #s(literal -6 binary64)) #s(literal 3/4 binary64) (*.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 1/3 binary64))) (sin.f64 ky)) (*.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal -3 binary64)))) (*.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal -1 binary64))))
#s(approx (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (sin.f64 ky)) (fma.f64 (pow.f64 (sin.f64 ky) #s(literal -6 binary64)) #s(literal 3/4 binary64) (*.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 1/3 binary64))) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 kx kx)) (*.f64 (fma.f64 (/.f64 (fma.f64 (pow.f64 (sin.f64 ky) #s(literal -6 binary64)) #s(literal 3/4 binary64) (*.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 1/3 binary64))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal -1/2 binary64) (fma.f64 #s(literal 2/45 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) (fma.f64 #s(literal 2/3 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 binary64)) (pow.f64 (sin.f64 ky) #s(literal -8 binary64))))) (sin.f64 ky)))) (*.f64 kx kx) (*.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 ky) #s(literal -3 binary64)))) (*.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal -1 binary64))))
#s(approx (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2)) (sin.f64 ky))
#s(approx (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2)) (fma.f64 (/.f64 (*.f64 kx kx) (sin.f64 ky)) #s(literal 1/2 binary64) (sin.f64 ky)))
#s(approx (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2)) (fma.f64 (fma.f64 (/.f64 (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)) #s(literal 1/3 binary64)) (*.f64 kx kx)) (sin.f64 ky)) #s(literal -1/2 binary64) (/.f64 #s(literal 1/2 binary64) (sin.f64 ky))) (*.f64 kx kx) (sin.f64 ky)))
#s(approx (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2)) (fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 kx kx) (/.f64 (-.f64 #s(literal 2/45 binary64) (/.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)) #s(literal 1/3 binary64))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (sin.f64 ky))) #s(literal 1/2 binary64) (/.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)) #s(literal 1/3 binary64))) (sin.f64 ky))) (*.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 #s(literal 1/120 binary64) (*.f64 kx kx)) #s(literal 1/6 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) kx))
#s(approx (sin kx) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 kx kx) #s(literal 1/120 binary64)) (*.f64 kx kx)) #s(literal 1/6 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) kx))
#s(approx kx kx)
#s(approx (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (* (sin th) (sin ky))) (sin.f64 th))
#s(approx (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (* (sin th) (sin ky))) (fma.f64 (*.f64 (*.f64 kx kx) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #s(literal -1/2 binary64) (sin.f64 th)))
#s(approx (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (* (sin th) (sin ky))) (fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 kx kx)) (*.f64 (*.f64 (fma.f64 (pow.f64 (sin.f64 ky) #s(literal -6 binary64)) #s(literal 3/4 binary64) (*.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 1/3 binary64))) (sin.f64 th)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (/.f64 (*.f64 #s(literal -1/2 binary64) (sin.f64 th)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (*.f64 kx kx) (sin.f64 th)))
#s(approx (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (* (sin th) (sin ky))) (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 (fma.f64 (pow.f64 (sin.f64 ky) #s(literal -6 binary64)) #s(literal 3/4 binary64) (*.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 1/3 binary64))) (sin.f64 th)) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 kx kx)) (*.f64 (*.f64 (fma.f64 (/.f64 (fma.f64 (pow.f64 (sin.f64 ky) #s(literal -6 binary64)) #s(literal 3/4 binary64) (*.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 1/3 binary64))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal -1/2 binary64) (fma.f64 #s(literal 2/45 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) (fma.f64 #s(literal 2/3 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 binary64)) (pow.f64 (sin.f64 ky) #s(literal -8 binary64))))) (sin.f64 th)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (*.f64 kx kx) (/.f64 (*.f64 #s(literal -1/2 binary64) (sin.f64 th)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (*.f64 kx kx) (sin.f64 th)))
#s(approx (+ (* (/ (* (* kx kx) (sin th)) (pow (sin ky) 2)) -1/2) (sin th)) (sin.f64 th))
#s(approx (+ (* (/ (* (* kx kx) (sin th)) (pow (sin ky) 2)) -1/2) (sin th)) (fma.f64 (*.f64 (*.f64 kx kx) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #s(literal -1/2 binary64) (sin.f64 th)))
#s(approx (/ (* (* kx kx) (sin th)) (pow (sin ky) 2)) (*.f64 (*.f64 kx kx) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
#s(approx (* (* kx kx) (sin th)) (*.f64 (*.f64 kx kx) (sin.f64 th)))
#s(approx (* kx kx) (*.f64 kx kx))
#s(approx (* (/ (sin ky) (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2))) (sin th)) (sin.f64 th))
#s(approx (* (/ (sin ky) (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2))) (sin th)) (fma.f64 (*.f64 (*.f64 kx kx) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #s(literal -1/2 binary64) (sin.f64 th)))
#s(approx (* (/ (sin ky) (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2))) (sin th)) (fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 kx kx)) (*.f64 (*.f64 (fma.f64 (pow.f64 (sin.f64 ky) #s(literal -6 binary64)) #s(literal 3/4 binary64) (*.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 1/3 binary64))) (sin.f64 th)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (/.f64 (*.f64 #s(literal -1/2 binary64) (sin.f64 th)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (*.f64 kx kx) (sin.f64 th)))
#s(approx (* (/ (sin ky) (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2))) (sin th)) (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 (fma.f64 (pow.f64 (sin.f64 ky) #s(literal -6 binary64)) #s(literal 3/4 binary64) (*.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 1/3 binary64))) (sin.f64 th)) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 kx kx)) (*.f64 (*.f64 (fma.f64 (/.f64 (fma.f64 (pow.f64 (sin.f64 ky) #s(literal -6 binary64)) #s(literal 3/4 binary64) (*.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 1/3 binary64))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal -1/2 binary64) (fma.f64 #s(literal 2/45 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) (fma.f64 #s(literal 2/3 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 binary64)) (pow.f64 (sin.f64 ky) #s(literal -8 binary64))))) (sin.f64 th)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (*.f64 kx kx) (/.f64 (*.f64 #s(literal -1/2 binary64) (sin.f64 th)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (*.f64 kx kx) (sin.f64 th)))
#s(approx (/ (sin ky) (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2))) #s(literal 1 binary64))
#s(approx (/ (sin ky) (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2))) (fma.f64 (/.f64 (*.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1 binary64)))
#s(approx (/ (sin ky) (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (*.f64 (fma.f64 (pow.f64 (sin.f64 ky) #s(literal -6 binary64)) #s(literal 3/4 binary64) (*.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 1/3 binary64))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)))) (*.f64 kx kx) #s(literal 1 binary64)))
#s(approx (/ (sin ky) (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2))) (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (fma.f64 (pow.f64 (sin.f64 ky) #s(literal -6 binary64)) #s(literal 3/4 binary64) (*.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 1/3 binary64))) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 kx kx)) (*.f64 (fma.f64 (/.f64 (fma.f64 (pow.f64 (sin.f64 ky) #s(literal -6 binary64)) #s(literal 3/4 binary64) (*.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 1/3 binary64))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal -1/2 binary64) (fma.f64 #s(literal 2/45 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) (fma.f64 #s(literal 2/3 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 binary64)) (pow.f64 (sin.f64 ky) #s(literal -8 binary64))))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (*.f64 kx kx) (*.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)))) (*.f64 kx kx) #s(literal 1 binary64)))
#s(approx (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2)) (sin.f64 ky))
#s(approx (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2)) (fma.f64 (/.f64 (*.f64 kx kx) (sin.f64 ky)) #s(literal 1/2 binary64) (sin.f64 ky)))
#s(approx (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2)) (fma.f64 (fma.f64 (/.f64 (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)) #s(literal 1/3 binary64)) (*.f64 kx kx)) (sin.f64 ky)) #s(literal -1/2 binary64) (/.f64 #s(literal 1/2 binary64) (sin.f64 ky))) (*.f64 kx kx) (sin.f64 ky)))
#s(approx (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2)) (fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 kx kx) (/.f64 (-.f64 #s(literal 2/45 binary64) (/.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)) #s(literal 1/3 binary64))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (sin.f64 ky))) #s(literal 1/2 binary64) (/.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)) #s(literal 1/3 binary64))) (sin.f64 ky))) (*.f64 kx kx) (/.f64 #s(literal 1/2 binary64) (sin.f64 ky))) (*.f64 kx kx) (sin.f64 ky)))
#s(approx (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2) (log.f64 (pow.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) #s(literal 1/2 binary64))))
#s(approx (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 2 binary64) (log.f64 (sin.f64 ky)) (/.f64 (*.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
#s(approx (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2) (fma.f64 (fma.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 kx kx)) (fma.f64 #s(literal 12 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) (*.f64 (pow.f64 (sin.f64 ky) #s(literal -2 binary64)) #s(literal 8 binary64))) (*.f64 (pow.f64 (sin.f64 ky) #s(literal -2 binary64)) #s(literal 1/2 binary64))) (*.f64 kx kx) (log.f64 (pow.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) #s(literal 1/2 binary64)))))
#s(approx (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2) (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/1440 binary64) (*.f64 kx kx)) (fma.f64 #s(literal 240 binary64) (+.f64 (pow.f64 (sin.f64 ky) #s(literal -6 binary64)) (pow.f64 (sin.f64 ky) #s(literal -4 binary64))) (*.f64 #s(literal 32 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)))) (*.f64 (fma.f64 #s(literal 12 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) (*.f64 (pow.f64 (sin.f64 ky) #s(literal -2 binary64)) #s(literal 8 binary64))) #s(literal -1/48 binary64))) (*.f64 kx kx) (*.f64 (pow.f64 (sin.f64 ky) #s(literal -2 binary64)) #s(literal 1/2 binary64))) (*.f64 kx kx) (log.f64 (pow.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) #s(literal 1/2 binary64)))))
#s(approx (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) (log.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
#s(approx (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) (fma.f64 #s(literal 2 binary64) (log.f64 (sin.f64 ky)) (/.f64 (*.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
#s(approx (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) (fma.f64 (fma.f64 (*.f64 #s(literal -1/24 binary64) (*.f64 kx kx)) (fma.f64 #s(literal 12 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) (*.f64 (pow.f64 (sin.f64 ky) #s(literal -2 binary64)) #s(literal 8 binary64))) (pow.f64 (sin.f64 ky) #s(literal -2 binary64))) (*.f64 kx kx) (log.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
#s(approx (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 kx kx)) (fma.f64 #s(literal 240 binary64) (+.f64 (pow.f64 (sin.f64 ky) #s(literal -6 binary64)) (pow.f64 (sin.f64 ky) #s(literal -4 binary64))) (*.f64 #s(literal 32 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)))) (*.f64 #s(literal -1/24 binary64) (fma.f64 #s(literal 12 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) (*.f64 (pow.f64 (sin.f64 ky) #s(literal -2 binary64)) #s(literal 8 binary64))))) (*.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal -2 binary64))) (*.f64 kx kx) (log.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
#s(approx (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))
#s(approx (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) (fma.f64 kx kx (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
#s(approx (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) (fma.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
#s(approx (+ (* (sin kx) (sin kx)) (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) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
#s(approx (* (/ (sin ky) (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2))) (sin th)) (sin.f64 th))
#s(approx (* (/ (sin ky) (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2))) (sin th)) (fma.f64 (*.f64 (*.f64 kx kx) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #s(literal -1/2 binary64) (sin.f64 th)))
#s(approx (* (/ (sin ky) (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2))) (sin th)) (fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 kx kx)) (*.f64 (*.f64 (fma.f64 (pow.f64 (sin.f64 ky) #s(literal -6 binary64)) #s(literal 3/4 binary64) (*.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 1/3 binary64))) (sin.f64 th)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (/.f64 (*.f64 #s(literal -1/2 binary64) (sin.f64 th)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (*.f64 kx kx) (sin.f64 th)))
#s(approx (* (/ (sin ky) (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2))) (sin th)) (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 kx kx)) (*.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (sin.f64 th)) (fma.f64 (/.f64 (-.f64 #s(literal 1/3 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64))) (pow.f64 (sin.f64 ky) #s(literal 6 binary64))) #s(literal -1 binary64) (fma.f64 (/.f64 (fma.f64 (pow.f64 (sin.f64 ky) #s(literal -6 binary64)) #s(literal 3/4 binary64) (*.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 1/3 binary64))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal -1/2 binary64) (fma.f64 #s(literal 2/45 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) (pow.f64 (sin.f64 ky) #s(literal -6 binary64)))))) (*.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 (fma.f64 (pow.f64 (sin.f64 ky) #s(literal -6 binary64)) #s(literal 3/4 binary64) (*.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 1/3 binary64))) (sin.f64 th)))) (*.f64 kx kx) (/.f64 (*.f64 #s(literal -1/2 binary64) (sin.f64 th)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (*.f64 kx kx) (sin.f64 th)))
#s(approx (/ (sin ky) (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2))) #s(literal 1 binary64))
#s(approx (/ (sin ky) (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2))) (fma.f64 (/.f64 (*.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1 binary64)))
#s(approx (/ (sin ky) (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (*.f64 (fma.f64 (pow.f64 (sin.f64 ky) #s(literal -6 binary64)) #s(literal 3/4 binary64) (*.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 1/3 binary64))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)))) (*.f64 kx kx) #s(literal 1 binary64)))
#s(approx (/ (sin ky) (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2))) (fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 (*.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (fma.f64 (/.f64 (-.f64 #s(literal 1/3 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64))) (pow.f64 (sin.f64 ky) #s(literal 6 binary64))) #s(literal -1 binary64) (fma.f64 (/.f64 (fma.f64 (pow.f64 (sin.f64 ky) #s(literal -6 binary64)) #s(literal 3/4 binary64) (*.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 1/3 binary64))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal -1/2 binary64) (fma.f64 #s(literal 2/45 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) (pow.f64 (sin.f64 ky) #s(literal -6 binary64)))))) #s(literal -1/2 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (fma.f64 (pow.f64 (sin.f64 ky) #s(literal -6 binary64)) #s(literal 3/4 binary64) (*.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 1/3 binary64))))) (*.f64 kx kx) (*.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)))) (*.f64 kx kx) #s(literal 1 binary64)))
#s(approx (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2)) (sin.f64 ky))
#s(approx (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2)) (fma.f64 (/.f64 (*.f64 kx kx) (sin.f64 ky)) #s(literal 1/2 binary64) (sin.f64 ky)))
#s(approx (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2)) (fma.f64 (fma.f64 (/.f64 (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)) #s(literal 1/3 binary64)) (*.f64 kx kx)) (sin.f64 ky)) #s(literal -1/2 binary64) (/.f64 #s(literal 1/2 binary64) (sin.f64 ky))) (*.f64 kx kx) (sin.f64 ky)))
#s(approx (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2)) (fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 kx kx) (/.f64 (-.f64 (+.f64 (fma.f64 (pow.f64 (sin.f64 ky) #s(literal -2 binary64)) #s(literal 2/3 binary64) (neg.f64 (/.f64 (-.f64 #s(literal 1/3 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal 2/45 binary64)) (fma.f64 (/.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)) #s(literal 1/3 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal -1/2 binary64) (fma.f64 (pow.f64 (sin.f64 ky) #s(literal -2 binary64)) #s(literal 1/3 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64))))) (sin.f64 ky))) #s(literal 1/2 binary64) (/.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)) #s(literal 1/3 binary64))) (sin.f64 ky))) (*.f64 kx kx) (/.f64 #s(literal 1/2 binary64) (sin.f64 ky))) (*.f64 kx kx) (sin.f64 ky)))
#s(approx (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))
#s(approx (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) (fma.f64 kx kx (*.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
#s(approx (+ (* (sin kx) (sin kx)) (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 binary64) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
#s(approx (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) (fma.f64 (fma.f64 (-.f64 (*.f64 (-.f64 (+.f64 (fma.f64 (pow.f64 (sin.f64 ky) #s(literal -2 binary64)) #s(literal 2/3 binary64) (neg.f64 (/.f64 (-.f64 #s(literal 1/3 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal 2/45 binary64)) (fma.f64 (pow.f64 (sin.f64 ky) #s(literal -2 binary64)) #s(literal 1/3 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)))) (*.f64 kx kx)) #s(literal 1/3 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx) (*.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
#s(approx (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (neg.f64 (/.f64 (pow.f64 kx #s(literal 4 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
#s(approx (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (*.f64 (pow.f64 kx #s(literal 4 binary64)) (-.f64 (*.f64 (-.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal -2 binary64)) #s(literal 2/3 binary64)) (pow.f64 (sin.f64 ky) #s(literal -4 binary64))) (*.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)))))
#s(approx (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (*.f64 (pow.f64 kx #s(literal 4 binary64)) (-.f64 (*.f64 (-.f64 (fma.f64 (-.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 1/3 binary64)) (fma.f64 #s(literal 1/5 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)) (neg.f64 (/.f64 (-.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal -2 binary64)) #s(literal 2/3 binary64)) (pow.f64 (sin.f64 ky) #s(literal -4 binary64))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (*.f64 kx kx) (*.f64 (pow.f64 (sin.f64 ky) #s(literal -2 binary64)) #s(literal 2/3 binary64))) (pow.f64 (sin.f64 ky) #s(literal -4 binary64))) (*.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)))))
#s(approx (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (*.f64 (pow.f64 kx #s(literal 4 binary64)) (-.f64 (*.f64 (-.f64 (fma.f64 (-.f64 (fma.f64 (-.f64 (*.f64 #s(literal 34/945 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64))) (fma.f64 (/.f64 (-.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 1/3 binary64)) (fma.f64 #s(literal 1/5 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)) (neg.f64 (/.f64 (-.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal -2 binary64)) #s(literal 2/3 binary64)) (pow.f64 (sin.f64 ky) #s(literal -4 binary64))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal -1 binary64) (fma.f64 (/.f64 (-.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal -2 binary64)) #s(literal 2/3 binary64)) (pow.f64 (sin.f64 ky) #s(literal -4 binary64))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 1/3 binary64) (*.f64 #s(literal 2/45 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)))))) (*.f64 kx kx) (*.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 1/3 binary64))) (fma.f64 #s(literal 1/5 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)) (neg.f64 (/.f64 (-.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal -2 binary64)) #s(literal 2/3 binary64)) (pow.f64 (sin.f64 ky) #s(literal -4 binary64))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (*.f64 kx kx) (*.f64 (pow.f64 (sin.f64 ky) #s(literal -2 binary64)) #s(literal 2/3 binary64))) (pow.f64 (sin.f64 ky) #s(literal -4 binary64))) (*.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)))))
#s(approx (pow (sin kx) 4) (pow.f64 kx #s(literal 4 binary64)))
#s(approx (pow (sin kx) 4) (*.f64 (pow.f64 kx #s(literal 4 binary64)) (fma.f64 #s(literal -2/3 binary64) (*.f64 kx kx) #s(literal 1 binary64))))
#s(approx (pow (sin kx) 4) (*.f64 (pow.f64 kx #s(literal 4 binary64)) (fma.f64 (-.f64 (*.f64 #s(literal 1/5 binary64) (*.f64 kx kx)) #s(literal 2/3 binary64)) (*.f64 kx kx) #s(literal 1 binary64))))
#s(approx (pow (sin kx) 4) (*.f64 (pow.f64 kx #s(literal 4 binary64)) (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -34/945 binary64) (*.f64 kx kx) #s(literal 1/5 binary64)) (*.f64 kx kx)) #s(literal 2/3 binary64)) (*.f64 kx kx) #s(literal 1 binary64))))
#s(approx (- (pow (sin kx) 2) (pow (sin ky) 2)) (neg.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
#s(approx (- (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 (*.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
#s(approx (- (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
#s(approx (- (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 (*.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)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
#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 (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (neg.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
#s(approx (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (*.f64 #s(literal -1 binary64) (fma.f64 kx kx (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
#s(approx (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (fma.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/3 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64))) (*.f64 kx kx)) #s(literal 1 binary64)) (*.f64 kx kx) (neg.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
#s(approx (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (fma.f64 (-.f64 (*.f64 (-.f64 (fma.f64 (-.f64 (-.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal -2 binary64)) #s(literal 1/3 binary64)) #s(literal 2/45 binary64)) (neg.f64 (/.f64 (-.f64 #s(literal 1/3 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (*.f64 kx kx) #s(literal 1/3 binary64)) (pow.f64 (sin.f64 ky) #s(literal -2 binary64))) (*.f64 kx kx)) #s(literal 1 binary64)) (*.f64 kx kx) (neg.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
#s(approx (* (/ (sin ky) (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2))) (sin th)) (*.f64 (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)) (*.f64 (sin.f64 th) (sin.f64 ky))))
#s(approx (/ (sin ky) (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2))) (*.f64 (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)) (sin.f64 ky)))
#s(approx (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (sin ky)) (*.f64 (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)) (sin.f64 ky)))
#s(approx (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)))
#s(approx (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2)) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))
#s(approx (sin kx) (sin.f64 kx))
#s(approx (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (* (sin th) (sin ky))) (*.f64 (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)) (*.f64 (sin.f64 th) (sin.f64 ky))))
#s(approx (+ (* (/ (* (* kx kx) (sin th)) (pow (sin ky) 2)) -1/2) (sin th)) (*.f64 (*.f64 (*.f64 kx kx) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #s(literal -1/2 binary64)))
#s(approx (+ (* (/ (* (* kx kx) (sin th)) (pow (sin ky) 2)) -1/2) (sin th)) (*.f64 (fma.f64 (/.f64 (sin.f64 th) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal -1/2 binary64) (/.f64 (sin.f64 th) (*.f64 kx kx))) (*.f64 kx kx)))
#s(approx (* (/ (sin ky) (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2))) (sin th)) (*.f64 (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)) (*.f64 (sin.f64 th) (sin.f64 ky))))
#s(approx (/ (sin ky) (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2))) (*.f64 (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)) (sin.f64 ky)))
#s(approx (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2)) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))
#s(approx (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2) (log.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky))))
#s(approx (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) (log.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
#s(approx (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) (fma.f64 (sin.f64 kx) (sin.f64 kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
#s(approx (* (/ (sin ky) (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2))) (sin th)) (*.f64 (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)) (*.f64 (sin.f64 th) (sin.f64 ky))))
#s(approx (/ (sin ky) (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2))) (*.f64 (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)) (sin.f64 ky)))
#s(approx (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2)) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))
#s(approx (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) (fma.f64 (sin.f64 kx) (sin.f64 kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
#s(approx (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
#s(approx (pow (sin kx) 4) (pow.f64 (sin.f64 kx) #s(literal 4 binary64)))
#s(approx (- (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
#s(approx (pow (sin kx) 2) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))
#s(approx (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
#s(approx (* (/ (sin ky) (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (sin.f64 kx)))
#s(approx (* (/ (sin ky) (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2))) (sin th)) (*.f64 (fma.f64 (fma.f64 (/.f64 (sin.f64 th) (sin.f64 kx)) #s(literal -1/6 binary64) (/.f64 (*.f64 #s(literal -1/2 binary64) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))) (*.f64 ky ky) (/.f64 (sin.f64 th) (sin.f64 kx))) ky))
#s(approx (* (/ (sin ky) (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2))) (sin th)) (*.f64 (fma.f64 (fma.f64 (/.f64 (sin.f64 th) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) #s(literal -1/2 binary64) (fma.f64 (fma.f64 (/.f64 (sin.f64 th) (sin.f64 kx)) #s(literal 1/120 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) (sin.f64 kx)) (*.f64 (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -6 binary64)) #s(literal 3/4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64))) (sin.f64 th)) (/.f64 (*.f64 #s(literal 1/12 binary64) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))))) (*.f64 ky ky) (/.f64 (*.f64 #s(literal -1/6 binary64) (sin.f64 th)) (sin.f64 kx)))) (*.f64 ky ky) (/.f64 (sin.f64 th) (sin.f64 kx))) ky))
#s(approx (* (/ (sin ky) (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2))) (sin th)) (*.f64 (fma.f64 (fma.f64 (/.f64 (sin.f64 th) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) #s(literal -1/2 binary64) (fma.f64 (fma.f64 (/.f64 (sin.f64 th) (sin.f64 kx)) #s(literal 1/120 binary64) (fma.f64 #s(literal 1/12 binary64) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (sin.f64 kx)) (*.f64 (fma.f64 (/.f64 (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -6 binary64)) #s(literal 3/4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64) (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 2/45 binary64) (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -6 binary64)) #s(literal 2/3 binary64) (pow.f64 (sin.f64 kx) #s(literal -8 binary64))))) (sin.f64 th)) (fma.f64 (*.f64 #s(literal -1/12 binary64) (sin.f64 kx)) (*.f64 (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -6 binary64)) #s(literal 3/4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64))) (sin.f64 th)) (fma.f64 #s(literal -1/240 binary64) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (/.f64 (*.f64 #s(literal -1/5040 binary64) (sin.f64 th)) (sin.f64 kx))))) (*.f64 ky ky) (*.f64 (*.f64 #s(literal 1/2 binary64) (sin.f64 kx)) (*.f64 (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -6 binary64)) #s(literal 3/4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64))) (sin.f64 th)))))) (*.f64 ky ky) (/.f64 (*.f64 #s(literal -1/6 binary64) (sin.f64 th)) (sin.f64 kx)))) (*.f64 ky ky) (/.f64 (sin.f64 th) (sin.f64 kx))) ky))
#s(approx (/ (sin ky) (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2))) (/.f64 ky (sin.f64 kx)))
#s(approx (/ (sin ky) (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2))) (*.f64 (fma.f64 (neg.f64 (*.f64 ky ky)) (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -3 binary64)) #s(literal 1/2 binary64) (/.f64 #s(literal 1/6 binary64) (sin.f64 kx))) (pow.f64 (sin.f64 kx) #s(literal -1 binary64))) ky))
#s(approx (/ (sin ky) (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2))) (*.f64 (fma.f64 (-.f64 (*.f64 (+.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (sin.f64 kx)) (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -6 binary64)) #s(literal 3/4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64))) (*.f64 (pow.f64 (sin.f64 kx) #s(literal -3 binary64)) #s(literal 1/12 binary64))) (/.f64 #s(literal 1/120 binary64) (sin.f64 kx))) (*.f64 ky ky)) (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -3 binary64)) #s(literal 1/2 binary64) (/.f64 #s(literal 1/6 binary64) (sin.f64 kx)))) (*.f64 ky ky) (pow.f64 (sin.f64 kx) #s(literal -1 binary64))) ky))
#s(approx (/ (sin ky) (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2))) (*.f64 (fma.f64 (-.f64 (*.f64 (+.f64 (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -3 binary64)) #s(literal 1/12 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) (sin.f64 kx)) (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -6 binary64)) #s(literal 3/4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64))) (*.f64 (-.f64 (fma.f64 (*.f64 #s(literal -1/12 binary64) (sin.f64 kx)) (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -6 binary64)) #s(literal 3/4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64))) (*.f64 (*.f64 #s(literal -1/2 binary64) (sin.f64 kx)) (fma.f64 (/.f64 (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -6 binary64)) #s(literal 3/4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64) (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 2/45 binary64) (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -6 binary64)) #s(literal 2/3 binary64) (pow.f64 (sin.f64 kx) #s(literal -8 binary64))))))) (fma.f64 #s(literal 1/240 binary64) (pow.f64 (sin.f64 kx) #s(literal -3 binary64)) (/.f64 #s(literal 1/5040 binary64) (sin.f64 kx)))) (*.f64 ky ky)))) (/.f64 #s(literal 1/120 binary64) (sin.f64 kx))) (*.f64 ky ky)) (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -3 binary64)) #s(literal 1/2 binary64) (/.f64 #s(literal 1/6 binary64) (sin.f64 kx)))) (*.f64 ky ky) (pow.f64 (sin.f64 kx) #s(literal -1 binary64))) ky))
#s(approx (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (sin ky)) (/.f64 ky (sin.f64 kx)))
#s(approx (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (sin ky)) (*.f64 (fma.f64 (neg.f64 (*.f64 ky ky)) (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -3 binary64)) #s(literal 1/2 binary64) (/.f64 #s(literal 1/6 binary64) (sin.f64 kx))) (pow.f64 (sin.f64 kx) #s(literal -1 binary64))) ky))
#s(approx (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (sin ky)) (*.f64 (fma.f64 (-.f64 (*.f64 (+.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (sin.f64 kx)) (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -6 binary64)) #s(literal 3/4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64))) (*.f64 (pow.f64 (sin.f64 kx) #s(literal -3 binary64)) #s(literal 1/12 binary64))) (/.f64 #s(literal 1/120 binary64) (sin.f64 kx))) (*.f64 ky ky)) (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -3 binary64)) #s(literal 1/2 binary64) (/.f64 #s(literal 1/6 binary64) (sin.f64 kx)))) (*.f64 ky ky) (pow.f64 (sin.f64 kx) #s(literal -1 binary64))) ky))
#s(approx (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (sin ky)) (*.f64 (fma.f64 (-.f64 (*.f64 (+.f64 (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -3 binary64)) #s(literal 1/12 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) (sin.f64 kx)) (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -6 binary64)) #s(literal 3/4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64))) (*.f64 (-.f64 (fma.f64 (*.f64 #s(literal -1/12 binary64) (sin.f64 kx)) (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -6 binary64)) #s(literal 3/4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64))) (*.f64 (*.f64 #s(literal -1/2 binary64) (sin.f64 kx)) (fma.f64 (/.f64 (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -6 binary64)) #s(literal 3/4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64) (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 2/45 binary64) (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -6 binary64)) #s(literal 2/3 binary64) (pow.f64 (sin.f64 kx) #s(literal -8 binary64))))))) (fma.f64 #s(literal 1/240 binary64) (pow.f64 (sin.f64 kx) #s(literal -3 binary64)) (/.f64 #s(literal 1/5040 binary64) (sin.f64 kx)))) (*.f64 ky ky)))) (/.f64 #s(literal 1/120 binary64) (sin.f64 kx))) (*.f64 ky ky)) (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -3 binary64)) #s(literal 1/2 binary64) (/.f64 #s(literal 1/6 binary64) (sin.f64 kx)))) (*.f64 ky ky) (pow.f64 (sin.f64 kx) #s(literal -1 binary64))) ky))
#s(approx (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (pow.f64 (sin.f64 kx) #s(literal -1 binary64)))
#s(approx (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (fma.f64 (/.f64 (*.f64 ky ky) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) #s(literal -1/2 binary64) (pow.f64 (sin.f64 kx) #s(literal -1 binary64))))
#s(approx (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (fma.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (*.f64 (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -6 binary64)) #s(literal 3/4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64))) (sin.f64 kx)) (*.f64 ky ky)) (pow.f64 (sin.f64 kx) #s(literal -3 binary64)))) (*.f64 ky ky) (pow.f64 (sin.f64 kx) #s(literal -1 binary64))))
#s(approx (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 ky ky)) (*.f64 (fma.f64 (/.f64 (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -6 binary64)) #s(literal 3/4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64) (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 2/45 binary64) (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -6 binary64)) #s(literal 2/3 binary64) (pow.f64 (sin.f64 kx) #s(literal -8 binary64))))) (sin.f64 kx)) (*.f64 (*.f64 #s(literal 1/2 binary64) (sin.f64 kx)) (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -6 binary64)) #s(literal 3/4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64))))) (*.f64 ky ky) (*.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 kx) #s(literal -3 binary64)))) (*.f64 ky ky) (pow.f64 (sin.f64 kx) #s(literal -1 binary64))))
#s(approx (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2)) (sin.f64 kx))
#s(approx (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2)) (fma.f64 (/.f64 (*.f64 ky ky) (sin.f64 kx)) #s(literal 1/2 binary64) (sin.f64 kx)))
#s(approx (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2)) (fma.f64 (fma.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -2 binary64)) #s(literal 1/4 binary64) #s(literal 1/3 binary64)) (*.f64 ky ky)) (sin.f64 kx)) #s(literal -1/2 binary64) (/.f64 #s(literal 1/2 binary64) (sin.f64 kx))) (*.f64 ky ky) (sin.f64 kx)))
#s(approx (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2)) (fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 ky ky) (/.f64 (-.f64 #s(literal 2/45 binary64) (/.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -2 binary64)) #s(literal 1/4 binary64) #s(literal 1/3 binary64))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))) (sin.f64 kx))) #s(literal 1/2 binary64) (/.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -2 binary64)) #s(literal 1/4 binary64) #s(literal 1/3 binary64))) (sin.f64 kx))) (*.f64 ky ky) (/.f64 #s(literal 1/2 binary64) (sin.f64 kx))) (*.f64 ky ky) (sin.f64 kx)))
#s(approx (sin ky) ky)
#s(approx (sin ky) (*.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky))
#s(approx (sin ky) (*.f64 (fma.f64 (-.f64 (*.f64 (*.f64 ky ky) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (*.f64 ky ky) #s(literal 1 binary64)) ky))
#s(approx (sin ky) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (*.f64 ky ky)) #s(literal 1/6 binary64)) (*.f64 ky ky) #s(literal 1 binary64)) ky))
#s(approx ky ky)
#s(approx (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (* (sin th) (sin ky))) (/.f64 (*.f64 (sin.f64 th) ky) (sin.f64 kx)))
#s(approx (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (* (sin th) (sin ky))) (*.f64 (fma.f64 (fma.f64 (/.f64 (sin.f64 th) (sin.f64 kx)) #s(literal -1/6 binary64) (/.f64 (*.f64 #s(literal -1/2 binary64) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))) (*.f64 ky ky) (/.f64 (sin.f64 th) (sin.f64 kx))) ky))
#s(approx (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (* (sin th) (sin ky))) (*.f64 (fma.f64 (fma.f64 (/.f64 (sin.f64 th) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) #s(literal -1/2 binary64) (fma.f64 (fma.f64 (/.f64 (sin.f64 th) (sin.f64 kx)) #s(literal 1/120 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) (sin.f64 kx)) (*.f64 (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -6 binary64)) #s(literal 3/4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64))) (sin.f64 th)) (/.f64 (*.f64 #s(literal 1/12 binary64) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))))) (*.f64 ky ky) (/.f64 (*.f64 #s(literal -1/6 binary64) (sin.f64 th)) (sin.f64 kx)))) (*.f64 ky ky) (/.f64 (sin.f64 th) (sin.f64 kx))) ky))
#s(approx (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (* (sin th) (sin ky))) (*.f64 (fma.f64 (fma.f64 (/.f64 (sin.f64 th) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) #s(literal -1/2 binary64) (fma.f64 (fma.f64 (/.f64 (sin.f64 th) (sin.f64 kx)) #s(literal 1/120 binary64) (fma.f64 #s(literal 1/12 binary64) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (sin.f64 kx)) (*.f64 (fma.f64 (/.f64 (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -6 binary64)) #s(literal 3/4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64) (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 2/45 binary64) (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -6 binary64)) #s(literal 2/3 binary64) (pow.f64 (sin.f64 kx) #s(literal -8 binary64))))) (sin.f64 th)) (fma.f64 (*.f64 #s(literal -1/12 binary64) (sin.f64 kx)) (*.f64 (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -6 binary64)) #s(literal 3/4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64))) (sin.f64 th)) (fma.f64 #s(literal -1/240 binary64) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (/.f64 (*.f64 #s(literal -1/5040 binary64) (sin.f64 th)) (sin.f64 kx))))) (*.f64 ky ky) (*.f64 (*.f64 #s(literal 1/2 binary64) (sin.f64 kx)) (*.f64 (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -6 binary64)) #s(literal 3/4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64))) (sin.f64 th)))))) (*.f64 ky ky) (/.f64 (*.f64 #s(literal -1/6 binary64) (sin.f64 th)) (sin.f64 kx)))) (*.f64 ky ky) (/.f64 (sin.f64 th) (sin.f64 kx))) ky))
#s(approx (* (sin th) (sin ky)) (*.f64 (sin.f64 th) ky))
#s(approx (* (sin th) (sin ky)) (*.f64 (fma.f64 (*.f64 (*.f64 ky ky) (sin.f64 th)) #s(literal -1/6 binary64) (sin.f64 th)) ky))
#s(approx (* (sin th) (sin ky)) (*.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 ky ky) (sin.f64 th)) #s(literal 1/120 binary64) (*.f64 #s(literal -1/6 binary64) (sin.f64 th))) (*.f64 ky ky) (sin.f64 th)) ky))
#s(approx (* (sin th) (sin ky)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 ky ky) (sin.f64 th)) #s(literal -1/5040 binary64) (*.f64 #s(literal 1/120 binary64) (sin.f64 th))) (*.f64 ky ky) (*.f64 #s(literal -1/6 binary64) (sin.f64 th))) (*.f64 ky ky) (sin.f64 th)) ky))
#s(approx (+ (* (/ (* (* kx kx) (sin th)) (pow (sin ky) 2)) -1/2) (sin th)) (/.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 kx kx)) (sin.f64 th)) (*.f64 ky ky)))
#s(approx (+ (* (/ (* (* kx kx) (sin th)) (pow (sin ky) 2)) -1/2) (sin th)) (/.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 kx kx)) (sin.f64 th) (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 kx kx)) (sin.f64 th) (sin.f64 th)) (*.f64 ky ky))) (*.f64 ky ky)))
#s(approx (+ (* (/ (* (* kx kx) (sin th)) (pow (sin ky) 2)) -1/2) (sin th)) (/.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 kx kx)) (sin.f64 th) (*.f64 (+.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 ky ky)) (*.f64 (*.f64 (*.f64 kx kx) (sin.f64 th)) #s(literal -1/15 binary64)) (*.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 kx kx)) (sin.f64 th))) (sin.f64 th)) (*.f64 ky ky))) (*.f64 ky ky)))
#s(approx (+ (* (/ (* (* kx kx) (sin th)) (pow (sin ky) 2)) -1/2) (sin th)) (/.f64 (fma.f64 (+.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (fma.f64 #s(literal -1/315 binary64) (*.f64 (*.f64 kx kx) (sin.f64 th)) (fma.f64 #s(literal 2/135 binary64) (*.f64 (*.f64 kx kx) (sin.f64 th)) (*.f64 (*.f64 (*.f64 (*.f64 kx kx) (sin.f64 th)) #s(literal -1/15 binary64)) #s(literal 1/3 binary64)))) (*.f64 ky ky) (*.f64 (*.f64 (*.f64 kx kx) (sin.f64 th)) #s(literal -1/15 binary64)))) (*.f64 ky ky) (*.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 kx kx)) (sin.f64 th))) (sin.f64 th)) (*.f64 ky ky) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 kx kx)) (sin.f64 th))) (*.f64 ky ky)))
#s(approx (/ (* (* kx kx) (sin th)) (pow (sin ky) 2)) (/.f64 (*.f64 (*.f64 kx kx) (sin.f64 th)) (*.f64 ky ky)))
#s(approx (/ (* (* kx kx) (sin th)) (pow (sin ky) 2)) (/.f64 (fma.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 kx kx)) (*.f64 (*.f64 ky ky) (sin.f64 th)) (*.f64 (*.f64 kx kx) (sin.f64 th))) (*.f64 ky ky)))
#s(approx (/ (* (* kx kx) (sin th)) (pow (sin ky) 2)) (/.f64 (fma.f64 (fma.f64 (neg.f64 (*.f64 ky ky)) (*.f64 (*.f64 (*.f64 kx kx) (sin.f64 th)) #s(literal -1/15 binary64)) (*.f64 #s(literal 1/3 binary64) (*.f64 (*.f64 kx kx) (sin.f64 th)))) (*.f64 ky ky) (*.f64 (*.f64 kx kx) (sin.f64 th))) (*.f64 ky ky)))
#s(approx (/ (* (* kx kx) (sin th)) (pow (sin ky) 2)) (/.f64 (fma.f64 (fma.f64 (-.f64 (*.f64 (neg.f64 (*.f64 ky ky)) (fma.f64 #s(literal -1/315 binary64) (*.f64 (*.f64 kx kx) (sin.f64 th)) (fma.f64 #s(literal 2/135 binary64) (*.f64 (*.f64 kx kx) (sin.f64 th)) (*.f64 (*.f64 (*.f64 (*.f64 kx kx) (sin.f64 th)) #s(literal -1/15 binary64)) #s(literal 1/3 binary64))))) (*.f64 (*.f64 (*.f64 kx kx) (sin.f64 th)) #s(literal -1/15 binary64))) (*.f64 ky ky) (*.f64 #s(literal 1/3 binary64) (*.f64 (*.f64 kx kx) (sin.f64 th)))) (*.f64 ky ky) (*.f64 (*.f64 kx kx) (sin.f64 th))) (*.f64 ky ky)))
#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) (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (sin.f64 kx)))
#s(approx (* (/ (sin ky) (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2))) (sin th)) (*.f64 (fma.f64 (fma.f64 (/.f64 (sin.f64 th) (sin.f64 kx)) #s(literal -1/6 binary64) (/.f64 (*.f64 #s(literal -1/2 binary64) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))) (*.f64 ky ky) (/.f64 (sin.f64 th) (sin.f64 kx))) ky))
#s(approx (* (/ (sin ky) (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2))) (sin th)) (*.f64 (fma.f64 (fma.f64 (/.f64 (sin.f64 th) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) #s(literal -1/2 binary64) (fma.f64 (fma.f64 (/.f64 (sin.f64 th) (sin.f64 kx)) #s(literal 1/120 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) (sin.f64 kx)) (*.f64 (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -6 binary64)) #s(literal 3/4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64))) (sin.f64 th)) (/.f64 (*.f64 #s(literal 1/12 binary64) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))))) (*.f64 ky ky) (/.f64 (*.f64 #s(literal -1/6 binary64) (sin.f64 th)) (sin.f64 kx)))) (*.f64 ky ky) (/.f64 (sin.f64 th) (sin.f64 kx))) ky))
#s(approx (* (/ (sin ky) (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2))) (sin th)) (*.f64 (fma.f64 (fma.f64 (/.f64 (sin.f64 th) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) #s(literal -1/2 binary64) (fma.f64 (fma.f64 (/.f64 (sin.f64 th) (sin.f64 kx)) #s(literal 1/120 binary64) (fma.f64 #s(literal 1/12 binary64) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (sin.f64 kx)) (*.f64 (fma.f64 (/.f64 (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -6 binary64)) #s(literal 3/4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64) (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 2/45 binary64) (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -6 binary64)) #s(literal 2/3 binary64) (pow.f64 (sin.f64 kx) #s(literal -8 binary64))))) (sin.f64 th)) (fma.f64 (*.f64 #s(literal -1/12 binary64) (sin.f64 kx)) (*.f64 (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -6 binary64)) #s(literal 3/4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64))) (sin.f64 th)) (fma.f64 #s(literal -1/240 binary64) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (/.f64 (*.f64 #s(literal -1/5040 binary64) (sin.f64 th)) (sin.f64 kx))))) (*.f64 ky ky) (*.f64 (*.f64 #s(literal 1/2 binary64) (sin.f64 kx)) (*.f64 (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -6 binary64)) #s(literal 3/4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64))) (sin.f64 th)))))) (*.f64 ky ky) (/.f64 (*.f64 #s(literal -1/6 binary64) (sin.f64 th)) (sin.f64 kx)))) (*.f64 ky ky) (/.f64 (sin.f64 th) (sin.f64 kx))) ky))
#s(approx (/ (sin ky) (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2))) (/.f64 ky (sin.f64 kx)))
#s(approx (/ (sin ky) (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2))) (*.f64 (fma.f64 (neg.f64 (*.f64 ky ky)) (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -3 binary64)) #s(literal 1/2 binary64) (/.f64 #s(literal 1/6 binary64) (sin.f64 kx))) (pow.f64 (sin.f64 kx) #s(literal -1 binary64))) ky))
#s(approx (/ (sin ky) (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2))) (*.f64 (fma.f64 (-.f64 (*.f64 (+.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (sin.f64 kx)) (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -6 binary64)) #s(literal 3/4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64))) (*.f64 (pow.f64 (sin.f64 kx) #s(literal -3 binary64)) #s(literal 1/12 binary64))) (/.f64 #s(literal 1/120 binary64) (sin.f64 kx))) (*.f64 ky ky)) (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -3 binary64)) #s(literal 1/2 binary64) (/.f64 #s(literal 1/6 binary64) (sin.f64 kx)))) (*.f64 ky ky) (pow.f64 (sin.f64 kx) #s(literal -1 binary64))) ky))
#s(approx (/ (sin ky) (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2))) (*.f64 (fma.f64 (-.f64 (*.f64 (+.f64 (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -3 binary64)) #s(literal 1/12 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) (sin.f64 kx)) (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -6 binary64)) #s(literal 3/4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64))) (*.f64 (-.f64 (fma.f64 (*.f64 #s(literal -1/12 binary64) (sin.f64 kx)) (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -6 binary64)) #s(literal 3/4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64))) (*.f64 (*.f64 #s(literal -1/2 binary64) (sin.f64 kx)) (fma.f64 (/.f64 (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -6 binary64)) #s(literal 3/4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64) (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 2/45 binary64) (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -6 binary64)) #s(literal 2/3 binary64) (pow.f64 (sin.f64 kx) #s(literal -8 binary64))))))) (fma.f64 #s(literal 1/240 binary64) (pow.f64 (sin.f64 kx) #s(literal -3 binary64)) (/.f64 #s(literal 1/5040 binary64) (sin.f64 kx)))) (*.f64 ky ky)))) (/.f64 #s(literal 1/120 binary64) (sin.f64 kx))) (*.f64 ky ky)) (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -3 binary64)) #s(literal 1/2 binary64) (/.f64 #s(literal 1/6 binary64) (sin.f64 kx)))) (*.f64 ky ky) (pow.f64 (sin.f64 kx) #s(literal -1 binary64))) ky))
#s(approx (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2)) (sin.f64 kx))
#s(approx (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2)) (fma.f64 (/.f64 (*.f64 ky ky) (sin.f64 kx)) #s(literal 1/2 binary64) (sin.f64 kx)))
#s(approx (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2)) (fma.f64 (fma.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -2 binary64)) #s(literal 1/4 binary64) #s(literal 1/3 binary64)) (*.f64 ky ky)) (sin.f64 kx)) #s(literal -1/2 binary64) (/.f64 #s(literal 1/2 binary64) (sin.f64 kx))) (*.f64 ky ky) (sin.f64 kx)))
#s(approx (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2)) (fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 ky ky) (/.f64 (-.f64 #s(literal 2/45 binary64) (/.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -2 binary64)) #s(literal 1/4 binary64) #s(literal 1/3 binary64))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))) (sin.f64 kx))) #s(literal 1/2 binary64) (/.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -2 binary64)) #s(literal 1/4 binary64) #s(literal 1/3 binary64))) (sin.f64 kx))) (*.f64 ky ky) (/.f64 #s(literal 1/2 binary64) (sin.f64 kx))) (*.f64 ky ky) (sin.f64 kx)))
#s(approx (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2) (log.f64 (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(literal 1/2 binary64))))
#s(approx (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 2 binary64) (log.f64 (sin.f64 kx)) (/.f64 (*.f64 ky ky) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))))
#s(approx (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2) (fma.f64 (fma.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 ky ky)) (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -2 binary64)) #s(literal 8 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 12 binary64))) (*.f64 (pow.f64 (sin.f64 kx) #s(literal -2 binary64)) #s(literal 1/2 binary64))) (*.f64 ky ky) (log.f64 (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(literal 1/2 binary64)))))
#s(approx (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2) (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/1440 binary64) (*.f64 ky ky)) (fma.f64 #s(literal 240 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal -6 binary64)) (pow.f64 (sin.f64 kx) #s(literal -4 binary64))) (*.f64 (pow.f64 (sin.f64 kx) #s(literal -2 binary64)) #s(literal 32 binary64))) (*.f64 (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -2 binary64)) #s(literal 8 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 12 binary64))) #s(literal -1/48 binary64))) (*.f64 ky ky) (*.f64 (pow.f64 (sin.f64 kx) #s(literal -2 binary64)) #s(literal 1/2 binary64))) (*.f64 ky ky) (log.f64 (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(literal 1/2 binary64)))))
#s(approx (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) (log.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))
#s(approx (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) (fma.f64 #s(literal 2 binary64) (log.f64 (sin.f64 kx)) (/.f64 (*.f64 ky ky) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
#s(approx (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) (fma.f64 (fma.f64 (*.f64 #s(literal -1/24 binary64) (*.f64 ky ky)) (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -2 binary64)) #s(literal 8 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 12 binary64))) (pow.f64 (sin.f64 kx) #s(literal -2 binary64))) (*.f64 ky ky) (log.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
#s(approx (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 ky ky)) (fma.f64 #s(literal 240 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal -6 binary64)) (pow.f64 (sin.f64 kx) #s(literal -4 binary64))) (*.f64 (pow.f64 (sin.f64 kx) #s(literal -2 binary64)) #s(literal 32 binary64))) (*.f64 (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -2 binary64)) #s(literal 8 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 12 binary64))) #s(literal -1/24 binary64))) (*.f64 ky ky) (pow.f64 (sin.f64 kx) #s(literal -2 binary64))) (*.f64 ky ky) (log.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
#s(approx (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))
#s(approx (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) (fma.f64 ky ky (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))
#s(approx (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))
#s(approx (+ (* (sin kx) (sin kx)) (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) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))
#s(approx (* (/ (sin ky) (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (sin.f64 kx)))
#s(approx (* (/ (sin ky) (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2))) (sin th)) (*.f64 (fma.f64 (fma.f64 (/.f64 (sin.f64 th) (sin.f64 kx)) #s(literal -1/6 binary64) (/.f64 (*.f64 #s(literal -1/2 binary64) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))) (*.f64 ky ky) (/.f64 (sin.f64 th) (sin.f64 kx))) ky))
#s(approx (* (/ (sin ky) (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2))) (sin th)) (*.f64 (fma.f64 (fma.f64 (/.f64 (sin.f64 th) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) #s(literal -1/2 binary64) (fma.f64 (fma.f64 (/.f64 (sin.f64 th) (sin.f64 kx)) #s(literal 1/120 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) (sin.f64 kx)) (*.f64 (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -6 binary64)) #s(literal 3/4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64))) (sin.f64 th)) (/.f64 (*.f64 #s(literal 1/12 binary64) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))))) (*.f64 ky ky) (/.f64 (*.f64 #s(literal -1/6 binary64) (sin.f64 th)) (sin.f64 kx)))) (*.f64 ky ky) (/.f64 (sin.f64 th) (sin.f64 kx))) ky))
#s(approx (* (/ (sin ky) (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2))) (sin th)) (*.f64 (fma.f64 (fma.f64 (/.f64 (sin.f64 th) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) #s(literal -1/2 binary64) (fma.f64 (fma.f64 (/.f64 (sin.f64 th) (sin.f64 kx)) #s(literal 1/120 binary64) (fma.f64 #s(literal 1/12 binary64) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (fma.f64 (fma.f64 (*.f64 #s(literal -1/12 binary64) (sin.f64 kx)) (*.f64 (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -6 binary64)) #s(literal 3/4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64))) (sin.f64 th)) (fma.f64 #s(literal -1/240 binary64) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (sin.f64 kx) (sin.f64 th)) (-.f64 (neg.f64 (/.f64 (-.f64 (pow.f64 (sin.f64 kx) #s(literal -2 binary64)) #s(literal 1/3 binary64)) (pow.f64 (sin.f64 kx) #s(literal 6 binary64)))) (fma.f64 (/.f64 (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -6 binary64)) #s(literal 3/4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64) (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 2/45 binary64) (pow.f64 (sin.f64 kx) #s(literal -6 binary64)))))) #s(literal 1/2 binary64) (/.f64 (*.f64 #s(literal -1/5040 binary64) (sin.f64 th)) (sin.f64 kx))))) (*.f64 ky ky) (*.f64 (*.f64 #s(literal 1/2 binary64) (sin.f64 kx)) (*.f64 (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -6 binary64)) #s(literal 3/4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64))) (sin.f64 th)))))) (*.f64 ky ky) (/.f64 (*.f64 #s(literal -1/6 binary64) (sin.f64 th)) (sin.f64 kx)))) (*.f64 ky ky) (/.f64 (sin.f64 th) (sin.f64 kx))) ky))
#s(approx (/ (sin ky) (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2))) (/.f64 ky (sin.f64 kx)))
#s(approx (/ (sin ky) (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2))) (*.f64 (fma.f64 (neg.f64 (*.f64 ky ky)) (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -3 binary64)) #s(literal 1/2 binary64) (/.f64 #s(literal 1/6 binary64) (sin.f64 kx))) (pow.f64 (sin.f64 kx) #s(literal -1 binary64))) ky))
#s(approx (/ (sin ky) (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2))) (*.f64 (fma.f64 (-.f64 (*.f64 (+.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (sin.f64 kx)) (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -6 binary64)) #s(literal 3/4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64))) (*.f64 (pow.f64 (sin.f64 kx) #s(literal -3 binary64)) #s(literal 1/12 binary64))) (/.f64 #s(literal 1/120 binary64) (sin.f64 kx))) (*.f64 ky ky)) (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -3 binary64)) #s(literal 1/2 binary64) (/.f64 #s(literal 1/6 binary64) (sin.f64 kx)))) (*.f64 ky ky) (pow.f64 (sin.f64 kx) #s(literal -1 binary64))) ky))
#s(approx (/ (sin ky) (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2))) (*.f64 (fma.f64 (-.f64 (*.f64 (+.f64 (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -3 binary64)) #s(literal 1/12 binary64) (fma.f64 (-.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (sin.f64 kx)) (-.f64 (neg.f64 (/.f64 (-.f64 (pow.f64 (sin.f64 kx) #s(literal -2 binary64)) #s(literal 1/3 binary64)) (pow.f64 (sin.f64 kx) #s(literal 6 binary64)))) (fma.f64 (/.f64 (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -6 binary64)) #s(literal 3/4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64) (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 2/45 binary64) (pow.f64 (sin.f64 kx) #s(literal -6 binary64))))) (*.f64 (*.f64 #s(literal -1/12 binary64) (sin.f64 kx)) (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -6 binary64)) #s(literal 3/4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64))))) (fma.f64 #s(literal 1/240 binary64) (pow.f64 (sin.f64 kx) #s(literal -3 binary64)) (/.f64 #s(literal 1/5040 binary64) (sin.f64 kx)))) (*.f64 ky ky) (*.f64 (*.f64 #s(literal 1/2 binary64) (sin.f64 kx)) (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -6 binary64)) #s(literal 3/4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64)))))) (/.f64 #s(literal 1/120 binary64) (sin.f64 kx))) (*.f64 ky ky)) (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -3 binary64)) #s(literal 1/2 binary64) (/.f64 #s(literal 1/6 binary64) (sin.f64 kx)))) (*.f64 ky ky) (pow.f64 (sin.f64 kx) #s(literal -1 binary64))) ky))
#s(approx (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2)) (sin.f64 kx))
#s(approx (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2)) (fma.f64 (/.f64 (*.f64 ky ky) (sin.f64 kx)) #s(literal 1/2 binary64) (sin.f64 kx)))
#s(approx (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2)) (fma.f64 (fma.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -2 binary64)) #s(literal 1/4 binary64) #s(literal 1/3 binary64)) (*.f64 ky ky)) (sin.f64 kx)) #s(literal -1/2 binary64) (/.f64 #s(literal 1/2 binary64) (sin.f64 kx))) (*.f64 ky ky) (sin.f64 kx)))
#s(approx (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2)) (fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 ky ky) (/.f64 (-.f64 (-.f64 (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -2 binary64)) #s(literal 2/3 binary64) #s(literal 2/45 binary64)) (neg.f64 (/.f64 (-.f64 (pow.f64 (sin.f64 kx) #s(literal -2 binary64)) #s(literal 1/3 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (fma.f64 (/.f64 (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -2 binary64)) #s(literal 1/4 binary64) #s(literal 1/3 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64) (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -2 binary64)) #s(literal 1/3 binary64) (pow.f64 (sin.f64 kx) #s(literal -4 binary64))))) (sin.f64 kx))) #s(literal 1/2 binary64) (/.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -2 binary64)) #s(literal 1/4 binary64) #s(literal 1/3 binary64))) (sin.f64 kx))) (*.f64 ky ky) (/.f64 #s(literal 1/2 binary64) (sin.f64 kx))) (*.f64 ky ky) (sin.f64 kx)))
#s(approx (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))
#s(approx (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) (fma.f64 ky ky (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))
#s(approx (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))
#s(approx (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) (fma.f64 (fma.f64 (-.f64 (*.f64 (-.f64 (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -2 binary64)) #s(literal 2/3 binary64) #s(literal 2/45 binary64)) (fma.f64 (/.f64 (-.f64 (pow.f64 (sin.f64 kx) #s(literal -2 binary64)) #s(literal 1/3 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1 binary64) (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -2 binary64)) #s(literal 1/3 binary64) (pow.f64 (sin.f64 kx) #s(literal -4 binary64))))) (*.f64 ky ky)) #s(literal 1/3 binary64)) (*.f64 ky ky) #s(literal 1 binary64)) (*.f64 ky ky) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))
#s(approx (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))
#s(approx (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (fma.f64 ky ky (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))
#s(approx (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (fma.f64 (fma.f64 (-.f64 (pow.f64 (sin.f64 kx) #s(literal -2 binary64)) #s(literal 1/3 binary64)) (*.f64 ky ky) #s(literal 1 binary64)) (*.f64 ky ky) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))
#s(approx (/ (pow (sin kx) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (fma.f64 (fma.f64 (fma.f64 (-.f64 #s(literal 2/45 binary64) (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -2 binary64)) #s(literal 1/3 binary64) (neg.f64 (/.f64 (-.f64 (pow.f64 (sin.f64 kx) #s(literal -2 binary64)) #s(literal 1/3 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))) (*.f64 ky ky) (-.f64 (pow.f64 (sin.f64 kx) #s(literal -2 binary64)) #s(literal 1/3 binary64))) (*.f64 ky ky) #s(literal 1 binary64)) (*.f64 ky ky) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))
#s(approx (- (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))
#s(approx (- (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 (*.f64 ky ky) #s(literal -1 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))
#s(approx (- (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 (-.f64 (*.f64 (*.f64 ky ky) #s(literal 1/3 binary64)) #s(literal 1 binary64)) (*.f64 ky ky) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))
#s(approx (- (pow (sin kx) 2) (pow (sin ky) 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) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))
#s(approx (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (/.f64 (pow.f64 ky #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))
#s(approx (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (*.f64 (fma.f64 (-.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) (*.f64 (pow.f64 (sin.f64 kx) #s(literal -2 binary64)) #s(literal 2/3 binary64))) (*.f64 ky ky) (pow.f64 (sin.f64 kx) #s(literal -2 binary64))) (pow.f64 ky #s(literal 4 binary64))))
#s(approx (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (*.f64 (fma.f64 (fma.f64 (-.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal -2 binary64)) #s(literal 1/5 binary64)) (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64) (neg.f64 (/.f64 (-.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) (*.f64 (pow.f64 (sin.f64 kx) #s(literal -2 binary64)) #s(literal 2/3 binary64))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))) (*.f64 ky ky) (-.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) (*.f64 (pow.f64 (sin.f64 kx) #s(literal -2 binary64)) #s(literal 2/3 binary64)))) (*.f64 ky ky) (pow.f64 (sin.f64 kx) #s(literal -2 binary64))) (pow.f64 ky #s(literal 4 binary64))))
#s(approx (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (*.f64 (fma.f64 (fma.f64 (-.f64 (fma.f64 (-.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 2/45 binary64)) (fma.f64 (/.f64 (-.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal -2 binary64)) #s(literal 1/5 binary64)) (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64) (neg.f64 (/.f64 (-.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) (*.f64 (pow.f64 (sin.f64 kx) #s(literal -2 binary64)) #s(literal 2/3 binary64))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1 binary64) (fma.f64 (/.f64 (-.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) (*.f64 (pow.f64 (sin.f64 kx) #s(literal -2 binary64)) #s(literal 2/3 binary64))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 1/3 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal -2 binary64)) #s(literal 34/945 binary64))))) (*.f64 ky ky) (*.f64 (pow.f64 (sin.f64 kx) #s(literal -2 binary64)) #s(literal 1/5 binary64))) (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64) (neg.f64 (/.f64 (-.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) (*.f64 (pow.f64 (sin.f64 kx) #s(literal -2 binary64)) #s(literal 2/3 binary64))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))) (*.f64 ky ky) (-.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) (*.f64 (pow.f64 (sin.f64 kx) #s(literal -2 binary64)) #s(literal 2/3 binary64)))) (*.f64 ky ky) (pow.f64 (sin.f64 kx) #s(literal -2 binary64))) (pow.f64 ky #s(literal 4 binary64))))
#s(approx (pow (sin ky) 4) (pow.f64 ky #s(literal 4 binary64)))
#s(approx (pow (sin ky) 4) (*.f64 (fma.f64 (*.f64 ky ky) #s(literal -2/3 binary64) #s(literal 1 binary64)) (pow.f64 ky #s(literal 4 binary64))))
#s(approx (pow (sin ky) 4) (*.f64 (fma.f64 (-.f64 (*.f64 (*.f64 ky ky) #s(literal 1/5 binary64)) #s(literal 2/3 binary64)) (*.f64 ky ky) #s(literal 1 binary64)) (pow.f64 ky #s(literal 4 binary64))))
#s(approx (pow (sin ky) 4) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 ky ky) #s(literal -34/945 binary64) #s(literal 1/5 binary64)) (*.f64 ky ky)) #s(literal 2/3 binary64)) (*.f64 ky ky) #s(literal 1 binary64)) (pow.f64 ky #s(literal 4 binary64))))
#s(approx (sin ky) (sin.f64 ky))
#s(approx (* (sin th) (sin ky)) (*.f64 (sin.f64 th) (sin.f64 ky)))
#s(approx (pow (sin ky) 2) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))
#s(approx (pow (sin ky) 4) (pow.f64 (sin.f64 ky) #s(literal 4 binary64)))
#s(approx (* (/ (sin ky) (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2))) (sin th)) (*.f64 (*.f64 th (sin.f64 ky)) (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64))))
#s(approx (* (/ (sin ky) (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2))) (sin th)) (*.f64 (fma.f64 (*.f64 (*.f64 (*.f64 th th) #s(literal -1/6 binary64)) (sin.f64 ky)) (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)) (*.f64 (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)) (sin.f64 ky))) th))
#s(approx (* (/ (sin ky) (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2))) (sin th)) (*.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 (*.f64 th th) #s(literal 1/120 binary64)) (sin.f64 ky)) (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)) (*.f64 (*.f64 #s(literal -1/6 binary64) (sin.f64 ky)) (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)))) (*.f64 th th) (*.f64 (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)) (sin.f64 ky))) th))
#s(approx (* (/ (sin ky) (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2))) (sin th)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/120 binary64) (sin.f64 ky)) (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 th th) #s(literal -1/5040 binary64)) (sin.f64 ky)) (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)))) (*.f64 th th) (*.f64 (*.f64 #s(literal -1/6 binary64) (sin.f64 ky)) (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)))) (*.f64 th th) (*.f64 (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)) (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 th th)
#s(approx (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (* (sin th) (sin ky))) (*.f64 (*.f64 th (sin.f64 ky)) (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64))))
#s(approx (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (* (sin th) (sin ky))) (*.f64 (fma.f64 (*.f64 (*.f64 (*.f64 th th) #s(literal -1/6 binary64)) (sin.f64 ky)) (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)) (*.f64 (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)) (sin.f64 ky))) th))
#s(approx (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (* (sin th) (sin ky))) (*.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 (*.f64 th th) #s(literal 1/120 binary64)) (sin.f64 ky)) (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)) (*.f64 (*.f64 #s(literal -1/6 binary64) (sin.f64 ky)) (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)))) (*.f64 th th) (*.f64 (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)) (sin.f64 ky))) th))
#s(approx (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (* (sin th) (sin ky))) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/120 binary64) (sin.f64 ky)) (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 th th) #s(literal -1/5040 binary64)) (sin.f64 ky)) (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)))) (*.f64 th th) (*.f64 (*.f64 #s(literal -1/6 binary64) (sin.f64 ky)) (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)))) (*.f64 th th) (*.f64 (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)) (sin.f64 ky))) th))
#s(approx (* (sin th) (sin ky)) (*.f64 th (sin.f64 ky)))
#s(approx (* (sin th) (sin ky)) (*.f64 (fma.f64 (*.f64 (*.f64 th th) #s(literal -1/6 binary64)) (sin.f64 ky) (sin.f64 ky)) th))
#s(approx (* (sin th) (sin ky)) (*.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 th th) #s(literal 1/120 binary64)) (sin.f64 ky) (*.f64 #s(literal -1/6 binary64) (sin.f64 ky))) (*.f64 th th) (sin.f64 ky)) th))
#s(approx (* (sin th) (sin ky)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 th th) #s(literal -1/5040 binary64)) (sin.f64 ky) (*.f64 #s(literal 1/120 binary64) (sin.f64 ky))) (*.f64 th th) (*.f64 #s(literal -1/6 binary64) (sin.f64 ky))) (*.f64 th th) (sin.f64 ky)) th))
#s(approx (+ (* (/ (* (* kx kx) (sin th)) (pow (sin ky) 2)) -1/2) (sin th)) (*.f64 (fma.f64 (/.f64 (*.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1 binary64)) th))
#s(approx (+ (* (/ (* (* kx kx) (sin th)) (pow (sin ky) 2)) -1/2) (sin th)) (*.f64 (+.f64 (fma.f64 (-.f64 (/.f64 (*.f64 #s(literal 1/12 binary64) (*.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 1/6 binary64)) (*.f64 th th) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #s(literal 1 binary64)) th))
#s(approx (+ (* (/ (* (* kx kx) (sin th)) (pow (sin ky) 2)) -1/2) (sin th)) (*.f64 (+.f64 (fma.f64 (-.f64 (fma.f64 (fma.f64 #s(literal -1/240 binary64) (/.f64 (*.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 1/120 binary64)) (*.f64 th th) (/.f64 (*.f64 #s(literal 1/12 binary64) (*.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #s(literal 1/6 binary64)) (*.f64 th th) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #s(literal 1 binary64)) th))
#s(approx (+ (* (/ (* (* kx kx) (sin th)) (pow (sin ky) 2)) -1/2) (sin th)) (*.f64 (+.f64 (fma.f64 (-.f64 (fma.f64 (+.f64 (fma.f64 (-.f64 (/.f64 (*.f64 #s(literal 1/10080 binary64) (*.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 1/5040 binary64)) (*.f64 th th) (/.f64 (*.f64 #s(literal -1/240 binary64) (*.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #s(literal 1/120 binary64)) (*.f64 th th) (/.f64 (*.f64 #s(literal 1/12 binary64) (*.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #s(literal 1/6 binary64)) (*.f64 th th) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #s(literal 1 binary64)) th))
#s(approx (/ (* (* kx kx) (sin th)) (pow (sin ky) 2)) (*.f64 (*.f64 kx kx) (/.f64 th (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
#s(approx (/ (* (* kx kx) (sin th)) (pow (sin ky) 2)) (*.f64 (fma.f64 (/.f64 (pow.f64 (*.f64 kx th) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal -1/6 binary64) (/.f64 (*.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) th))
#s(approx (/ (* (* kx kx) (sin th)) (pow (sin ky) 2)) (*.f64 (fma.f64 (fma.f64 (/.f64 (pow.f64 (*.f64 kx th) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 1/120 binary64) (/.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (*.f64 th th) (/.f64 (*.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) th))
#s(approx (/ (* (* kx kx) (sin th)) (pow (sin ky) 2)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (/.f64 (pow.f64 (*.f64 kx th) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal -1/5040 binary64) (/.f64 (*.f64 #s(literal 1/120 binary64) (*.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (*.f64 th th) (/.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (*.f64 th th) (/.f64 (*.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) th))
#s(approx (* (* kx kx) (sin th)) (*.f64 (*.f64 kx kx) th))
#s(approx (* (* kx kx) (sin th)) (*.f64 (fma.f64 (pow.f64 (*.f64 kx th) #s(literal 2 binary64)) #s(literal -1/6 binary64) (*.f64 kx kx)) th))
#s(approx (* (* kx kx) (sin th)) (*.f64 (fma.f64 (fma.f64 (pow.f64 (*.f64 kx th) #s(literal 2 binary64)) #s(literal 1/120 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 kx kx))) (*.f64 th th) (*.f64 kx kx)) th))
#s(approx (* (* kx kx) (sin th)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (pow.f64 (*.f64 kx th) #s(literal 2 binary64)) #s(literal -1/5040 binary64) (*.f64 #s(literal 1/120 binary64) (*.f64 kx kx))) (*.f64 th th) (*.f64 #s(literal -1/6 binary64) (*.f64 kx kx))) (*.f64 th th) (*.f64 kx kx)) th))
#s(approx (* (/ (sin ky) (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2))) (sin th)) (*.f64 (*.f64 th (sin.f64 ky)) (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64))))
#s(approx (* (/ (sin ky) (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2))) (sin th)) (*.f64 (fma.f64 (*.f64 (*.f64 (*.f64 th th) #s(literal -1/6 binary64)) (sin.f64 ky)) (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)) (*.f64 (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)) (sin.f64 ky))) th))
#s(approx (* (/ (sin ky) (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2))) (sin th)) (*.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 (*.f64 th th) #s(literal 1/120 binary64)) (sin.f64 ky)) (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)) (*.f64 (*.f64 #s(literal -1/6 binary64) (sin.f64 ky)) (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)))) (*.f64 th th) (*.f64 (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)) (sin.f64 ky))) th))
#s(approx (* (/ (sin ky) (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2))) (sin th)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/120 binary64) (sin.f64 ky)) (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 th th) #s(literal -1/5040 binary64)) (sin.f64 ky)) (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)))) (*.f64 th th) (*.f64 (*.f64 #s(literal -1/6 binary64) (sin.f64 ky)) (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)))) (*.f64 th th) (*.f64 (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)) (sin.f64 ky))) th))
#s(approx (* (/ (sin ky) (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2))) (sin th)) (*.f64 (*.f64 th (sin.f64 ky)) (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64))))
#s(approx (* (/ (sin ky) (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2))) (sin th)) (*.f64 (fma.f64 (*.f64 (*.f64 (*.f64 th th) #s(literal -1/6 binary64)) (sin.f64 ky)) (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)) (*.f64 (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)) (sin.f64 ky))) th))
#s(approx (* (/ (sin ky) (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2))) (sin th)) (*.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 (*.f64 th th) #s(literal 1/120 binary64)) (sin.f64 ky)) (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)) (*.f64 (*.f64 #s(literal -1/6 binary64) (sin.f64 ky)) (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)))) (*.f64 th th) (*.f64 (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)) (sin.f64 ky))) th))
#s(approx (* (/ (sin ky) (exp (* (log (+ (* (sin kx) (sin kx)) (pow (sin ky) 2))) 1/2))) (sin th)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/120 binary64) (sin.f64 ky)) (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 th th) #s(literal -1/5040 binary64)) (sin.f64 ky)) (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)))) (*.f64 th th) (*.f64 (*.f64 #s(literal -1/6 binary64) (sin.f64 ky)) (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)))) (*.f64 th th) (*.f64 (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)) (sin.f64 ky))) th))
#s(approx (sin th) (sin.f64 th))

eval89.0ms (0.9%)

Memory
0.3MiB live, 194.5MiB allocated; 10ms collecting garbage
Compiler

Compiled 28 319 to 3 139 computations (88.9% saved)

prune1.5s (14.2%)

Memory
28.5MiB live, 2 611.7MiB allocated; 115ms collecting garbage
Pruning

10 alts after pruning (8 fresh and 2 done)

PrunedKeptTotal
New6536659
Fresh426
Picked325
Done000
Total66010670
Accuracy
100.0%
Counts
670 → 10
Alt Table
Click to see full alt table
StatusAccuracyProgram
94.5%
(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))
81.3%
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (/.f64 (-.f64 (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (pow.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)) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) (sin.f64 th))
82.5%
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (/.f64 (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx))) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
92.3%
(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (*.f64 (pow.f64 (pow.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal -1 binary64)) #s(literal 1/2 binary64)) (sin.f64 ky))) (sin.f64 th))
99.6%
(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (*.f64 (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)) (sin.f64 ky))) (sin.f64 th))
97.5%
(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (*.f64 (+.f64 (cosh.f64 (*.f64 (log.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky))) #s(literal -1 binary64))) (sinh.f64 (*.f64 (log.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky))) #s(literal -1 binary64)))) (sin.f64 ky))) (sin.f64 th))
99.2%
(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (*.f64 (*.f64 (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1/2 binary64)) (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1/2 binary64))) (sin.f64 ky))) (sin.f64 th))
23.3%
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (/.f64 (*.f64 (*.f64 kx kx) (sin.f64 th)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal -1/2 binary64) (sin.f64 th)))
89.5%
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (pow.f64 (pow.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 1/2 binary64)) #s(literal -1 binary64)) (*.f64 (sin.f64 th) (sin.f64 ky))))
99.4%
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (*.f64 (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)) (sin.f64 th)) (sin.f64 ky)))
Compiler

Compiled 593 to 383 computations (35.4% saved)

series229.0ms (2.2%)

Memory
7.1MiB live, 431.3MiB allocated; 27ms collecting garbage
Counts
40 → 270
Calls
Call 1
Inputs
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (*.f64 (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)) (sin.f64 th)) (sin.f64 ky)))
(*.f64 (*.f64 (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)) (sin.f64 th)) (sin.f64 ky))
(*.f64 (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)) (sin.f64 th))
(pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64))
(hypot.f64 (sin.f64 kx) (sin.f64 ky))
(sin.f64 kx)
kx
(sin.f64 ky)
ky
#s(literal -1 binary64)
(sin.f64 th)
th
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (pow.f64 (pow.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 1/2 binary64)) #s(literal -1 binary64)) (*.f64 (sin.f64 th) (sin.f64 ky))))
(*.f64 (pow.f64 (pow.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 1/2 binary64)) #s(literal -1 binary64)) (*.f64 (sin.f64 th) (sin.f64 ky)))
(pow.f64 (pow.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 1/2 binary64)) #s(literal -1 binary64))
(pow.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 1/2 binary64))
(fma.f64 (sin.f64 kx) (sin.f64 kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))
(pow.f64 (sin.f64 ky) #s(literal 2 binary64))
#s(literal 2 binary64)
#s(literal 1/2 binary64)
(*.f64 (sin.f64 th) (sin.f64 ky))
(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (*.f64 (+.f64 (cosh.f64 (*.f64 (log.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky))) #s(literal -1 binary64))) (sinh.f64 (*.f64 (log.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky))) #s(literal -1 binary64)))) (sin.f64 ky))) (sin.f64 th))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (*.f64 (+.f64 (cosh.f64 (*.f64 (log.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky))) #s(literal -1 binary64))) (sinh.f64 (*.f64 (log.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky))) #s(literal -1 binary64)))) (sin.f64 ky)))
(*.f64 (+.f64 (cosh.f64 (*.f64 (log.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky))) #s(literal -1 binary64))) (sinh.f64 (*.f64 (log.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky))) #s(literal -1 binary64)))) (sin.f64 ky))
(+.f64 (cosh.f64 (*.f64 (log.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky))) #s(literal -1 binary64))) (sinh.f64 (*.f64 (log.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky))) #s(literal -1 binary64))))
(cosh.f64 (*.f64 (log.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky))) #s(literal -1 binary64)))
(*.f64 (log.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky))) #s(literal -1 binary64))
(log.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)))
(sinh.f64 (*.f64 (log.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky))) #s(literal -1 binary64)))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (/.f64 (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx))) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (/.f64 (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx))) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
(sqrt.f64 (+.f64 (/.f64 (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx))) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
(+.f64 (/.f64 (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx))) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))
(/.f64 (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx))) #s(literal 2 binary64))
(-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx)))
(cos.f64 (-.f64 kx kx))
(-.f64 kx kx)
(cos.f64 (+.f64 kx kx))
(+.f64 kx kx)
(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))
Outputs
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (sin th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (+ (sin th) (* (pow kx 2) (+ (* -1/2 (/ (sin th) (pow (sin ky) 2))) (* 1/2 (* (pow kx 2) (* (pow (sin ky) 2) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))))))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (+ (sin th) (* (pow kx 2) (+ (* -1/2 (/ (sin th) (pow (sin ky) 2))) (* (pow kx 2) (+ (* -1/2 (* (pow kx 2) (* (pow (sin ky) 2) (* (sin th) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))) (pow (sin ky) 2))) (+ (* 2/45 (/ 1 (pow (sin ky) 4))) (+ (* 2/3 (/ 1 (pow (sin ky) 6))) (/ 1 (pow (sin ky) 8))))))))) (* 1/2 (* (pow (sin ky) 2) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6))))))))))))))
#s(approx (* (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (sin th)) (sin ky)) #s(hole binary64 (sin th)))
#s(approx (* (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (sin th)) (sin ky)) #s(hole binary64 (+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2))))))
#s(approx (* (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (sin th)) (sin ky)) #s(hole binary64 (+ (sin th) (* (pow kx 2) (+ (* -1/2 (/ (sin th) (pow (sin ky) 2))) (* 1/2 (* (pow kx 2) (* (pow (sin ky) 2) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))))))))))))
#s(approx (* (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (sin th)) (sin ky)) #s(hole binary64 (+ (sin th) (* (pow kx 2) (+ (* -1/2 (/ (sin th) (pow (sin ky) 2))) (* (pow kx 2) (+ (* -1/2 (* (pow kx 2) (* (pow (sin ky) 2) (* (sin th) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))) (pow (sin ky) 2))) (+ (* 2/45 (/ 1 (pow (sin ky) 4))) (+ (* 2/3 (/ 1 (pow (sin ky) 6))) (/ 1 (pow (sin ky) 8))))))))) (* 1/2 (* (pow (sin ky) 2) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6))))))))))))))
#s(approx (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (sin th)) #s(hole binary64 (/ (sin th) (sin ky))))
#s(approx (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (sin th)) #s(hole binary64 (+ (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 3))) (/ (sin th) (sin ky)))))
#s(approx (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (sin th)) #s(hole binary64 (+ (* (pow kx 2) (+ (* -1/2 (/ (sin th) (pow (sin ky) 3))) (* 1/2 (* (pow kx 2) (* (sin ky) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))))))))) (/ (sin th) (sin ky)))))
#s(approx (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (sin th)) #s(hole binary64 (+ (* (pow kx 2) (+ (* -1/2 (/ (sin th) (pow (sin ky) 3))) (* (pow kx 2) (+ (* -1/2 (* (pow kx 2) (* (sin ky) (* (sin th) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))) (pow (sin ky) 2))) (+ (* 2/45 (/ 1 (pow (sin ky) 4))) (+ (* 2/3 (/ 1 (pow (sin ky) 6))) (/ 1 (pow (sin ky) 8))))))))) (* 1/2 (* (sin ky) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6))))))))))) (/ (sin th) (sin ky)))))
#s(approx (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) #s(hole binary64 (/ 1 (sin ky))))
#s(approx (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) #s(hole binary64 (+ (* -1/2 (/ (pow kx 2) (pow (sin ky) 3))) (/ 1 (sin ky)))))
#s(approx (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) #s(hole binary64 (+ (* (pow kx 2) (- (* 1/2 (* (pow kx 2) (* (sin ky) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6))))))) (* 1/2 (/ 1 (pow (sin ky) 3))))) (/ 1 (sin ky)))))
#s(approx (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) #s(hole binary64 (+ (* (pow kx 2) (- (* (pow kx 2) (+ (* -1/2 (* (pow kx 2) (* (sin ky) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))) (pow (sin ky) 2))) (+ (* 2/45 (/ 1 (pow (sin ky) 4))) (+ (* 2/3 (/ 1 (pow (sin ky) 6))) (/ 1 (pow (sin ky) 8)))))))) (* 1/2 (* (sin ky) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))))))) (* 1/2 (/ 1 (pow (sin ky) 3))))) (/ 1 (sin ky)))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) #s(hole binary64 (sin ky)))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) #s(hole binary64 (+ (sin ky) (* 1/2 (/ (pow kx 2) (sin ky))))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) #s(hole binary64 (+ (sin ky) (* (pow kx 2) (+ (* -1/2 (/ (* (pow kx 2) (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2))))) (sin ky))) (* 1/2 (/ 1 (sin ky))))))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) #s(hole binary64 (+ (sin ky) (* (pow kx 2) (+ (* (pow kx 2) (+ (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (sin ky))) (* 1/2 (/ (* (pow kx 2) (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2))))) (sin ky))))) (* 1/2 (/ 1 (sin ky))))))))
#s(approx (sin kx) #s(hole binary64 kx))
#s(approx (sin kx) #s(hole binary64 (* kx (+ 1 (* -1/6 (pow kx 2))))))
#s(approx (sin kx) #s(hole binary64 (* kx (+ 1 (* (pow kx 2) (- (* 1/120 (pow kx 2)) 1/6))))))
#s(approx (sin kx) #s(hole binary64 (* kx (+ 1 (* (pow kx 2) (- (* (pow kx 2) (+ 1/120 (* -1/5040 (pow kx 2)))) 1/6))))))
#s(approx kx #s(hole binary64 kx))
#s(approx (* (pow (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) 1/2) -1) (* (sin th) (sin ky))) #s(hole binary64 (sin th)))
#s(approx (* (pow (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) 1/2) -1) (* (sin th) (sin ky))) #s(hole binary64 (+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2))))))
#s(approx (* (pow (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) 1/2) -1) (* (sin th) (sin ky))) #s(hole binary64 (+ (sin th) (* (pow kx 2) (+ (* -1/2 (/ (sin th) (pow (sin ky) 2))) (* 1/2 (* (pow kx 2) (* (pow (sin ky) 2) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))))))))))))
#s(approx (* (pow (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) 1/2) -1) (* (sin th) (sin ky))) #s(hole binary64 (+ (sin th) (* (pow kx 2) (+ (* -1/2 (/ (sin th) (pow (sin ky) 2))) (* (pow kx 2) (+ (* -1/2 (* (pow kx 2) (* (pow (sin ky) 2) (* (sin th) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))) (pow (sin ky) 2))) (+ (* 2/45 (/ 1 (pow (sin ky) 4))) (+ (* 2/3 (/ 1 (pow (sin ky) 6))) (/ 1 (pow (sin ky) 8))))))))) (* 1/2 (* (pow (sin ky) 2) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6))))))))))))))
#s(approx (pow (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) 1/2) -1) #s(hole binary64 (/ 1 (sin ky))))
#s(approx (pow (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) 1/2) -1) #s(hole binary64 (+ (* -1/2 (/ (pow kx 2) (pow (sin ky) 3))) (/ 1 (sin ky)))))
#s(approx (pow (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) 1/2) -1) #s(hole binary64 (+ (* (pow kx 2) (- (* 1/2 (* (pow kx 2) (* (sin ky) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6))))))) (* 1/2 (/ 1 (pow (sin ky) 3))))) (/ 1 (sin ky)))))
#s(approx (pow (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) 1/2) -1) #s(hole binary64 (+ (* (pow kx 2) (- (* (pow kx 2) (+ (* -1/2 (* (pow kx 2) (* (sin ky) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))) (pow (sin ky) 2))) (+ (* 2/45 (/ 1 (pow (sin ky) 4))) (+ (* 2/3 (/ 1 (pow (sin ky) 6))) (/ 1 (pow (sin ky) 8)))))))) (* 1/2 (* (sin ky) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))))))) (* 1/2 (/ 1 (pow (sin ky) 3))))) (/ 1 (sin ky)))))
#s(approx (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) 1/2) #s(hole binary64 (sin ky)))
#s(approx (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) 1/2) #s(hole binary64 (+ (sin ky) (* 1/2 (/ (pow kx 2) (sin ky))))))
#s(approx (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) 1/2) #s(hole binary64 (+ (sin ky) (* (pow kx 2) (+ (* -1/2 (/ (* (pow kx 2) (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2))))) (sin ky))) (* 1/2 (/ 1 (sin ky))))))))
#s(approx (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) 1/2) #s(hole binary64 (+ (sin ky) (* (pow kx 2) (+ (* (pow kx 2) (+ (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (sin ky))) (* 1/2 (/ (* (pow kx 2) (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2))))) (sin ky))))) (* 1/2 (/ 1 (sin ky))))))))
#s(approx (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) #s(hole binary64 (pow (sin ky) 2)))
#s(approx (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) #s(hole binary64 (+ (pow kx 2) (pow (sin ky) 2))))
#s(approx (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) #s(hole binary64 (+ (* (pow kx 2) (+ 1 (* -1/3 (pow kx 2)))) (pow (sin ky) 2))))
#s(approx (+ (* (sin kx) (sin kx)) (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 (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 1))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ 1 (* -1/2 (/ (pow kx 2) (pow (sin ky) 2))))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ 1 (* (pow kx 2) (- (* 1/2 (* (pow kx 2) (* (pow (sin ky) 2) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6))))))) (* 1/2 (/ 1 (pow (sin ky) 2))))))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ 1 (* (pow kx 2) (- (* (pow kx 2) (+ (* -1/2 (* (pow kx 2) (* (pow (sin ky) 2) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))) (pow (sin ky) 2))) (+ (* 2/45 (/ 1 (pow (sin ky) 4))) (+ (* 2/3 (/ 1 (pow (sin ky) 6))) (/ 1 (pow (sin ky) 8)))))))) (* 1/2 (* (pow (sin ky) 2) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))))))) (* 1/2 (/ 1 (pow (sin ky) 2))))))))
#s(approx (* (+ (cosh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1)) (sinh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1))) (sin ky)) #s(hole binary64 (* (sin ky) (+ (* 1/2 (+ (sin ky) (/ 1 (sin ky)))) (* 1/2 (+ (* -1 (sin ky)) (/ 1 (sin ky))))))))
#s(approx (* (+ (cosh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1)) (sinh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1))) (sin ky)) #s(hole binary64 (+ (* (sin ky) (+ (* 1/2 (+ (sin ky) (/ 1 (sin ky)))) (* 1/2 (+ (* -1 (sin ky)) (/ 1 (sin ky)))))) (* (pow kx 2) (* (sin ky) (+ (* -1/2 (+ (* 1/2 (/ 1 (sin ky))) (* 1/2 (/ 1 (pow (sin ky) 3))))) (* 1/2 (- (* 1/2 (/ 1 (sin ky))) (* 1/2 (/ 1 (pow (sin ky) 3)))))))))))
#s(approx (* (+ (cosh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1)) (sinh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1))) (sin ky)) #s(hole binary64 (+ (* (sin ky) (+ (* 1/2 (+ (sin ky) (/ 1 (sin ky)))) (* 1/2 (+ (* -1 (sin ky)) (/ 1 (sin ky)))))) (* (pow kx 2) (+ (* (sin ky) (+ (* -1/2 (+ (* 1/2 (/ 1 (sin ky))) (* 1/2 (/ 1 (pow (sin ky) 3))))) (* 1/2 (- (* 1/2 (/ 1 (sin ky))) (* 1/2 (/ 1 (pow (sin ky) 3))))))) (* (pow kx 2) (* (sin ky) (+ (* 1/2 (- (+ (* -1/24 (/ (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2))) (* 3 (/ 1 (pow (sin ky) 4)))) (sin ky))) (* 1/8 (/ 1 (pow (sin ky) 5)))) (+ (* -1 (* (sin ky) (+ (* -1/24 (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2))) (* 3 (/ 1 (pow (sin ky) 4))))) (* 1/8 (/ 1 (pow (sin ky) 4)))))) (* 1/4 (/ 1 (pow (sin ky) 3)))))) (* 1/2 (- (+ (* -1/24 (/ (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2))) (* 3 (/ 1 (pow (sin ky) 4)))) (sin ky))) (+ (* 1/8 (/ 1 (pow (sin ky) 5))) (* 1/4 (/ 1 (pow (sin ky) 3))))) (* (sin ky) (+ (* -1/24 (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2))) (* 3 (/ 1 (pow (sin ky) 4))))) (* 1/8 (/ 1 (pow (sin ky) 4)))))))))))))))
#s(approx (* (+ (cosh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1)) (sinh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1))) (sin ky)) #s(hole binary64 (+ (* (sin ky) (+ (* 1/2 (+ (sin ky) (/ 1 (sin ky)))) (* 1/2 (+ (* -1 (sin ky)) (/ 1 (sin ky)))))) (* (pow kx 2) (+ (* (sin ky) (+ (* -1/2 (+ (* 1/2 (/ 1 (sin ky))) (* 1/2 (/ 1 (pow (sin ky) 3))))) (* 1/2 (- (* 1/2 (/ 1 (sin ky))) (* 1/2 (/ 1 (pow (sin ky) 3))))))) (* (pow kx 2) (+ (* (sin ky) (+ (* 1/2 (- (+ (* -1/24 (/ (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2))) (* 3 (/ 1 (pow (sin ky) 4)))) (sin ky))) (* 1/8 (/ 1 (pow (sin ky) 5)))) (+ (* -1 (* (sin ky) (+ (* -1/24 (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2))) (* 3 (/ 1 (pow (sin ky) 4))))) (* 1/8 (/ 1 (pow (sin ky) 4)))))) (* 1/4 (/ 1 (pow (sin ky) 3)))))) (* 1/2 (- (+ (* -1/24 (/ (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2))) (* 3 (/ 1 (pow (sin ky) 4)))) (sin ky))) (+ (* 1/8 (/ 1 (pow (sin ky) 5))) (* 1/4 (/ 1 (pow (sin ky) 3))))) (* (sin ky) (+ (* -1/24 (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2))) (* 3 (/ 1 (pow (sin ky) 4))))) (* 1/8 (/ 1 (pow (sin ky) 4))))))))) (* (pow kx 2) (* (sin ky) (+ (* 1/2 (- (+ (* -1/720 (/ (+ (* 180 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 4))) (+ (* 360 (/ (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2)))) (pow (sin ky) 2))) (* 30 (/ 1 (pow (sin ky) 6))))) (sin ky))) (* 1/48 (/ (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2))) (* 3 (/ 1 (pow (sin ky) 4)))) (pow (sin ky) 3)))) (+ (* -1 (* (sin ky) (- (+ (* -1/720 (+ (* 30 (/ 1 (pow (sin ky) 6))) (+ (* 180 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 4))) (* 360 (/ (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2)))) (pow (sin ky) 2)))))) (* 1/48 (/ (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2))) (* 3 (/ 1 (pow (sin ky) 4)))) (pow (sin ky) 2)))) (* 1/48 (/ 1 (pow (sin ky) 6)))))) (+ (* -1/2 (/ (+ (* -1/24 (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2))) (* 3 (/ 1 (pow (sin ky) 4))))) (* 1/8 (/ 1 (pow (sin ky) 4)))) (sin ky))) (+ (* 1/48 (/ 1 (pow (sin ky) 7))) (* 1/2 (/ (+ (* -1 (* (sin ky) (+ (* -1/24 (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2))) (* 3 (/ 1 (pow (sin ky) 4))))) (* 1/8 (/ 1 (pow (sin ky) 4)))))) (* 1/4 (/ 1 (pow (sin ky) 3)))) (pow (sin ky) 2)))))))) (* 1/2 (- (+ (* -1/720 (/ (+ (* 180 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 4))) (+ (* 360 (/ (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2)))) (pow (sin ky) 2))) (* 30 (/ 1 (pow (sin ky) 6))))) (sin ky))) (* 1/48 (/ (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2))) (* 3 (/ 1 (pow (sin ky) 4)))) (pow (sin ky) 3)))) (+ (* -1/2 (/ (- (* 1/4 (/ 1 (pow (sin ky) 3))) (* (sin ky) (+ (* -1/24 (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2))) (* 3 (/ 1 (pow (sin ky) 4))))) (* 1/8 (/ 1 (pow (sin ky) 4)))))) (pow (sin ky) 2))) (+ (* 1/48 (/ 1 (pow (sin ky) 7))) (+ (* 1/2 (/ (+ (* -1/24 (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2))) (* 3 (/ 1 (pow (sin ky) 4))))) (* 1/8 (/ 1 (pow (sin ky) 4)))) (sin ky))) (* (sin ky) (- (+ (* -1/720 (+ (* 30 (/ 1 (pow (sin ky) 6))) (+ (* 180 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 4))) (* 360 (/ (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2)))) (pow (sin ky) 2)))))) (* 1/48 (/ (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2))) (* 3 (/ 1 (pow (sin ky) 4)))) (pow (sin ky) 2)))) (* 1/48 (/ 1 (pow (sin ky) 6))))))))))))))))))))
#s(approx (+ (cosh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1)) (sinh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1))) #s(hole binary64 (+ (* 1/2 (+ (sin ky) (/ 1 (sin ky)))) (* 1/2 (+ (* -1 (sin ky)) (/ 1 (sin ky)))))))
#s(approx (+ (cosh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1)) (sinh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1))) #s(hole binary64 (+ (* 1/2 (+ (sin ky) (/ 1 (sin ky)))) (+ (* 1/2 (+ (* -1 (sin ky)) (/ 1 (sin ky)))) (* (pow kx 2) (+ (* -1/2 (+ (* 1/2 (/ 1 (sin ky))) (* 1/2 (/ 1 (pow (sin ky) 3))))) (* 1/2 (- (* 1/2 (/ 1 (sin ky))) (* 1/2 (/ 1 (pow (sin ky) 3)))))))))))
#s(approx (+ (cosh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1)) (sinh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1))) #s(hole binary64 (+ (* 1/2 (+ (sin ky) (/ 1 (sin ky)))) (+ (* 1/2 (+ (* -1 (sin ky)) (/ 1 (sin ky)))) (* (pow kx 2) (+ (* -1/2 (+ (* 1/2 (/ 1 (sin ky))) (* 1/2 (/ 1 (pow (sin ky) 3))))) (+ (* 1/2 (- (* 1/2 (/ 1 (sin ky))) (* 1/2 (/ 1 (pow (sin ky) 3))))) (* (pow kx 2) (+ (* 1/2 (- (+ (* -1/24 (/ (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2))) (* 3 (/ 1 (pow (sin ky) 4)))) (sin ky))) (* 1/8 (/ 1 (pow (sin ky) 5)))) (+ (* -1 (* (sin ky) (+ (* -1/24 (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2))) (* 3 (/ 1 (pow (sin ky) 4))))) (* 1/8 (/ 1 (pow (sin ky) 4)))))) (* 1/4 (/ 1 (pow (sin ky) 3)))))) (* 1/2 (- (+ (* -1/24 (/ (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2))) (* 3 (/ 1 (pow (sin ky) 4)))) (sin ky))) (+ (* 1/8 (/ 1 (pow (sin ky) 5))) (* 1/4 (/ 1 (pow (sin ky) 3))))) (* (sin ky) (+ (* -1/24 (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2))) (* 3 (/ 1 (pow (sin ky) 4))))) (* 1/8 (/ 1 (pow (sin ky) 4))))))))))))))))
#s(approx (+ (cosh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1)) (sinh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1))) #s(hole binary64 (+ (* 1/2 (+ (sin ky) (/ 1 (sin ky)))) (+ (* 1/2 (+ (* -1 (sin ky)) (/ 1 (sin ky)))) (* (pow kx 2) (+ (* -1/2 (+ (* 1/2 (/ 1 (sin ky))) (* 1/2 (/ 1 (pow (sin ky) 3))))) (+ (* 1/2 (- (* 1/2 (/ 1 (sin ky))) (* 1/2 (/ 1 (pow (sin ky) 3))))) (* (pow kx 2) (+ (* 1/2 (- (+ (* -1/24 (/ (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2))) (* 3 (/ 1 (pow (sin ky) 4)))) (sin ky))) (* 1/8 (/ 1 (pow (sin ky) 5)))) (+ (* -1 (* (sin ky) (+ (* -1/24 (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2))) (* 3 (/ 1 (pow (sin ky) 4))))) (* 1/8 (/ 1 (pow (sin ky) 4)))))) (* 1/4 (/ 1 (pow (sin ky) 3)))))) (+ (* 1/2 (- (+ (* -1/24 (/ (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2))) (* 3 (/ 1 (pow (sin ky) 4)))) (sin ky))) (+ (* 1/8 (/ 1 (pow (sin ky) 5))) (* 1/4 (/ 1 (pow (sin ky) 3))))) (* (sin ky) (+ (* -1/24 (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2))) (* 3 (/ 1 (pow (sin ky) 4))))) (* 1/8 (/ 1 (pow (sin ky) 4))))))) (* (pow kx 2) (+ (* 1/2 (- (+ (* -1/720 (/ (+ (* 30 (/ 1 (pow (sin ky) 6))) (+ (* 180 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 4))) (* 360 (/ (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2)))) (pow (sin ky) 2))))) (sin ky))) (* 1/48 (/ (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2))) (* 3 (/ 1 (pow (sin ky) 4)))) (pow (sin ky) 3)))) (+ (* -1 (* (sin ky) (- (+ (* -1/720 (+ (* 180 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 4))) (+ (* 360 (/ (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2)))) (pow (sin ky) 2))) (* 30 (/ 1 (pow (sin ky) 6)))))) (* 1/48 (/ (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2))) (* 3 (/ 1 (pow (sin ky) 4)))) (pow (sin ky) 2)))) (* 1/48 (/ 1 (pow (sin ky) 6)))))) (+ (* -1/2 (/ (+ (* -1/24 (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2))) (* 3 (/ 1 (pow (sin ky) 4))))) (* 1/8 (/ 1 (pow (sin ky) 4)))) (sin ky))) (+ (* 1/48 (/ 1 (pow (sin ky) 7))) (* 1/2 (/ (+ (* -1 (* (sin ky) (+ (* -1/24 (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2))) (* 3 (/ 1 (pow (sin ky) 4))))) (* 1/8 (/ 1 (pow (sin ky) 4)))))) (* 1/4 (/ 1 (pow (sin ky) 3)))) (pow (sin ky) 2)))))))) (* 1/2 (- (+ (* -1/720 (/ (+ (* 30 (/ 1 (pow (sin ky) 6))) (+ (* 180 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 4))) (* 360 (/ (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2)))) (pow (sin ky) 2))))) (sin ky))) (* 1/48 (/ (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2))) (* 3 (/ 1 (pow (sin ky) 4)))) (pow (sin ky) 3)))) (+ (* -1/2 (/ (- (* 1/4 (/ 1 (pow (sin ky) 3))) (* (sin ky) (+ (* -1/24 (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2))) (* 3 (/ 1 (pow (sin ky) 4))))) (* 1/8 (/ 1 (pow (sin ky) 4)))))) (pow (sin ky) 2))) (+ (* 1/48 (/ 1 (pow (sin ky) 7))) (+ (* 1/2 (/ (+ (* -1/24 (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2))) (* 3 (/ 1 (pow (sin ky) 4))))) (* 1/8 (/ 1 (pow (sin ky) 4)))) (sin ky))) (* (sin ky) (- (+ (* -1/720 (+ (* 180 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 4))) (+ (* 360 (/ (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2)))) (pow (sin ky) 2))) (* 30 (/ 1 (pow (sin ky) 6)))))) (* 1/48 (/ (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2))) (* 3 (/ 1 (pow (sin ky) 4)))) (pow (sin ky) 2)))) (* 1/48 (/ 1 (pow (sin ky) 6))))))))))))))))))))))
#s(approx (cosh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1)) #s(hole binary64 (* 1/2 (+ (sin ky) (/ 1 (sin ky))))))
#s(approx (cosh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1)) #s(hole binary64 (+ (* 1/2 (* (pow kx 2) (- (* 1/2 (/ 1 (sin ky))) (* 1/2 (/ 1 (pow (sin ky) 3)))))) (* 1/2 (+ (sin ky) (/ 1 (sin ky)))))))
#s(approx (cosh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1)) #s(hole binary64 (+ (* 1/2 (+ (sin ky) (/ 1 (sin ky)))) (* (pow kx 2) (+ (* 1/2 (* (pow kx 2) (- (+ (* -1/24 (/ (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2))) (* 3 (/ 1 (pow (sin ky) 4)))) (sin ky))) (+ (* 1/8 (/ 1 (pow (sin ky) 5))) (* 1/4 (/ 1 (pow (sin ky) 3))))) (* (sin ky) (+ (* -1/24 (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2))) (* 3 (/ 1 (pow (sin ky) 4))))) (* 1/8 (/ 1 (pow (sin ky) 4)))))))) (* 1/2 (- (* 1/2 (/ 1 (sin ky))) (* 1/2 (/ 1 (pow (sin ky) 3))))))))))
#s(approx (cosh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1)) #s(hole binary64 (+ (* 1/2 (+ (sin ky) (/ 1 (sin ky)))) (* (pow kx 2) (+ (* 1/2 (- (* 1/2 (/ 1 (sin ky))) (* 1/2 (/ 1 (pow (sin ky) 3))))) (* (pow kx 2) (+ (* 1/2 (* (pow kx 2) (- (+ (* -1/720 (/ (+ (* 180 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 4))) (+ (* 360 (/ (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2)))) (pow (sin ky) 2))) (* 30 (/ 1 (pow (sin ky) 6))))) (sin ky))) (* 1/48 (/ (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2))) (* 3 (/ 1 (pow (sin ky) 4)))) (pow (sin ky) 3)))) (+ (* -1/2 (/ (- (* 1/4 (/ 1 (pow (sin ky) 3))) (* (sin ky) (+ (* -1/24 (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2))) (* 3 (/ 1 (pow (sin ky) 4))))) (* 1/8 (/ 1 (pow (sin ky) 4)))))) (pow (sin ky) 2))) (+ (* 1/48 (/ 1 (pow (sin ky) 7))) (+ (* 1/2 (/ (+ (* -1/24 (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2))) (* 3 (/ 1 (pow (sin ky) 4))))) (* 1/8 (/ 1 (pow (sin ky) 4)))) (sin ky))) (* (sin ky) (- (+ (* -1/720 (+ (* 30 (/ 1 (pow (sin ky) 6))) (+ (* 180 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 4))) (* 360 (/ (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2)))) (pow (sin ky) 2)))))) (* 1/48 (/ (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2))) (* 3 (/ 1 (pow (sin ky) 4)))) (pow (sin ky) 2)))) (* 1/48 (/ 1 (pow (sin ky) 6))))))))))) (* 1/2 (- (+ (* -1/24 (/ (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2))) (* 3 (/ 1 (pow (sin ky) 4)))) (sin ky))) (+ (* 1/8 (/ 1 (pow (sin ky) 5))) (* 1/4 (/ 1 (pow (sin ky) 3))))) (* (sin ky) (+ (* -1/24 (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2))) (* 3 (/ 1 (pow (sin ky) 4))))) (* 1/8 (/ 1 (pow (sin ky) 4))))))))))))))
#s(approx (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1) #s(hole binary64 (* -1 (log (sin ky)))))
#s(approx (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1) #s(hole binary64 (+ (* -1 (log (sin ky))) (* -1/2 (/ (pow kx 2) (pow (sin ky) 2))))))
#s(approx (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1) #s(hole binary64 (+ (* -1 (log (sin ky))) (* (pow kx 2) (- (* -1/24 (* (pow kx 2) (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2))) (* 3 (/ 1 (pow (sin ky) 4)))))) (* 1/2 (/ 1 (pow (sin ky) 2))))))))
#s(approx (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1) #s(hole binary64 (+ (* -1 (log (sin ky))) (* (pow kx 2) (- (* (pow kx 2) (+ (* -1/24 (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2))) (* 3 (/ 1 (pow (sin ky) 4))))) (* -1/720 (* (pow kx 2) (+ (* 30 (/ 1 (pow (sin ky) 6))) (+ (* 180 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 4))) (* 360 (/ (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2)))) (pow (sin ky) 2))))))))) (* 1/2 (/ 1 (pow (sin ky) 2))))))))
#s(approx (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(hole binary64 (log (sin ky))))
#s(approx (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(hole binary64 (+ (log (sin ky)) (* 1/2 (/ (pow kx 2) (pow (sin ky) 2))))))
#s(approx (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(hole binary64 (+ (log (sin ky)) (* (pow kx 2) (+ (* 1/24 (* (pow kx 2) (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2))) (* 3 (/ 1 (pow (sin ky) 4)))))) (* 1/2 (/ 1 (pow (sin ky) 2))))))))
#s(approx (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(hole binary64 (+ (log (sin ky)) (* (pow kx 2) (+ (* (pow kx 2) (+ (* 1/720 (* (pow kx 2) (+ (* 180 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 4))) (+ (* 360 (/ (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2)))) (pow (sin ky) 2))) (* 30 (/ 1 (pow (sin ky) 6))))))) (* 1/24 (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2))) (* 3 (/ 1 (pow (sin ky) 4))))))) (* 1/2 (/ 1 (pow (sin ky) 2))))))))
#s(approx (sinh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1)) #s(hole binary64 (* 1/2 (+ (* -1 (sin ky)) (/ 1 (sin ky))))))
#s(approx (sinh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1)) #s(hole binary64 (+ (* -1/2 (* (pow kx 2) (+ (* 1/2 (/ 1 (sin ky))) (* 1/2 (/ 1 (pow (sin ky) 3)))))) (* 1/2 (+ (* -1 (sin ky)) (/ 1 (sin ky)))))))
#s(approx (sinh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1)) #s(hole binary64 (+ (* 1/2 (+ (* -1 (sin ky)) (/ 1 (sin ky)))) (* (pow kx 2) (+ (* -1/2 (+ (* 1/2 (/ 1 (sin ky))) (* 1/2 (/ 1 (pow (sin ky) 3))))) (* 1/2 (* (pow kx 2) (- (+ (* -1/24 (/ (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2))) (* 3 (/ 1 (pow (sin ky) 4)))) (sin ky))) (* 1/8 (/ 1 (pow (sin ky) 5)))) (+ (* -1 (* (sin ky) (+ (* -1/24 (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2))) (* 3 (/ 1 (pow (sin ky) 4))))) (* 1/8 (/ 1 (pow (sin ky) 4)))))) (* 1/4 (/ 1 (pow (sin ky) 3))))))))))))
#s(approx (sinh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1)) #s(hole binary64 (+ (* 1/2 (+ (* -1 (sin ky)) (/ 1 (sin ky)))) (* (pow kx 2) (+ (* -1/2 (+ (* 1/2 (/ 1 (sin ky))) (* 1/2 (/ 1 (pow (sin ky) 3))))) (* (pow kx 2) (+ (* 1/2 (* (pow kx 2) (- (+ (* -1/720 (/ (+ (* 180 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 4))) (+ (* 360 (/ (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2)))) (pow (sin ky) 2))) (* 30 (/ 1 (pow (sin ky) 6))))) (sin ky))) (* 1/48 (/ (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2))) (* 3 (/ 1 (pow (sin ky) 4)))) (pow (sin ky) 3)))) (+ (* -1 (* (sin ky) (- (+ (* -1/720 (+ (* 30 (/ 1 (pow (sin ky) 6))) (+ (* 180 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 4))) (* 360 (/ (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2)))) (pow (sin ky) 2)))))) (* 1/48 (/ (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2))) (* 3 (/ 1 (pow (sin ky) 4)))) (pow (sin ky) 2)))) (* 1/48 (/ 1 (pow (sin ky) 6)))))) (+ (* -1/2 (/ (+ (* -1/24 (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2))) (* 3 (/ 1 (pow (sin ky) 4))))) (* 1/8 (/ 1 (pow (sin ky) 4)))) (sin ky))) (+ (* 1/48 (/ 1 (pow (sin ky) 7))) (* 1/2 (/ (+ (* -1 (* (sin ky) (+ (* -1/24 (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2))) (* 3 (/ 1 (pow (sin ky) 4))))) (* 1/8 (/ 1 (pow (sin ky) 4)))))) (* 1/4 (/ 1 (pow (sin ky) 3)))) (pow (sin ky) 2))))))))) (* 1/2 (- (+ (* -1/24 (/ (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2))) (* 3 (/ 1 (pow (sin ky) 4)))) (sin ky))) (* 1/8 (/ 1 (pow (sin ky) 5)))) (+ (* -1 (* (sin ky) (+ (* -1/24 (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2))) (* 3 (/ 1 (pow (sin ky) 4))))) (* 1/8 (/ 1 (pow (sin ky) 4)))))) (* 1/4 (/ 1 (pow (sin ky) 3)))))))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (/ (- (cos (- kx kx)) (cos (+ kx kx))) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (sin th)))
#s(approx (* (/ (sin ky) (sqrt (+ (/ (- (cos (- kx kx)) (cos (+ kx kx))) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2))))))
#s(approx (* (/ (sin ky) (sqrt (+ (/ (- (cos (- kx kx)) (cos (+ kx kx))) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (+ (sin th) (* (pow kx 2) (+ (* -1/2 (/ (sin th) (pow (sin ky) 2))) (* 1/2 (* (pow kx 2) (* (pow (sin ky) 2) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))))))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (/ (- (cos (- kx kx)) (cos (+ kx kx))) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (+ (sin th) (* (pow kx 2) (+ (* -1/2 (/ (sin th) (pow (sin ky) 2))) (* (pow kx 2) (+ (* -1/2 (* (pow kx 2) (* (pow (sin ky) 2) (* (sin th) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))) (pow (sin ky) 2))) (+ (* 2/45 (/ 1 (pow (sin ky) 4))) (+ (* 2/3 (/ 1 (pow (sin ky) 6))) (/ 1 (pow (sin ky) 8))))))))) (* 1/2 (* (pow (sin ky) 2) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6))))))))))))))
#s(approx (/ (sin ky) (sqrt (+ (/ (- (cos (- kx kx)) (cos (+ kx kx))) 2) (pow (sin ky) 2)))) #s(hole binary64 1))
#s(approx (/ (sin ky) (sqrt (+ (/ (- (cos (- kx kx)) (cos (+ kx kx))) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ 1 (* -1/2 (/ (pow kx 2) (pow (sin ky) 2))))))
#s(approx (/ (sin ky) (sqrt (+ (/ (- (cos (- kx kx)) (cos (+ kx kx))) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ 1 (* (pow kx 2) (- (* 1/2 (* (pow kx 2) (* (pow (sin ky) 2) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6))))))) (* 1/2 (/ 1 (pow (sin ky) 2))))))))
#s(approx (/ (sin ky) (sqrt (+ (/ (- (cos (- kx kx)) (cos (+ kx kx))) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ 1 (* (pow kx 2) (- (* (pow kx 2) (+ (* -1/2 (* (pow kx 2) (* (pow (sin ky) 2) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))) (pow (sin ky) 2))) (+ (* 2/45 (/ 1 (pow (sin ky) 4))) (+ (* 2/3 (/ 1 (pow (sin ky) 6))) (/ 1 (pow (sin ky) 8)))))))) (* 1/2 (* (pow (sin ky) 2) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))))))) (* 1/2 (/ 1 (pow (sin ky) 2))))))))
#s(approx (sqrt (+ (/ (- (cos (- kx kx)) (cos (+ kx kx))) 2) (pow (sin ky) 2))) #s(hole binary64 (sin ky)))
#s(approx (sqrt (+ (/ (- (cos (- kx kx)) (cos (+ kx kx))) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (sin ky) (* 1/2 (/ (pow kx 2) (sin ky))))))
#s(approx (sqrt (+ (/ (- (cos (- kx kx)) (cos (+ kx kx))) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (sin ky) (* (pow kx 2) (+ (* -1/2 (/ (* (pow kx 2) (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2))))) (sin ky))) (* 1/2 (/ 1 (sin ky))))))))
#s(approx (sqrt (+ (/ (- (cos (- kx kx)) (cos (+ kx kx))) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (sin ky) (* (pow kx 2) (+ (* (pow kx 2) (+ (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (sin ky))) (* 1/2 (/ (* (pow kx 2) (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2))))) (sin ky))))) (* 1/2 (/ 1 (sin ky))))))))
#s(approx (+ (/ (- (cos (- kx kx)) (cos (+ kx kx))) 2) (pow (sin ky) 2)) #s(hole binary64 (pow (sin ky) 2)))
#s(approx (+ (/ (- (cos (- kx kx)) (cos (+ kx kx))) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (pow kx 2) (pow (sin ky) 2))))
#s(approx (+ (/ (- (cos (- kx kx)) (cos (+ kx kx))) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (* (pow kx 2) (+ 1 (* -1/3 (pow kx 2)))) (pow (sin ky) 2))))
#s(approx (+ (/ (- (cos (- kx kx)) (cos (+ kx 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 (/ (- (cos (- kx kx)) (cos (+ kx kx))) 2) #s(hole binary64 (pow kx 2)))
#s(approx (/ (- (cos (- kx kx)) (cos (+ kx kx))) 2) #s(hole binary64 (* (pow kx 2) (+ 1 (* -1/3 (pow kx 2))))))
#s(approx (/ (- (cos (- kx kx)) (cos (+ kx kx))) 2) #s(hole binary64 (* (pow kx 2) (+ 1 (* (pow kx 2) (- (* 2/45 (pow kx 2)) 1/3))))))
#s(approx (/ (- (cos (- kx kx)) (cos (+ kx 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 (- (cos (- kx kx)) (cos (+ kx kx))) #s(hole binary64 (* 2 (pow kx 2))))
#s(approx (- (cos (- kx kx)) (cos (+ kx kx))) #s(hole binary64 (* (pow kx 2) (+ 2 (* -2/3 (pow kx 2))))))
#s(approx (- (cos (- kx kx)) (cos (+ kx kx))) #s(hole binary64 (* (pow kx 2) (+ 2 (* (pow kx 2) (- (* 4/45 (pow kx 2)) 2/3))))))
#s(approx (- (cos (- kx kx)) (cos (+ kx kx))) #s(hole binary64 (* (pow kx 2) (+ 2 (* (pow kx 2) (- (* (pow kx 2) (+ 4/45 (* -2/315 (pow kx 2)))) 2/3))))))
#s(approx (cos (- kx kx)) #s(hole binary64 1))
#s(approx (- kx kx) #s(hole binary64 0))
#s(approx (cos (+ kx kx)) #s(hole binary64 1))
#s(approx (cos (+ kx kx)) #s(hole binary64 (+ 1 (* -2 (pow kx 2)))))
#s(approx (cos (+ kx kx)) #s(hole binary64 (+ 1 (* (pow kx 2) (- (* 2/3 (pow kx 2)) 2)))))
#s(approx (cos (+ kx kx)) #s(hole binary64 (+ 1 (* (pow kx 2) (- (* (pow kx 2) (+ 2/3 (* -4/45 (pow kx 2)))) 2)))))
#s(approx (+ kx kx) #s(hole binary64 (* 2 kx)))
#s(approx (/ (* (sin th) (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(hole binary64 (sin th)))
#s(approx (/ (* (sin th) (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(hole binary64 (+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2))))))
#s(approx (/ (* (sin th) (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(hole binary64 (+ (sin th) (* (pow kx 2) (+ (* -1/2 (/ (sin th) (pow (sin ky) 2))) (* 1/2 (* (pow kx 2) (* (pow (sin ky) 2) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))))))))))))
#s(approx (/ (* (sin th) (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(hole binary64 (+ (sin th) (* (pow kx 2) (+ (* -1/2 (/ (sin th) (pow (sin ky) 2))) (* (pow kx 2) (+ (* -1/2 (* (pow kx 2) (* (pow (sin ky) 2) (* (sin th) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))) (pow (sin ky) 2))) (+ (* 2/45 (/ 1 (pow (sin ky) 4))) (+ (* 2/3 (/ 1 (pow (sin ky) 6))) (/ 1 (pow (sin ky) 8))))))))) (* 1/2 (* (pow (sin ky) 2) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6))))))))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
#s(approx (* (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (sin th)) (sin ky)) #s(hole binary64 (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
#s(approx (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (sin th)) #s(hole binary64 (* (sin th) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
#s(approx (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) #s(hole binary64 (sqrt (/ 1 (+ (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 (* (pow (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) 1/2) -1) (* (sin th) (sin ky))) #s(hole binary64 (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
#s(approx (pow (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) 1/2) -1) #s(hole binary64 (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))
#s(approx (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) 1/2) #s(hole binary64 (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
#s(approx (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) #s(hole binary64 (+ (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 (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
#s(approx (* (+ (cosh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1)) (sinh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1))) (sin ky)) #s(hole binary64 (* (sin ky) (+ (* 1/2 (+ (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* 1/2 (+ (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (* -1 (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))))
#s(approx (+ (cosh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1)) (sinh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1))) #s(hole binary64 (+ (* 1/2 (+ (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* 1/2 (+ (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (* -1 (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))
#s(approx (cosh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1)) #s(hole binary64 (* 1/2 (+ (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))
#s(approx (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1) #s(hole binary64 (* -1 (log (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
#s(approx (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(hole binary64 (log (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))
#s(approx (sinh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1)) #s(hole binary64 (* 1/2 (+ (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (* -1 (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (/ (- (cos (- kx kx)) (cos (+ kx kx))) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 kx)))) (pow (sin ky) 2)))))))
#s(approx (/ (sin ky) (sqrt (+ (/ (- (cos (- kx kx)) (cos (+ kx kx))) 2) (pow (sin ky) 2)))) #s(hole binary64 (* (sin ky) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 kx)))) (pow (sin ky) 2)))))))
#s(approx (sqrt (+ (/ (- (cos (- kx kx)) (cos (+ kx kx))) 2) (pow (sin ky) 2))) #s(hole binary64 (sqrt (+ (* 1/2 (- 1 (cos (* 2 kx)))) (pow (sin ky) 2)))))
#s(approx (+ (/ (- (cos (- kx kx)) (cos (+ kx kx))) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (* 1/2 (- 1 (cos (* 2 kx)))) (pow (sin ky) 2))))
#s(approx (/ (- (cos (- kx kx)) (cos (+ kx kx))) 2) #s(hole binary64 (* 1/2 (- 1 (cos (* 2 kx))))))
#s(approx (- (cos (- kx kx)) (cos (+ kx kx))) #s(hole binary64 (- 1 (cos (* 2 kx)))))
#s(approx (cos (+ kx kx)) #s(hole binary64 (cos (* 2 kx))))
#s(approx (/ (* (sin th) (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(hole binary64 (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (/ (- (cos (- kx kx)) (cos (+ kx kx))) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (neg (* -2 kx))))) (pow (sin ky) 2)))))))
#s(approx (/ (sin ky) (sqrt (+ (/ (- (cos (- kx kx)) (cos (+ kx kx))) 2) (pow (sin ky) 2)))) #s(hole binary64 (* (sin ky) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (neg (* -2 kx))))) (pow (sin ky) 2)))))))
#s(approx (sqrt (+ (/ (- (cos (- kx kx)) (cos (+ kx kx))) 2) (pow (sin ky) 2))) #s(hole binary64 (sqrt (+ (* 1/2 (- 1 (cos (neg (* -2 kx))))) (pow (sin ky) 2)))))
#s(approx (+ (/ (- (cos (- kx kx)) (cos (+ kx kx))) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (* 1/2 (- 1 (cos (neg (* -2 kx))))) (pow (sin ky) 2))))
#s(approx (/ (- (cos (- kx kx)) (cos (+ kx kx))) 2) #s(hole binary64 (* 1/2 (- 1 (cos (neg (* -2 kx)))))))
#s(approx (- (cos (- kx kx)) (cos (+ kx kx))) #s(hole binary64 (- 1 (cos (neg (* -2 kx))))))
#s(approx (cos (+ kx kx)) #s(hole binary64 (cos (neg (* -2 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (/ (* ky (sin th)) (sin kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (* ky (+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx))))) (/ (sin th) (sin kx))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (* ky (+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (* (pow ky 2) (+ (* 1/120 (/ (sin th) (sin kx))) (+ (* 1/12 (/ (sin th) (pow (sin kx) 3))) (* 1/2 (* (sin kx) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))))))))) (/ (sin th) (sin kx))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (* ky (+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (* (pow ky 2) (+ (* 1/120 (/ (sin th) (sin kx))) (+ (* 1/12 (/ (sin th) (pow (sin kx) 3))) (+ (* 1/2 (* (sin kx) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))) (* (pow ky 2) (+ (* -1/2 (* (sin kx) (* (sin th) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))) (pow (sin kx) 2))) (+ (* 2/45 (/ 1 (pow (sin kx) 4))) (+ (* 2/3 (/ 1 (pow (sin kx) 6))) (/ 1 (pow (sin kx) 8)))))))) (+ (* -1/12 (* (sin kx) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))) (+ (* -1/240 (/ (sin th) (pow (sin kx) 3))) (* -1/5040 (/ (sin th) (sin kx)))))))))))))) (/ (sin th) (sin kx))))))
#s(approx (* (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (sin th)) (sin ky)) #s(hole binary64 (/ (* ky (sin th)) (sin kx))))
#s(approx (* (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (sin th)) (sin ky)) #s(hole binary64 (* ky (+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx))))) (/ (sin th) (sin kx))))))
#s(approx (* (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (sin th)) (sin ky)) #s(hole binary64 (* ky (+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (* (pow ky 2) (+ (* 1/120 (/ (sin th) (sin kx))) (+ (* 1/12 (/ (sin th) (pow (sin kx) 3))) (* 1/2 (* (sin kx) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))))))))) (/ (sin th) (sin kx))))))
#s(approx (* (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (sin th)) (sin ky)) #s(hole binary64 (* ky (+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (* (pow ky 2) (+ (* 1/120 (/ (sin th) (sin kx))) (+ (* 1/12 (/ (sin th) (pow (sin kx) 3))) (+ (* 1/2 (* (sin kx) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))) (* (pow ky 2) (+ (* -1/2 (* (sin kx) (* (sin th) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))) (pow (sin kx) 2))) (+ (* 2/45 (/ 1 (pow (sin kx) 4))) (+ (* 2/3 (/ 1 (pow (sin kx) 6))) (/ 1 (pow (sin kx) 8)))))))) (+ (* -1/12 (* (sin kx) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))) (+ (* -1/240 (/ (sin th) (pow (sin kx) 3))) (* -1/5040 (/ (sin th) (sin kx)))))))))))))) (/ (sin th) (sin kx))))))
#s(approx (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (sin th)) #s(hole binary64 (/ (sin th) (sin kx))))
#s(approx (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (sin th)) #s(hole binary64 (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (sin th) (sin kx)))))
#s(approx (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (sin th)) #s(hole binary64 (+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* 1/2 (* (pow ky 2) (* (sin kx) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))))))))) (/ (sin th) (sin kx)))))
#s(approx (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (sin th)) #s(hole binary64 (+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* (pow ky 2) (+ (* -1/2 (* (pow ky 2) (* (sin kx) (* (sin th) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))) (pow (sin kx) 2))) (+ (* 2/45 (/ 1 (pow (sin kx) 4))) (+ (* 2/3 (/ 1 (pow (sin kx) 6))) (/ 1 (pow (sin kx) 8))))))))) (* 1/2 (* (sin kx) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))))))) (/ (sin th) (sin kx)))))
#s(approx (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) #s(hole binary64 (/ 1 (sin kx))))
#s(approx (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) #s(hole binary64 (+ (* -1/2 (/ (pow ky 2) (pow (sin kx) 3))) (/ 1 (sin kx)))))
#s(approx (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) #s(hole binary64 (+ (* (pow ky 2) (- (* 1/2 (* (pow ky 2) (* (sin kx) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))) (* 1/2 (/ 1 (pow (sin kx) 3))))) (/ 1 (sin kx)))))
#s(approx (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) #s(hole binary64 (+ (* (pow ky 2) (- (* (pow ky 2) (+ (* -1/2 (* (pow ky 2) (* (sin kx) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))) (pow (sin kx) 2))) (+ (* 2/45 (/ 1 (pow (sin kx) 4))) (+ (* 2/3 (/ 1 (pow (sin kx) 6))) (/ 1 (pow (sin kx) 8)))))))) (* 1/2 (* (sin kx) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))))))) (* 1/2 (/ 1 (pow (sin kx) 3))))) (/ 1 (sin kx)))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) #s(hole binary64 (sin kx)))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) #s(hole binary64 (+ (sin kx) (* 1/2 (/ (pow ky 2) (sin kx))))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) #s(hole binary64 (+ (sin kx) (* (pow ky 2) (+ (* -1/2 (/ (* (pow ky 2) (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2))))) (sin kx))) (* 1/2 (/ 1 (sin kx))))))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) #s(hole binary64 (+ (sin kx) (* (pow ky 2) (+ (* (pow ky 2) (+ (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (sin kx))) (* 1/2 (/ (* (pow ky 2) (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))))) (sin kx))))) (* 1/2 (/ 1 (sin kx))))))))
#s(approx (sin ky) #s(hole binary64 ky))
#s(approx (sin ky) #s(hole binary64 (* ky (+ 1 (* -1/6 (pow ky 2))))))
#s(approx (sin ky) #s(hole binary64 (* ky (+ 1 (* (pow ky 2) (- (* 1/120 (pow ky 2)) 1/6))))))
#s(approx (sin ky) #s(hole binary64 (* ky (+ 1 (* (pow ky 2) (- (* (pow ky 2) (+ 1/120 (* -1/5040 (pow ky 2)))) 1/6))))))
#s(approx ky #s(hole binary64 ky))
#s(approx (* (pow (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) 1/2) -1) (* (sin th) (sin ky))) #s(hole binary64 (/ (* ky (sin th)) (sin kx))))
#s(approx (* (pow (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) 1/2) -1) (* (sin th) (sin ky))) #s(hole binary64 (* ky (+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx))))) (/ (sin th) (sin kx))))))
#s(approx (* (pow (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) 1/2) -1) (* (sin th) (sin ky))) #s(hole binary64 (* ky (+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (* (pow ky 2) (+ (* 1/120 (/ (sin th) (sin kx))) (+ (* 1/12 (/ (sin th) (pow (sin kx) 3))) (* 1/2 (* (sin kx) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))))))))) (/ (sin th) (sin kx))))))
#s(approx (* (pow (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) 1/2) -1) (* (sin th) (sin ky))) #s(hole binary64 (* ky (+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (* (pow ky 2) (+ (* 1/120 (/ (sin th) (sin kx))) (+ (* 1/12 (/ (sin th) (pow (sin kx) 3))) (+ (* 1/2 (* (sin kx) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))) (* (pow ky 2) (+ (* -1/2 (* (sin kx) (* (sin th) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))) (pow (sin kx) 2))) (+ (* 2/45 (/ 1 (pow (sin kx) 4))) (+ (* 2/3 (/ 1 (pow (sin kx) 6))) (/ 1 (pow (sin kx) 8)))))))) (+ (* -1/12 (* (sin kx) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))) (+ (* -1/240 (/ (sin th) (pow (sin kx) 3))) (* -1/5040 (/ (sin th) (sin kx)))))))))))))) (/ (sin th) (sin kx))))))
#s(approx (pow (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) 1/2) -1) #s(hole binary64 (/ 1 (sin kx))))
#s(approx (pow (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) 1/2) -1) #s(hole binary64 (+ (* -1/2 (/ (pow ky 2) (pow (sin kx) 3))) (/ 1 (sin kx)))))
#s(approx (pow (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) 1/2) -1) #s(hole binary64 (+ (* (pow ky 2) (- (* 1/2 (* (pow ky 2) (* (sin kx) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))) (* 1/2 (/ 1 (pow (sin kx) 3))))) (/ 1 (sin kx)))))
#s(approx (pow (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) 1/2) -1) #s(hole binary64 (+ (* (pow ky 2) (- (* (pow ky 2) (+ (* -1/2 (* (pow ky 2) (* (sin kx) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))) (pow (sin kx) 2))) (+ (* 2/45 (/ 1 (pow (sin kx) 4))) (+ (* 2/3 (/ 1 (pow (sin kx) 6))) (/ 1 (pow (sin kx) 8)))))))) (* 1/2 (* (sin kx) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))))))) (* 1/2 (/ 1 (pow (sin kx) 3))))) (/ 1 (sin kx)))))
#s(approx (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) 1/2) #s(hole binary64 (sin kx)))
#s(approx (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) 1/2) #s(hole binary64 (+ (sin kx) (* 1/2 (/ (pow ky 2) (sin kx))))))
#s(approx (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) 1/2) #s(hole binary64 (+ (sin kx) (* (pow ky 2) (+ (* -1/2 (/ (* (pow ky 2) (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2))))) (sin kx))) (* 1/2 (/ 1 (sin kx))))))))
#s(approx (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) 1/2) #s(hole binary64 (+ (sin kx) (* (pow ky 2) (+ (* (pow ky 2) (+ (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (sin kx))) (* 1/2 (/ (* (pow ky 2) (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))))) (sin kx))))) (* 1/2 (/ 1 (sin kx))))))))
#s(approx (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) #s(hole binary64 (pow (sin kx) 2)))
#s(approx (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) #s(hole binary64 (+ (pow ky 2) (pow (sin kx) 2))))
#s(approx (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) #s(hole binary64 (+ (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2)))) (pow (sin kx) 2))))
#s(approx (+ (* (sin kx) (sin kx)) (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 th) (sin ky)) #s(hole binary64 (* ky (sin th))))
#s(approx (* (sin th) (sin ky)) #s(hole binary64 (* ky (+ (sin th) (* -1/6 (* (pow ky 2) (sin th)))))))
#s(approx (* (sin th) (sin ky)) #s(hole binary64 (* ky (+ (sin th) (* (pow ky 2) (+ (* -1/6 (sin th)) (* 1/120 (* (pow ky 2) (sin th)))))))))
#s(approx (* (sin th) (sin ky)) #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 (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (/ ky (sin kx))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (* ky (+ (* -1 (* (pow ky 2) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx))))))
#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 (sin kx))) (+ (* 1/2 (* (sin kx) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))))) (* 1/12 (/ 1 (pow (sin kx) 3)))))) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx))))))
#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 (sin kx))) (+ (* 1/12 (/ 1 (pow (sin kx) 3))) (+ (* 1/2 (* (sin kx) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))))) (* (pow ky 2) (- (+ (* -1/2 (* (sin kx) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))) (pow (sin kx) 2))) (+ (* 2/45 (/ 1 (pow (sin kx) 4))) (+ (* 2/3 (/ 1 (pow (sin kx) 6))) (/ 1 (pow (sin kx) 8))))))) (* -1/12 (* (sin kx) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))) (+ (* 1/5040 (/ 1 (sin kx))) (* 1/240 (/ 1 (pow (sin kx) 3)))))))))) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx))))))
#s(approx (* (+ (cosh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1)) (sinh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1))) (sin ky)) #s(hole binary64 (* ky (+ (* 1/2 (+ (sin kx) (/ 1 (sin kx)))) (* 1/2 (+ (* -1 (sin kx)) (/ 1 (sin kx))))))))
#s(approx (* (+ (cosh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1)) (sinh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1))) (sin ky)) #s(hole binary64 (* ky (+ (* 1/2 (+ (sin kx) (/ 1 (sin kx)))) (+ (* 1/2 (+ (* -1 (sin kx)) (/ 1 (sin kx)))) (* (pow ky 2) (+ (* -1/2 (+ (* 1/2 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3))))) (+ (* -1/6 (+ (* 1/2 (+ (sin kx) (/ 1 (sin kx)))) (* 1/2 (+ (* -1 (sin kx)) (/ 1 (sin kx)))))) (* 1/2 (- (* 1/2 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))))))))))
#s(approx (* (+ (cosh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1)) (sinh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1))) (sin ky)) #s(hole binary64 (* ky (+ (* 1/2 (+ (sin kx) (/ 1 (sin kx)))) (+ (* 1/2 (+ (* -1 (sin kx)) (/ 1 (sin kx)))) (* (pow ky 2) (+ (* -1/2 (+ (* 1/2 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3))))) (+ (* -1/6 (+ (* 1/2 (+ (sin kx) (/ 1 (sin kx)))) (* 1/2 (+ (* -1 (sin kx)) (/ 1 (sin kx)))))) (+ (* 1/2 (- (* 1/2 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3))))) (* (pow ky 2) (+ (* -1/6 (+ (* -1/2 (+ (* 1/2 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3))))) (* 1/2 (- (* 1/2 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3))))))) (+ (* 1/120 (+ (* 1/2 (+ (sin kx) (/ 1 (sin kx)))) (* 1/2 (+ (* -1 (sin kx)) (/ 1 (sin kx)))))) (+ (* 1/2 (- (+ (* -1/24 (/ (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))) (* 3 (/ 1 (pow (sin kx) 4)))) (sin kx))) (* 1/8 (/ 1 (pow (sin kx) 5)))) (+ (* -1 (* (sin kx) (+ (* -1/24 (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))) (* 3 (/ 1 (pow (sin kx) 4))))) (* 1/8 (/ 1 (pow (sin kx) 4)))))) (* 1/4 (/ 1 (pow (sin kx) 3)))))) (* 1/2 (- (+ (* -1/24 (/ (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))) (* 3 (/ 1 (pow (sin kx) 4)))) (sin kx))) (+ (* 1/8 (/ 1 (pow (sin kx) 5))) (* 1/4 (/ 1 (pow (sin kx) 3))))) (* (sin kx) (+ (* -1/24 (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))) (* 3 (/ 1 (pow (sin kx) 4))))) (* 1/8 (/ 1 (pow (sin kx) 4))))))))))))))))))))
#s(approx (* (+ (cosh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1)) (sinh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1))) (sin ky)) #s(hole binary64 (* ky (+ (* 1/2 (+ (sin kx) (/ 1 (sin kx)))) (+ (* 1/2 (+ (* -1 (sin kx)) (/ 1 (sin kx)))) (* (pow ky 2) (+ (* -1/2 (+ (* 1/2 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3))))) (+ (* -1/6 (+ (* 1/2 (+ (sin kx) (/ 1 (sin kx)))) (* 1/2 (+ (* -1 (sin kx)) (/ 1 (sin kx)))))) (+ (* 1/2 (- (* 1/2 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3))))) (* (pow ky 2) (+ (* -1/6 (+ (* -1/2 (+ (* 1/2 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3))))) (* 1/2 (- (* 1/2 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3))))))) (+ (* 1/120 (+ (* 1/2 (+ (sin kx) (/ 1 (sin kx)))) (* 1/2 (+ (* -1 (sin kx)) (/ 1 (sin kx)))))) (+ (* 1/2 (- (+ (* -1/24 (/ (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))) (* 3 (/ 1 (pow (sin kx) 4)))) (sin kx))) (* 1/8 (/ 1 (pow (sin kx) 5)))) (+ (* -1 (* (sin kx) (+ (* -1/24 (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))) (* 3 (/ 1 (pow (sin kx) 4))))) (* 1/8 (/ 1 (pow (sin kx) 4)))))) (* 1/4 (/ 1 (pow (sin kx) 3)))))) (+ (* 1/2 (- (+ (* -1/24 (/ (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))) (* 3 (/ 1 (pow (sin kx) 4)))) (sin kx))) (+ (* 1/8 (/ 1 (pow (sin kx) 5))) (* 1/4 (/ 1 (pow (sin kx) 3))))) (* (sin kx) (+ (* -1/24 (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))) (* 3 (/ 1 (pow (sin kx) 4))))) (* 1/8 (/ 1 (pow (sin kx) 4))))))) (* (pow ky 2) (+ (* -1/6 (+ (* 1/2 (- (+ (* -1/24 (/ (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))) (* 3 (/ 1 (pow (sin kx) 4)))) (sin kx))) (* 1/8 (/ 1 (pow (sin kx) 5)))) (+ (* -1 (* (sin kx) (+ (* -1/24 (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))) (* 3 (/ 1 (pow (sin kx) 4))))) (* 1/8 (/ 1 (pow (sin kx) 4)))))) (* 1/4 (/ 1 (pow (sin kx) 3)))))) (* 1/2 (- (+ (* -1/24 (/ (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))) (* 3 (/ 1 (pow (sin kx) 4)))) (sin kx))) (+ (* 1/8 (/ 1 (pow (sin kx) 5))) (* 1/4 (/ 1 (pow (sin kx) 3))))) (* (sin kx) (+ (* -1/24 (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))) (* 3 (/ 1 (pow (sin kx) 4))))) (* 1/8 (/ 1 (pow (sin kx) 4))))))))) (+ (* -1/5040 (+ (* 1/2 (+ (sin kx) (/ 1 (sin kx)))) (* 1/2 (+ (* -1 (sin kx)) (/ 1 (sin kx)))))) (+ (* 1/120 (+ (* -1/2 (+ (* 1/2 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3))))) (* 1/2 (- (* 1/2 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3))))))) (+ (* 1/2 (- (+ (* -1/720 (/ (+ (* 180 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 4))) (+ (* 360 (/ (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2)))) (pow (sin kx) 2))) (* 30 (/ 1 (pow (sin kx) 6))))) (sin kx))) (* 1/48 (/ (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))) (* 3 (/ 1 (pow (sin kx) 4)))) (pow (sin kx) 3)))) (+ (* -1 (* (sin kx) (- (+ (* -1/720 (+ (* 30 (/ 1 (pow (sin kx) 6))) (+ (* 180 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 4))) (* 360 (/ (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2)))) (pow (sin kx) 2)))))) (* 1/48 (/ (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))) (* 3 (/ 1 (pow (sin kx) 4)))) (pow (sin kx) 2)))) (* 1/48 (/ 1 (pow (sin kx) 6)))))) (+ (* -1/2 (/ (+ (* -1/24 (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))) (* 3 (/ 1 (pow (sin kx) 4))))) (* 1/8 (/ 1 (pow (sin kx) 4)))) (sin kx))) (+ (* 1/48 (/ 1 (pow (sin kx) 7))) (* 1/2 (/ (+ (* -1 (* (sin kx) (+ (* -1/24 (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))) (* 3 (/ 1 (pow (sin kx) 4))))) (* 1/8 (/ 1 (pow (sin kx) 4)))))) (* 1/4 (/ 1 (pow (sin kx) 3)))) (pow (sin kx) 2)))))))) (* 1/2 (- (+ (* -1/720 (/ (+ (* 180 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 4))) (+ (* 360 (/ (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2)))) (pow (sin kx) 2))) (* 30 (/ 1 (pow (sin kx) 6))))) (sin kx))) (* 1/48 (/ (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))) (* 3 (/ 1 (pow (sin kx) 4)))) (pow (sin kx) 3)))) (+ (* -1/2 (/ (- (* 1/4 (/ 1 (pow (sin kx) 3))) (* (sin kx) (+ (* -1/24 (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))) (* 3 (/ 1 (pow (sin kx) 4))))) (* 1/8 (/ 1 (pow (sin kx) 4)))))) (pow (sin kx) 2))) (+ (* 1/48 (/ 1 (pow (sin kx) 7))) (+ (* 1/2 (/ (+ (* -1/24 (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))) (* 3 (/ 1 (pow (sin kx) 4))))) (* 1/8 (/ 1 (pow (sin kx) 4)))) (sin kx))) (* (sin kx) (- (+ (* -1/720 (+ (* 30 (/ 1 (pow (sin kx) 6))) (+ (* 180 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 4))) (* 360 (/ (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2)))) (pow (sin kx) 2)))))) (* 1/48 (/ (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))) (* 3 (/ 1 (pow (sin kx) 4)))) (pow (sin kx) 2)))) (* 1/48 (/ 1 (pow (sin kx) 6)))))))))))))))))))))))))))))
#s(approx (+ (cosh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1)) (sinh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1))) #s(hole binary64 (+ (* 1/2 (+ (sin kx) (/ 1 (sin kx)))) (* 1/2 (+ (* -1 (sin kx)) (/ 1 (sin kx)))))))
#s(approx (+ (cosh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1)) (sinh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1))) #s(hole binary64 (+ (* 1/2 (+ (sin kx) (/ 1 (sin kx)))) (+ (* 1/2 (+ (* -1 (sin kx)) (/ 1 (sin kx)))) (* (pow ky 2) (+ (* -1/2 (+ (* 1/2 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3))))) (* 1/2 (- (* 1/2 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))))))))
#s(approx (+ (cosh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1)) (sinh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1))) #s(hole binary64 (+ (* 1/2 (+ (sin kx) (/ 1 (sin kx)))) (+ (* 1/2 (+ (* -1 (sin kx)) (/ 1 (sin kx)))) (* (pow ky 2) (+ (* -1/2 (+ (* 1/2 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3))))) (+ (* 1/2 (- (* 1/2 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3))))) (* (pow ky 2) (+ (* 1/2 (- (+ (* -1/24 (/ (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))) (* 3 (/ 1 (pow (sin kx) 4)))) (sin kx))) (* 1/8 (/ 1 (pow (sin kx) 5)))) (+ (* -1 (* (sin kx) (+ (* -1/24 (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))) (* 3 (/ 1 (pow (sin kx) 4))))) (* 1/8 (/ 1 (pow (sin kx) 4)))))) (* 1/4 (/ 1 (pow (sin kx) 3)))))) (* 1/2 (- (+ (* -1/24 (/ (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))) (* 3 (/ 1 (pow (sin kx) 4)))) (sin kx))) (+ (* 1/8 (/ 1 (pow (sin kx) 5))) (* 1/4 (/ 1 (pow (sin kx) 3))))) (* (sin kx) (+ (* -1/24 (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))) (* 3 (/ 1 (pow (sin kx) 4))))) (* 1/8 (/ 1 (pow (sin kx) 4))))))))))))))))
#s(approx (+ (cosh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1)) (sinh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1))) #s(hole binary64 (+ (* 1/2 (+ (sin kx) (/ 1 (sin kx)))) (+ (* 1/2 (+ (* -1 (sin kx)) (/ 1 (sin kx)))) (* (pow ky 2) (+ (* -1/2 (+ (* 1/2 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3))))) (+ (* 1/2 (- (* 1/2 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3))))) (* (pow ky 2) (+ (* 1/2 (- (+ (* -1/24 (/ (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))) (* 3 (/ 1 (pow (sin kx) 4)))) (sin kx))) (* 1/8 (/ 1 (pow (sin kx) 5)))) (+ (* -1 (* (sin kx) (+ (* -1/24 (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))) (* 3 (/ 1 (pow (sin kx) 4))))) (* 1/8 (/ 1 (pow (sin kx) 4)))))) (* 1/4 (/ 1 (pow (sin kx) 3)))))) (+ (* 1/2 (- (+ (* -1/24 (/ (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))) (* 3 (/ 1 (pow (sin kx) 4)))) (sin kx))) (+ (* 1/8 (/ 1 (pow (sin kx) 5))) (* 1/4 (/ 1 (pow (sin kx) 3))))) (* (sin kx) (+ (* -1/24 (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))) (* 3 (/ 1 (pow (sin kx) 4))))) (* 1/8 (/ 1 (pow (sin kx) 4))))))) (* (pow ky 2) (+ (* 1/2 (- (+ (* -1/720 (/ (+ (* 30 (/ 1 (pow (sin kx) 6))) (+ (* 180 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 4))) (* 360 (/ (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2)))) (pow (sin kx) 2))))) (sin kx))) (* 1/48 (/ (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))) (* 3 (/ 1 (pow (sin kx) 4)))) (pow (sin kx) 3)))) (+ (* -1 (* (sin kx) (- (+ (* -1/720 (+ (* 180 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 4))) (+ (* 360 (/ (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2)))) (pow (sin kx) 2))) (* 30 (/ 1 (pow (sin kx) 6)))))) (* 1/48 (/ (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))) (* 3 (/ 1 (pow (sin kx) 4)))) (pow (sin kx) 2)))) (* 1/48 (/ 1 (pow (sin kx) 6)))))) (+ (* -1/2 (/ (+ (* -1/24 (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))) (* 3 (/ 1 (pow (sin kx) 4))))) (* 1/8 (/ 1 (pow (sin kx) 4)))) (sin kx))) (+ (* 1/48 (/ 1 (pow (sin kx) 7))) (* 1/2 (/ (+ (* -1 (* (sin kx) (+ (* -1/24 (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))) (* 3 (/ 1 (pow (sin kx) 4))))) (* 1/8 (/ 1 (pow (sin kx) 4)))))) (* 1/4 (/ 1 (pow (sin kx) 3)))) (pow (sin kx) 2)))))))) (* 1/2 (- (+ (* -1/720 (/ (+ (* 30 (/ 1 (pow (sin kx) 6))) (+ (* 180 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 4))) (* 360 (/ (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2)))) (pow (sin kx) 2))))) (sin kx))) (* 1/48 (/ (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))) (* 3 (/ 1 (pow (sin kx) 4)))) (pow (sin kx) 3)))) (+ (* -1/2 (/ (- (* 1/4 (/ 1 (pow (sin kx) 3))) (* (sin kx) (+ (* -1/24 (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))) (* 3 (/ 1 (pow (sin kx) 4))))) (* 1/8 (/ 1 (pow (sin kx) 4)))))) (pow (sin kx) 2))) (+ (* 1/48 (/ 1 (pow (sin kx) 7))) (+ (* 1/2 (/ (+ (* -1/24 (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))) (* 3 (/ 1 (pow (sin kx) 4))))) (* 1/8 (/ 1 (pow (sin kx) 4)))) (sin kx))) (* (sin kx) (- (+ (* -1/720 (+ (* 180 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 4))) (+ (* 360 (/ (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2)))) (pow (sin kx) 2))) (* 30 (/ 1 (pow (sin kx) 6)))))) (* 1/48 (/ (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))) (* 3 (/ 1 (pow (sin kx) 4)))) (pow (sin kx) 2)))) (* 1/48 (/ 1 (pow (sin kx) 6))))))))))))))))))))))
#s(approx (cosh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1)) #s(hole binary64 (* 1/2 (+ (sin kx) (/ 1 (sin kx))))))
#s(approx (cosh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1)) #s(hole binary64 (+ (* 1/2 (* (pow ky 2) (- (* 1/2 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (* 1/2 (+ (sin kx) (/ 1 (sin kx)))))))
#s(approx (cosh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1)) #s(hole binary64 (+ (* 1/2 (+ (sin kx) (/ 1 (sin kx)))) (* (pow ky 2) (+ (* 1/2 (* (pow ky 2) (- (+ (* -1/24 (/ (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))) (* 3 (/ 1 (pow (sin kx) 4)))) (sin kx))) (+ (* 1/8 (/ 1 (pow (sin kx) 5))) (* 1/4 (/ 1 (pow (sin kx) 3))))) (* (sin kx) (+ (* -1/24 (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))) (* 3 (/ 1 (pow (sin kx) 4))))) (* 1/8 (/ 1 (pow (sin kx) 4)))))))) (* 1/2 (- (* 1/2 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3))))))))))
#s(approx (cosh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1)) #s(hole binary64 (+ (* 1/2 (+ (sin kx) (/ 1 (sin kx)))) (* (pow ky 2) (+ (* 1/2 (- (* 1/2 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3))))) (* (pow ky 2) (+ (* 1/2 (* (pow ky 2) (- (+ (* -1/720 (/ (+ (* 180 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 4))) (+ (* 360 (/ (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2)))) (pow (sin kx) 2))) (* 30 (/ 1 (pow (sin kx) 6))))) (sin kx))) (* 1/48 (/ (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))) (* 3 (/ 1 (pow (sin kx) 4)))) (pow (sin kx) 3)))) (+ (* -1/2 (/ (- (* 1/4 (/ 1 (pow (sin kx) 3))) (* (sin kx) (+ (* -1/24 (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))) (* 3 (/ 1 (pow (sin kx) 4))))) (* 1/8 (/ 1 (pow (sin kx) 4)))))) (pow (sin kx) 2))) (+ (* 1/48 (/ 1 (pow (sin kx) 7))) (+ (* 1/2 (/ (+ (* -1/24 (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))) (* 3 (/ 1 (pow (sin kx) 4))))) (* 1/8 (/ 1 (pow (sin kx) 4)))) (sin kx))) (* (sin kx) (- (+ (* -1/720 (+ (* 30 (/ 1 (pow (sin kx) 6))) (+ (* 180 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 4))) (* 360 (/ (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2)))) (pow (sin kx) 2)))))) (* 1/48 (/ (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))) (* 3 (/ 1 (pow (sin kx) 4)))) (pow (sin kx) 2)))) (* 1/48 (/ 1 (pow (sin kx) 6))))))))))) (* 1/2 (- (+ (* -1/24 (/ (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))) (* 3 (/ 1 (pow (sin kx) 4)))) (sin kx))) (+ (* 1/8 (/ 1 (pow (sin kx) 5))) (* 1/4 (/ 1 (pow (sin kx) 3))))) (* (sin kx) (+ (* -1/24 (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))) (* 3 (/ 1 (pow (sin kx) 4))))) (* 1/8 (/ 1 (pow (sin kx) 4))))))))))))))
#s(approx (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1) #s(hole binary64 (* -1 (log (sin kx)))))
#s(approx (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1) #s(hole binary64 (+ (* -1 (log (sin kx))) (* -1/2 (/ (pow ky 2) (pow (sin kx) 2))))))
#s(approx (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1) #s(hole binary64 (+ (* -1 (log (sin kx))) (* (pow ky 2) (- (* -1/24 (* (pow ky 2) (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))) (* 3 (/ 1 (pow (sin kx) 4)))))) (* 1/2 (/ 1 (pow (sin kx) 2))))))))
#s(approx (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1) #s(hole binary64 (+ (* -1 (log (sin kx))) (* (pow ky 2) (- (* (pow ky 2) (+ (* -1/24 (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))) (* 3 (/ 1 (pow (sin kx) 4))))) (* -1/720 (* (pow ky 2) (+ (* 30 (/ 1 (pow (sin kx) 6))) (+ (* 180 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 4))) (* 360 (/ (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2)))) (pow (sin kx) 2))))))))) (* 1/2 (/ 1 (pow (sin kx) 2))))))))
#s(approx (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(hole binary64 (log (sin kx))))
#s(approx (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(hole binary64 (+ (log (sin kx)) (* 1/2 (/ (pow ky 2) (pow (sin kx) 2))))))
#s(approx (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(hole binary64 (+ (log (sin kx)) (* (pow ky 2) (+ (* 1/24 (* (pow ky 2) (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))) (* 3 (/ 1 (pow (sin kx) 4)))))) (* 1/2 (/ 1 (pow (sin kx) 2))))))))
#s(approx (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(hole binary64 (+ (log (sin kx)) (* (pow ky 2) (+ (* (pow ky 2) (+ (* 1/720 (* (pow ky 2) (+ (* 180 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 4))) (+ (* 360 (/ (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2)))) (pow (sin kx) 2))) (* 30 (/ 1 (pow (sin kx) 6))))))) (* 1/24 (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))) (* 3 (/ 1 (pow (sin kx) 4))))))) (* 1/2 (/ 1 (pow (sin kx) 2))))))))
#s(approx (sinh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1)) #s(hole binary64 (* 1/2 (+ (* -1 (sin kx)) (/ 1 (sin kx))))))
#s(approx (sinh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1)) #s(hole binary64 (+ (* -1/2 (* (pow ky 2) (+ (* 1/2 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (* 1/2 (+ (* -1 (sin kx)) (/ 1 (sin kx)))))))
#s(approx (sinh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1)) #s(hole binary64 (+ (* 1/2 (+ (* -1 (sin kx)) (/ 1 (sin kx)))) (* (pow ky 2) (+ (* -1/2 (+ (* 1/2 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3))))) (* 1/2 (* (pow ky 2) (- (+ (* -1/24 (/ (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))) (* 3 (/ 1 (pow (sin kx) 4)))) (sin kx))) (* 1/8 (/ 1 (pow (sin kx) 5)))) (+ (* -1 (* (sin kx) (+ (* -1/24 (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))) (* 3 (/ 1 (pow (sin kx) 4))))) (* 1/8 (/ 1 (pow (sin kx) 4)))))) (* 1/4 (/ 1 (pow (sin kx) 3))))))))))))
#s(approx (sinh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1)) #s(hole binary64 (+ (* 1/2 (+ (* -1 (sin kx)) (/ 1 (sin kx)))) (* (pow ky 2) (+ (* -1/2 (+ (* 1/2 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3))))) (* (pow ky 2) (+ (* 1/2 (* (pow ky 2) (- (+ (* -1/720 (/ (+ (* 180 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 4))) (+ (* 360 (/ (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2)))) (pow (sin kx) 2))) (* 30 (/ 1 (pow (sin kx) 6))))) (sin kx))) (* 1/48 (/ (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))) (* 3 (/ 1 (pow (sin kx) 4)))) (pow (sin kx) 3)))) (+ (* -1 (* (sin kx) (- (+ (* -1/720 (+ (* 30 (/ 1 (pow (sin kx) 6))) (+ (* 180 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 4))) (* 360 (/ (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2)))) (pow (sin kx) 2)))))) (* 1/48 (/ (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))) (* 3 (/ 1 (pow (sin kx) 4)))) (pow (sin kx) 2)))) (* 1/48 (/ 1 (pow (sin kx) 6)))))) (+ (* -1/2 (/ (+ (* -1/24 (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))) (* 3 (/ 1 (pow (sin kx) 4))))) (* 1/8 (/ 1 (pow (sin kx) 4)))) (sin kx))) (+ (* 1/48 (/ 1 (pow (sin kx) 7))) (* 1/2 (/ (+ (* -1 (* (sin kx) (+ (* -1/24 (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))) (* 3 (/ 1 (pow (sin kx) 4))))) (* 1/8 (/ 1 (pow (sin kx) 4)))))) (* 1/4 (/ 1 (pow (sin kx) 3)))) (pow (sin kx) 2))))))))) (* 1/2 (- (+ (* -1/24 (/ (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))) (* 3 (/ 1 (pow (sin kx) 4)))) (sin kx))) (* 1/8 (/ 1 (pow (sin kx) 5)))) (+ (* -1 (* (sin kx) (+ (* -1/24 (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))) (* 3 (/ 1 (pow (sin kx) 4))))) (* 1/8 (/ 1 (pow (sin kx) 4)))))) (* 1/4 (/ 1 (pow (sin kx) 3)))))))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (/ (- (cos (- kx kx)) (cos (+ kx kx))) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (* (* ky (* (sin th) (sqrt 2))) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (/ (- (cos (- kx kx)) (cos (+ kx kx))) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (* ky (+ (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ (sin th) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* -1/6 (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (/ (- (cos (- kx kx)) (cos (+ kx kx))) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (* ky (+ (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ (sin th) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (+ (* -1/6 (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (* (pow ky 2) (+ (* 1/120 (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (+ (* 1/3 (* (/ (sin th) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* 1/2 (* (/ (* (sin th) (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3)))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx))))))))))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (/ (- (cos (- kx kx)) (cos (+ kx kx))) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (* ky (+ (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ (sin th) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (+ (* -1/6 (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (* (pow ky 2) (+ (* 1/120 (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (+ (* 1/3 (* (/ (sin th) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (+ (* 1/2 (* (/ (* (sin th) (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3)))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -1/2 (* (/ (* (sin th) (+ (* -2 (/ (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3))))) (* (pow (sqrt 2) 2) (- 1 (cos (* 2 kx)))))) (+ (* 8/45 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (+ (* 2 (/ (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (- 1 (cos (* 2 kx))))) (* 8/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))) (+ (* -1/12 (* (/ (* (sin th) (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3)))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))) (+ (* -1/60 (* (/ (sin th) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* -1/5040 (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))))))))))))))))))
#s(approx (/ (sin ky) (sqrt (+ (/ (- (cos (- kx kx)) (cos (+ kx kx))) 2) (pow (sin ky) 2)))) #s(hole binary64 (* (* ky (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))))
#s(approx (/ (sin ky) (sqrt (+ (/ (- (cos (- kx kx)) (cos (+ kx kx))) 2) (pow (sin ky) 2)))) #s(hole binary64 (* ky (+ (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ 1 (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* -1/6 (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))))))))))
#s(approx (/ (sin ky) (sqrt (+ (/ (- (cos (- kx kx)) (cos (+ kx kx))) 2) (pow (sin ky) 2)))) #s(hole binary64 (* ky (+ (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ 1 (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (+ (* -1/6 (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (* (pow ky 2) (+ (* 1/120 (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (+ (* 1/3 (* (/ 1 (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* 1/2 (* (/ (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx))))))))))))))))
#s(approx (/ (sin ky) (sqrt (+ (/ (- (cos (- kx kx)) (cos (+ kx kx))) 2) (pow (sin ky) 2)))) #s(hole binary64 (* ky (+ (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ 1 (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (+ (* -1/6 (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (* (pow ky 2) (+ (* 1/120 (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (+ (* 1/3 (* (/ 1 (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (+ (* 1/2 (* (/ (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -1/2 (* (/ (+ (* -2 (/ (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3))))) (* (pow (sqrt 2) 2) (- 1 (cos (* 2 kx)))))) (+ (* 8/45 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (+ (* 2 (/ (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (- 1 (cos (* 2 kx))))) (* 8/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))) (+ (* -1/12 (* (/ (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))) (+ (* -1/60 (* (/ 1 (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* -1/5040 (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))))))))))))))))))
#s(approx (sqrt (+ (/ (- (cos (- kx kx)) (cos (+ kx kx))) 2) (pow (sin ky) 2))) #s(hole binary64 (* (sqrt 1/2) (sqrt (- 1 (cos (* 2 kx)))))))
#s(approx (sqrt (+ (/ (- (cos (- kx kx)) (cos (+ kx kx))) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (* 1/2 (* (/ (pow ky 2) (sqrt 1/2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (* (sqrt 1/2) (sqrt (- 1 (cos (* 2 kx))))))))
#s(approx (sqrt (+ (/ (- (cos (- kx kx)) (cos (+ kx kx))) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (* (sqrt 1/2) (sqrt (- 1 (cos (* 2 kx))))) (* (pow ky 2) (+ (* -1/2 (* (/ (* (pow ky 2) (+ 1/3 (* 1/4 (/ 1 (* (pow (sqrt 1/2) 2) (- 1 (cos (* 2 kx)))))))) (sqrt 1/2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (* 1/2 (* (/ 1 (sqrt 1/2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))))))))
#s(approx (sqrt (+ (/ (- (cos (- kx kx)) (cos (+ kx kx))) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (* (sqrt 1/2) (sqrt (- 1 (cos (* 2 kx))))) (* (pow ky 2) (+ (* 1/2 (* (/ 1 (sqrt 1/2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (* (pow ky 2) (+ (* -1/2 (* (/ (+ 1/3 (* 1/4 (/ 1 (* (pow (sqrt 1/2) 2) (- 1 (cos (* 2 kx))))))) (sqrt 1/2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (* 1/2 (* (/ (* (pow ky 2) (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (* (pow (sqrt 1/2) 2) (- 1 (cos (* 2 kx))))))) (* (pow (sqrt 1/2) 2) (- 1 (cos (* 2 kx)))))))) (sqrt 1/2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))))))))))
#s(approx (+ (/ (- (cos (- kx kx)) (cos (+ kx kx))) 2) (pow (sin ky) 2)) #s(hole binary64 (* 1/2 (- 1 (cos (* 2 kx))))))
#s(approx (+ (/ (- (cos (- kx kx)) (cos (+ kx kx))) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (* 1/2 (- 1 (cos (* 2 kx)))) (pow ky 2))))
#s(approx (+ (/ (- (cos (- kx kx)) (cos (+ kx kx))) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (* 1/2 (- 1 (cos (* 2 kx)))) (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2)))))))
#s(approx (+ (/ (- (cos (- kx kx)) (cos (+ kx kx))) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (* 1/2 (- 1 (cos (* 2 kx)))) (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3)))))))
#s(approx (/ (* (sin th) (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(hole binary64 (/ (* ky (sin th)) (sin kx))))
#s(approx (/ (* (sin th) (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(hole binary64 (* ky (+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx))))) (/ (sin th) (sin kx))))))
#s(approx (/ (* (sin th) (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(hole binary64 (* ky (+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (* (pow ky 2) (+ (* 1/120 (/ (sin th) (sin kx))) (+ (* 1/12 (/ (sin th) (pow (sin kx) 3))) (* 1/2 (* (sin kx) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))))))))) (/ (sin th) (sin kx))))))
#s(approx (/ (* (sin th) (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(hole binary64 (* ky (+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (* (pow ky 2) (+ (* 1/120 (/ (sin th) (sin kx))) (+ (* 1/12 (/ (sin th) (pow (sin kx) 3))) (+ (* 1/2 (* (sin kx) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))) (* (pow ky 2) (+ (* -1/2 (* (sin kx) (* (sin th) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))) (pow (sin kx) 2))) (+ (* 2/45 (/ 1 (pow (sin kx) 4))) (+ (* 2/3 (/ 1 (pow (sin kx) 6))) (/ 1 (pow (sin kx) 8)))))))) (+ (* -1/12 (* (sin kx) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))) (+ (* -1/240 (/ (sin th) (pow (sin kx) 3))) (* -1/5040 (/ (sin th) (sin kx)))))))))))))) (/ (sin th) (sin kx))))))
#s(approx (sin ky) #s(hole binary64 (sin ky)))
#s(approx (pow (sin ky) 2) #s(hole binary64 (pow (sin ky) 2)))
#s(approx (* (sin th) (sin ky)) #s(hole binary64 (* (sin ky) (sin th))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (* (* th (sin ky)) (sqrt (/ 1 (+ (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 (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* (sin ky) (sqrt (/ 1 (+ (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 (+ (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* (pow th 2) (+ (* -1/6 (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* 1/120 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ (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 (+ (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* (pow th 2) (+ (* -1/6 (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* (pow th 2) (+ (* -1/5040 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* 1/120 (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))))))))
#s(approx (* (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (sin th)) (sin ky)) #s(hole binary64 (* (* th (sin ky)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
#s(approx (* (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (sin th)) (sin ky)) #s(hole binary64 (* th (+ (* -1/6 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))
#s(approx (* (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (sin th)) (sin ky)) #s(hole binary64 (* th (+ (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* (pow th 2) (+ (* -1/6 (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* 1/120 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))))))
#s(approx (* (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (sin th)) (sin ky)) #s(hole binary64 (* th (+ (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* (pow th 2) (+ (* -1/6 (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* (pow th 2) (+ (* -1/5040 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* 1/120 (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))))))))
#s(approx (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (sin th)) #s(hole binary64 (* th (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
#s(approx (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (sin th)) #s(hole binary64 (* th (+ (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (* -1/6 (* (pow th 2) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))))
#s(approx (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (sin th)) #s(hole binary64 (* th (+ (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (* (pow th 2) (+ (* -1/6 (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 1/120 (* (pow th 2) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))))))
#s(approx (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (sin th)) #s(hole binary64 (* th (+ (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (* (pow th 2) (+ (* -1/6 (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* (pow th 2) (+ (* -1/5040 (* (pow th 2) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* 1/120 (sqrt (/ 1 (+ (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 th #s(hole binary64 th))
#s(approx (* (pow (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) 1/2) -1) (* (sin th) (sin ky))) #s(hole binary64 (* (* th (sin ky)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
#s(approx (* (pow (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) 1/2) -1) (* (sin th) (sin ky))) #s(hole binary64 (* th (+ (* -1/6 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))
#s(approx (* (pow (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) 1/2) -1) (* (sin th) (sin ky))) #s(hole binary64 (* th (+ (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* (pow th 2) (+ (* -1/6 (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* 1/120 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))))))
#s(approx (* (pow (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) 1/2) -1) (* (sin th) (sin ky))) #s(hole binary64 (* th (+ (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* (pow th 2) (+ (* -1/6 (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* (pow th 2) (+ (* -1/5040 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* 1/120 (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))))))))
#s(approx (* (sin th) (sin ky)) #s(hole binary64 (* th (sin ky))))
#s(approx (* (sin th) (sin ky)) #s(hole binary64 (* th (+ (sin ky) (* -1/6 (* (pow th 2) (sin ky)))))))
#s(approx (* (sin th) (sin ky)) #s(hole binary64 (* th (+ (sin ky) (* (pow th 2) (+ (* -1/6 (sin ky)) (* 1/120 (* (pow th 2) (sin ky)))))))))
#s(approx (* (sin th) (sin ky)) #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 (* (/ (sin ky) (sqrt (+ (/ (- (cos (- kx kx)) (cos (+ kx kx))) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (* (* th (sin ky)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 kx)))) (pow (sin ky) 2)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (/ (- (cos (- kx kx)) (cos (+ kx kx))) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (* th (+ (* -1/6 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 kx)))) (pow (sin ky) 2)))))) (* (sin ky) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 kx)))) (pow (sin ky) 2)))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (/ (- (cos (- kx kx)) (cos (+ kx kx))) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (* th (+ (* (sin ky) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 kx)))) (pow (sin ky) 2))))) (* (pow th 2) (+ (* -1/6 (* (sin ky) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 kx)))) (pow (sin ky) 2)))))) (* 1/120 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 kx)))) (pow (sin ky) 2))))))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (/ (- (cos (- kx kx)) (cos (+ kx kx))) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (* th (+ (* (sin ky) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 kx)))) (pow (sin ky) 2))))) (* (pow th 2) (+ (* -1/6 (* (sin ky) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 kx)))) (pow (sin ky) 2)))))) (* (pow th 2) (+ (* -1/5040 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 kx)))) (pow (sin ky) 2)))))) (* 1/120 (* (sin ky) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 kx)))) (pow (sin ky) 2))))))))))))))
#s(approx (/ (* (sin th) (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(hole binary64 (* (* th (sin ky)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
#s(approx (/ (* (sin th) (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(hole binary64 (* th (+ (* -1/6 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))
#s(approx (/ (* (sin th) (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(hole binary64 (* th (+ (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* (pow th 2) (+ (* -1/6 (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* 1/120 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))))))
#s(approx (/ (* (sin th) (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(hole binary64 (* th (+ (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* (pow th 2) (+ (* -1/6 (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* (pow th 2) (+ (* -1/5040 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* 1/120 (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))))))))
#s(approx (sin th) #s(hole binary64 (sin th)))
Calls

9 calls:

TimeVariablePointExpression
83.0ms
ky
@inf
((* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (* (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (sin th)) (sin ky)) (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (sin th)) (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (sin kx) kx (sin ky) ky -1 (sin th) th (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (* (pow (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) 1/2) -1) (* (sin th) (sin ky))) (pow (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) 1/2) -1) (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) 1/2) (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) (pow (sin ky) 2) 2 1/2 (* (sin th) (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)))) (* (+ (cosh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1)) (sinh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1))) (sin ky)) (+ (cosh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1)) (sinh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1))) (cosh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1)) (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1) (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (sinh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1)) (* (/ (sin ky) (sqrt (+ (/ (- (cos (- kx kx)) (cos (+ kx kx))) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (/ (- (cos (- kx kx)) (cos (+ kx kx))) 2) (pow (sin ky) 2)))) (sqrt (+ (/ (- (cos (- kx kx)) (cos (+ kx kx))) 2) (pow (sin ky) 2))) (+ (/ (- (cos (- kx kx)) (cos (+ kx kx))) 2) (pow (sin ky) 2)) (/ (- (cos (- kx kx)) (cos (+ kx kx))) 2) (- (cos (- kx kx)) (cos (+ kx kx))) (cos (- kx kx)) (- kx kx) (cos (+ kx kx)) (+ kx kx) (/ (* (sin th) (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))))
29.0ms
kx
@-inf
((* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (* (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (sin th)) (sin ky)) (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (sin th)) (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (sin kx) kx (sin ky) ky -1 (sin th) th (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (* (pow (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) 1/2) -1) (* (sin th) (sin ky))) (pow (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) 1/2) -1) (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) 1/2) (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) (pow (sin ky) 2) 2 1/2 (* (sin th) (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)))) (* (+ (cosh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1)) (sinh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1))) (sin ky)) (+ (cosh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1)) (sinh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1))) (cosh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1)) (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1) (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (sinh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1)) (* (/ (sin ky) (sqrt (+ (/ (- (cos (- kx kx)) (cos (+ kx kx))) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (/ (- (cos (- kx kx)) (cos (+ kx kx))) 2) (pow (sin ky) 2)))) (sqrt (+ (/ (- (cos (- kx kx)) (cos (+ kx kx))) 2) (pow (sin ky) 2))) (+ (/ (- (cos (- kx kx)) (cos (+ kx kx))) 2) (pow (sin ky) 2)) (/ (- (cos (- kx kx)) (cos (+ kx kx))) 2) (- (cos (- kx kx)) (cos (+ kx kx))) (cos (- kx kx)) (- kx kx) (cos (+ kx kx)) (+ kx kx) (/ (* (sin th) (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))))
26.0ms
ky
@-inf
((* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (* (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (sin th)) (sin ky)) (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (sin th)) (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (sin kx) kx (sin ky) ky -1 (sin th) th (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (* (pow (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) 1/2) -1) (* (sin th) (sin ky))) (pow (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) 1/2) -1) (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) 1/2) (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) (pow (sin ky) 2) 2 1/2 (* (sin th) (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)))) (* (+ (cosh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1)) (sinh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1))) (sin ky)) (+ (cosh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1)) (sinh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1))) (cosh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1)) (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1) (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (sinh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1)) (* (/ (sin ky) (sqrt (+ (/ (- (cos (- kx kx)) (cos (+ kx kx))) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (/ (- (cos (- kx kx)) (cos (+ kx kx))) 2) (pow (sin ky) 2)))) (sqrt (+ (/ (- (cos (- kx kx)) (cos (+ kx kx))) 2) (pow (sin ky) 2))) (+ (/ (- (cos (- kx kx)) (cos (+ kx kx))) 2) (pow (sin ky) 2)) (/ (- (cos (- kx kx)) (cos (+ kx kx))) 2) (- (cos (- kx kx)) (cos (+ kx kx))) (cos (- kx kx)) (- kx kx) (cos (+ kx kx)) (+ kx kx) (/ (* (sin th) (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))))
26.0ms
kx
@inf
((* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (* (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (sin th)) (sin ky)) (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (sin th)) (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (sin kx) kx (sin ky) ky -1 (sin th) th (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (* (pow (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) 1/2) -1) (* (sin th) (sin ky))) (pow (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) 1/2) -1) (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) 1/2) (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) (pow (sin ky) 2) 2 1/2 (* (sin th) (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)))) (* (+ (cosh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1)) (sinh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1))) (sin ky)) (+ (cosh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1)) (sinh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1))) (cosh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1)) (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1) (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (sinh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1)) (* (/ (sin ky) (sqrt (+ (/ (- (cos (- kx kx)) (cos (+ kx kx))) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (/ (- (cos (- kx kx)) (cos (+ kx kx))) 2) (pow (sin ky) 2)))) (sqrt (+ (/ (- (cos (- kx kx)) (cos (+ kx kx))) 2) (pow (sin ky) 2))) (+ (/ (- (cos (- kx kx)) (cos (+ kx kx))) 2) (pow (sin ky) 2)) (/ (- (cos (- kx kx)) (cos (+ kx kx))) 2) (- (cos (- kx kx)) (cos (+ kx kx))) (cos (- kx kx)) (- kx kx) (cos (+ kx kx)) (+ kx kx) (/ (* (sin th) (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))))
22.0ms
ky
@0
((* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (* (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (sin th)) (sin ky)) (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (sin th)) (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (sin kx) kx (sin ky) ky -1 (sin th) th (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (* (pow (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) 1/2) -1) (* (sin th) (sin ky))) (pow (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) 1/2) -1) (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) 1/2) (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) (pow (sin ky) 2) 2 1/2 (* (sin th) (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)))) (* (+ (cosh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1)) (sinh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1))) (sin ky)) (+ (cosh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1)) (sinh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1))) (cosh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1)) (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1) (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (sinh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1)) (* (/ (sin ky) (sqrt (+ (/ (- (cos (- kx kx)) (cos (+ kx kx))) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (/ (- (cos (- kx kx)) (cos (+ kx kx))) 2) (pow (sin ky) 2)))) (sqrt (+ (/ (- (cos (- kx kx)) (cos (+ kx kx))) 2) (pow (sin ky) 2))) (+ (/ (- (cos (- kx kx)) (cos (+ kx kx))) 2) (pow (sin ky) 2)) (/ (- (cos (- kx kx)) (cos (+ kx kx))) 2) (- (cos (- kx kx)) (cos (+ kx kx))) (cos (- kx kx)) (- kx kx) (cos (+ kx kx)) (+ kx kx) (/ (* (sin th) (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))))

rewrite205.0ms (2%)

Memory
2.1MiB live, 331.6MiB allocated; 17ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0147120517
0153917345
0815116479
Stop Event
iter limit
node limit
iter limit
Counts
310 → 448
Calls
Call 1
Inputs
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (*.f64 (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)) (sin.f64 th)) (sin.f64 ky)))
(*.f64 (*.f64 (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)) (sin.f64 th)) (sin.f64 ky))
(*.f64 (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)) (sin.f64 th))
(pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64))
(hypot.f64 (sin.f64 kx) (sin.f64 ky))
(sin.f64 kx)
kx
(sin.f64 ky)
ky
#s(literal -1 binary64)
(sin.f64 th)
th
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (pow.f64 (pow.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 1/2 binary64)) #s(literal -1 binary64)) (*.f64 (sin.f64 th) (sin.f64 ky))))
(*.f64 (pow.f64 (pow.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 1/2 binary64)) #s(literal -1 binary64)) (*.f64 (sin.f64 th) (sin.f64 ky)))
(pow.f64 (pow.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 1/2 binary64)) #s(literal -1 binary64))
(pow.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 1/2 binary64))
(fma.f64 (sin.f64 kx) (sin.f64 kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))
(pow.f64 (sin.f64 ky) #s(literal 2 binary64))
#s(literal 2 binary64)
#s(literal 1/2 binary64)
(*.f64 (sin.f64 th) (sin.f64 ky))
(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (*.f64 (+.f64 (cosh.f64 (*.f64 (log.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky))) #s(literal -1 binary64))) (sinh.f64 (*.f64 (log.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky))) #s(literal -1 binary64)))) (sin.f64 ky))) (sin.f64 th))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (*.f64 (+.f64 (cosh.f64 (*.f64 (log.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky))) #s(literal -1 binary64))) (sinh.f64 (*.f64 (log.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky))) #s(literal -1 binary64)))) (sin.f64 ky)))
(*.f64 (+.f64 (cosh.f64 (*.f64 (log.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky))) #s(literal -1 binary64))) (sinh.f64 (*.f64 (log.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky))) #s(literal -1 binary64)))) (sin.f64 ky))
(+.f64 (cosh.f64 (*.f64 (log.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky))) #s(literal -1 binary64))) (sinh.f64 (*.f64 (log.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky))) #s(literal -1 binary64))))
(cosh.f64 (*.f64 (log.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky))) #s(literal -1 binary64)))
(*.f64 (log.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky))) #s(literal -1 binary64))
(log.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)))
(sinh.f64 (*.f64 (log.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky))) #s(literal -1 binary64)))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (/.f64 (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx))) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (/.f64 (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx))) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
(sqrt.f64 (+.f64 (/.f64 (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx))) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
(+.f64 (/.f64 (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx))) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))
(/.f64 (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx))) #s(literal 2 binary64))
(-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx)))
(cos.f64 (-.f64 kx kx))
(-.f64 kx kx)
(cos.f64 (+.f64 kx kx))
(+.f64 kx kx)
(/.f64 (*.f64 (sin.f64 th) (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)) #s(hole binary64 (sin th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (+ (sin th) (* (pow kx 2) (+ (* -1/2 (/ (sin th) (pow (sin ky) 2))) (* 1/2 (* (pow kx 2) (* (pow (sin ky) 2) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))))))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (+ (sin th) (* (pow kx 2) (+ (* -1/2 (/ (sin th) (pow (sin ky) 2))) (* (pow kx 2) (+ (* -1/2 (* (pow kx 2) (* (pow (sin ky) 2) (* (sin th) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))) (pow (sin ky) 2))) (+ (* 2/45 (/ 1 (pow (sin ky) 4))) (+ (* 2/3 (/ 1 (pow (sin ky) 6))) (/ 1 (pow (sin ky) 8))))))))) (* 1/2 (* (pow (sin ky) 2) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6))))))))))))))
#s(approx (* (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (sin th)) (sin ky)) #s(hole binary64 (sin th)))
#s(approx (* (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (sin th)) (sin ky)) #s(hole binary64 (+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2))))))
#s(approx (* (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (sin th)) (sin ky)) #s(hole binary64 (+ (sin th) (* (pow kx 2) (+ (* -1/2 (/ (sin th) (pow (sin ky) 2))) (* 1/2 (* (pow kx 2) (* (pow (sin ky) 2) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))))))))))))
#s(approx (* (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (sin th)) (sin ky)) #s(hole binary64 (+ (sin th) (* (pow kx 2) (+ (* -1/2 (/ (sin th) (pow (sin ky) 2))) (* (pow kx 2) (+ (* -1/2 (* (pow kx 2) (* (pow (sin ky) 2) (* (sin th) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))) (pow (sin ky) 2))) (+ (* 2/45 (/ 1 (pow (sin ky) 4))) (+ (* 2/3 (/ 1 (pow (sin ky) 6))) (/ 1 (pow (sin ky) 8))))))))) (* 1/2 (* (pow (sin ky) 2) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6))))))))))))))
#s(approx (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (sin th)) #s(hole binary64 (/ (sin th) (sin ky))))
#s(approx (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (sin th)) #s(hole binary64 (+ (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 3))) (/ (sin th) (sin ky)))))
#s(approx (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (sin th)) #s(hole binary64 (+ (* (pow kx 2) (+ (* -1/2 (/ (sin th) (pow (sin ky) 3))) (* 1/2 (* (pow kx 2) (* (sin ky) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))))))))) (/ (sin th) (sin ky)))))
#s(approx (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (sin th)) #s(hole binary64 (+ (* (pow kx 2) (+ (* -1/2 (/ (sin th) (pow (sin ky) 3))) (* (pow kx 2) (+ (* -1/2 (* (pow kx 2) (* (sin ky) (* (sin th) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))) (pow (sin ky) 2))) (+ (* 2/45 (/ 1 (pow (sin ky) 4))) (+ (* 2/3 (/ 1 (pow (sin ky) 6))) (/ 1 (pow (sin ky) 8))))))))) (* 1/2 (* (sin ky) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6))))))))))) (/ (sin th) (sin ky)))))
#s(approx (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) #s(hole binary64 (/ 1 (sin ky))))
#s(approx (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) #s(hole binary64 (+ (* -1/2 (/ (pow kx 2) (pow (sin ky) 3))) (/ 1 (sin ky)))))
#s(approx (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) #s(hole binary64 (+ (* (pow kx 2) (- (* 1/2 (* (pow kx 2) (* (sin ky) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6))))))) (* 1/2 (/ 1 (pow (sin ky) 3))))) (/ 1 (sin ky)))))
#s(approx (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) #s(hole binary64 (+ (* (pow kx 2) (- (* (pow kx 2) (+ (* -1/2 (* (pow kx 2) (* (sin ky) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))) (pow (sin ky) 2))) (+ (* 2/45 (/ 1 (pow (sin ky) 4))) (+ (* 2/3 (/ 1 (pow (sin ky) 6))) (/ 1 (pow (sin ky) 8)))))))) (* 1/2 (* (sin ky) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))))))) (* 1/2 (/ 1 (pow (sin ky) 3))))) (/ 1 (sin ky)))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) #s(hole binary64 (sin ky)))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) #s(hole binary64 (+ (sin ky) (* 1/2 (/ (pow kx 2) (sin ky))))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) #s(hole binary64 (+ (sin ky) (* (pow kx 2) (+ (* -1/2 (/ (* (pow kx 2) (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2))))) (sin ky))) (* 1/2 (/ 1 (sin ky))))))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) #s(hole binary64 (+ (sin ky) (* (pow kx 2) (+ (* (pow kx 2) (+ (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (sin ky))) (* 1/2 (/ (* (pow kx 2) (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2))))) (sin ky))))) (* 1/2 (/ 1 (sin ky))))))))
#s(approx (sin kx) #s(hole binary64 kx))
#s(approx (sin kx) #s(hole binary64 (* kx (+ 1 (* -1/6 (pow kx 2))))))
#s(approx (sin kx) #s(hole binary64 (* kx (+ 1 (* (pow kx 2) (- (* 1/120 (pow kx 2)) 1/6))))))
#s(approx (sin kx) #s(hole binary64 (* kx (+ 1 (* (pow kx 2) (- (* (pow kx 2) (+ 1/120 (* -1/5040 (pow kx 2)))) 1/6))))))
#s(approx kx #s(hole binary64 kx))
#s(approx (* (pow (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) 1/2) -1) (* (sin th) (sin ky))) #s(hole binary64 (sin th)))
#s(approx (* (pow (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) 1/2) -1) (* (sin th) (sin ky))) #s(hole binary64 (+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2))))))
#s(approx (* (pow (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) 1/2) -1) (* (sin th) (sin ky))) #s(hole binary64 (+ (sin th) (* (pow kx 2) (+ (* -1/2 (/ (sin th) (pow (sin ky) 2))) (* 1/2 (* (pow kx 2) (* (pow (sin ky) 2) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))))))))))))
#s(approx (* (pow (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) 1/2) -1) (* (sin th) (sin ky))) #s(hole binary64 (+ (sin th) (* (pow kx 2) (+ (* -1/2 (/ (sin th) (pow (sin ky) 2))) (* (pow kx 2) (+ (* -1/2 (* (pow kx 2) (* (pow (sin ky) 2) (* (sin th) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))) (pow (sin ky) 2))) (+ (* 2/45 (/ 1 (pow (sin ky) 4))) (+ (* 2/3 (/ 1 (pow (sin ky) 6))) (/ 1 (pow (sin ky) 8))))))))) (* 1/2 (* (pow (sin ky) 2) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6))))))))))))))
#s(approx (pow (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) 1/2) -1) #s(hole binary64 (/ 1 (sin ky))))
#s(approx (pow (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) 1/2) -1) #s(hole binary64 (+ (* -1/2 (/ (pow kx 2) (pow (sin ky) 3))) (/ 1 (sin ky)))))
#s(approx (pow (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) 1/2) -1) #s(hole binary64 (+ (* (pow kx 2) (- (* 1/2 (* (pow kx 2) (* (sin ky) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6))))))) (* 1/2 (/ 1 (pow (sin ky) 3))))) (/ 1 (sin ky)))))
#s(approx (pow (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) 1/2) -1) #s(hole binary64 (+ (* (pow kx 2) (- (* (pow kx 2) (+ (* -1/2 (* (pow kx 2) (* (sin ky) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))) (pow (sin ky) 2))) (+ (* 2/45 (/ 1 (pow (sin ky) 4))) (+ (* 2/3 (/ 1 (pow (sin ky) 6))) (/ 1 (pow (sin ky) 8)))))))) (* 1/2 (* (sin ky) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))))))) (* 1/2 (/ 1 (pow (sin ky) 3))))) (/ 1 (sin ky)))))
#s(approx (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) 1/2) #s(hole binary64 (sin ky)))
#s(approx (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) 1/2) #s(hole binary64 (+ (sin ky) (* 1/2 (/ (pow kx 2) (sin ky))))))
#s(approx (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) 1/2) #s(hole binary64 (+ (sin ky) (* (pow kx 2) (+ (* -1/2 (/ (* (pow kx 2) (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2))))) (sin ky))) (* 1/2 (/ 1 (sin ky))))))))
#s(approx (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) 1/2) #s(hole binary64 (+ (sin ky) (* (pow kx 2) (+ (* (pow kx 2) (+ (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (sin ky))) (* 1/2 (/ (* (pow kx 2) (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2))))) (sin ky))))) (* 1/2 (/ 1 (sin ky))))))))
#s(approx (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) #s(hole binary64 (pow (sin ky) 2)))
#s(approx (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) #s(hole binary64 (+ (pow kx 2) (pow (sin ky) 2))))
#s(approx (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) #s(hole binary64 (+ (* (pow kx 2) (+ 1 (* -1/3 (pow kx 2)))) (pow (sin ky) 2))))
#s(approx (+ (* (sin kx) (sin kx)) (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 (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 1))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ 1 (* -1/2 (/ (pow kx 2) (pow (sin ky) 2))))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ 1 (* (pow kx 2) (- (* 1/2 (* (pow kx 2) (* (pow (sin ky) 2) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6))))))) (* 1/2 (/ 1 (pow (sin ky) 2))))))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ 1 (* (pow kx 2) (- (* (pow kx 2) (+ (* -1/2 (* (pow kx 2) (* (pow (sin ky) 2) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))) (pow (sin ky) 2))) (+ (* 2/45 (/ 1 (pow (sin ky) 4))) (+ (* 2/3 (/ 1 (pow (sin ky) 6))) (/ 1 (pow (sin ky) 8)))))))) (* 1/2 (* (pow (sin ky) 2) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))))))) (* 1/2 (/ 1 (pow (sin ky) 2))))))))
#s(approx (* (+ (cosh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1)) (sinh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1))) (sin ky)) #s(hole binary64 (* (sin ky) (+ (* 1/2 (+ (sin ky) (/ 1 (sin ky)))) (* 1/2 (+ (* -1 (sin ky)) (/ 1 (sin ky))))))))
#s(approx (* (+ (cosh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1)) (sinh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1))) (sin ky)) #s(hole binary64 (+ (* (sin ky) (+ (* 1/2 (+ (sin ky) (/ 1 (sin ky)))) (* 1/2 (+ (* -1 (sin ky)) (/ 1 (sin ky)))))) (* (pow kx 2) (* (sin ky) (+ (* -1/2 (+ (* 1/2 (/ 1 (sin ky))) (* 1/2 (/ 1 (pow (sin ky) 3))))) (* 1/2 (- (* 1/2 (/ 1 (sin ky))) (* 1/2 (/ 1 (pow (sin ky) 3)))))))))))
#s(approx (* (+ (cosh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1)) (sinh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1))) (sin ky)) #s(hole binary64 (+ (* (sin ky) (+ (* 1/2 (+ (sin ky) (/ 1 (sin ky)))) (* 1/2 (+ (* -1 (sin ky)) (/ 1 (sin ky)))))) (* (pow kx 2) (+ (* (sin ky) (+ (* -1/2 (+ (* 1/2 (/ 1 (sin ky))) (* 1/2 (/ 1 (pow (sin ky) 3))))) (* 1/2 (- (* 1/2 (/ 1 (sin ky))) (* 1/2 (/ 1 (pow (sin ky) 3))))))) (* (pow kx 2) (* (sin ky) (+ (* 1/2 (- (+ (* -1/24 (/ (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2))) (* 3 (/ 1 (pow (sin ky) 4)))) (sin ky))) (* 1/8 (/ 1 (pow (sin ky) 5)))) (+ (* -1 (* (sin ky) (+ (* -1/24 (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2))) (* 3 (/ 1 (pow (sin ky) 4))))) (* 1/8 (/ 1 (pow (sin ky) 4)))))) (* 1/4 (/ 1 (pow (sin ky) 3)))))) (* 1/2 (- (+ (* -1/24 (/ (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2))) (* 3 (/ 1 (pow (sin ky) 4)))) (sin ky))) (+ (* 1/8 (/ 1 (pow (sin ky) 5))) (* 1/4 (/ 1 (pow (sin ky) 3))))) (* (sin ky) (+ (* -1/24 (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2))) (* 3 (/ 1 (pow (sin ky) 4))))) (* 1/8 (/ 1 (pow (sin ky) 4)))))))))))))))
#s(approx (* (+ (cosh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1)) (sinh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1))) (sin ky)) #s(hole binary64 (+ (* (sin ky) (+ (* 1/2 (+ (sin ky) (/ 1 (sin ky)))) (* 1/2 (+ (* -1 (sin ky)) (/ 1 (sin ky)))))) (* (pow kx 2) (+ (* (sin ky) (+ (* -1/2 (+ (* 1/2 (/ 1 (sin ky))) (* 1/2 (/ 1 (pow (sin ky) 3))))) (* 1/2 (- (* 1/2 (/ 1 (sin ky))) (* 1/2 (/ 1 (pow (sin ky) 3))))))) (* (pow kx 2) (+ (* (sin ky) (+ (* 1/2 (- (+ (* -1/24 (/ (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2))) (* 3 (/ 1 (pow (sin ky) 4)))) (sin ky))) (* 1/8 (/ 1 (pow (sin ky) 5)))) (+ (* -1 (* (sin ky) (+ (* -1/24 (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2))) (* 3 (/ 1 (pow (sin ky) 4))))) (* 1/8 (/ 1 (pow (sin ky) 4)))))) (* 1/4 (/ 1 (pow (sin ky) 3)))))) (* 1/2 (- (+ (* -1/24 (/ (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2))) (* 3 (/ 1 (pow (sin ky) 4)))) (sin ky))) (+ (* 1/8 (/ 1 (pow (sin ky) 5))) (* 1/4 (/ 1 (pow (sin ky) 3))))) (* (sin ky) (+ (* -1/24 (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2))) (* 3 (/ 1 (pow (sin ky) 4))))) (* 1/8 (/ 1 (pow (sin ky) 4))))))))) (* (pow kx 2) (* (sin ky) (+ (* 1/2 (- (+ (* -1/720 (/ (+ (* 180 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 4))) (+ (* 360 (/ (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2)))) (pow (sin ky) 2))) (* 30 (/ 1 (pow (sin ky) 6))))) (sin ky))) (* 1/48 (/ (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2))) (* 3 (/ 1 (pow (sin ky) 4)))) (pow (sin ky) 3)))) (+ (* -1 (* (sin ky) (- (+ (* -1/720 (+ (* 30 (/ 1 (pow (sin ky) 6))) (+ (* 180 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 4))) (* 360 (/ (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2)))) (pow (sin ky) 2)))))) (* 1/48 (/ (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2))) (* 3 (/ 1 (pow (sin ky) 4)))) (pow (sin ky) 2)))) (* 1/48 (/ 1 (pow (sin ky) 6)))))) (+ (* -1/2 (/ (+ (* -1/24 (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2))) (* 3 (/ 1 (pow (sin ky) 4))))) (* 1/8 (/ 1 (pow (sin ky) 4)))) (sin ky))) (+ (* 1/48 (/ 1 (pow (sin ky) 7))) (* 1/2 (/ (+ (* -1 (* (sin ky) (+ (* -1/24 (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2))) (* 3 (/ 1 (pow (sin ky) 4))))) (* 1/8 (/ 1 (pow (sin ky) 4)))))) (* 1/4 (/ 1 (pow (sin ky) 3)))) (pow (sin ky) 2)))))))) (* 1/2 (- (+ (* -1/720 (/ (+ (* 180 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 4))) (+ (* 360 (/ (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2)))) (pow (sin ky) 2))) (* 30 (/ 1 (pow (sin ky) 6))))) (sin ky))) (* 1/48 (/ (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2))) (* 3 (/ 1 (pow (sin ky) 4)))) (pow (sin ky) 3)))) (+ (* -1/2 (/ (- (* 1/4 (/ 1 (pow (sin ky) 3))) (* (sin ky) (+ (* -1/24 (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2))) (* 3 (/ 1 (pow (sin ky) 4))))) (* 1/8 (/ 1 (pow (sin ky) 4)))))) (pow (sin ky) 2))) (+ (* 1/48 (/ 1 (pow (sin ky) 7))) (+ (* 1/2 (/ (+ (* -1/24 (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2))) (* 3 (/ 1 (pow (sin ky) 4))))) (* 1/8 (/ 1 (pow (sin ky) 4)))) (sin ky))) (* (sin ky) (- (+ (* -1/720 (+ (* 30 (/ 1 (pow (sin ky) 6))) (+ (* 180 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 4))) (* 360 (/ (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2)))) (pow (sin ky) 2)))))) (* 1/48 (/ (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2))) (* 3 (/ 1 (pow (sin ky) 4)))) (pow (sin ky) 2)))) (* 1/48 (/ 1 (pow (sin ky) 6))))))))))))))))))))
#s(approx (+ (cosh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1)) (sinh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1))) #s(hole binary64 (+ (* 1/2 (+ (sin ky) (/ 1 (sin ky)))) (* 1/2 (+ (* -1 (sin ky)) (/ 1 (sin ky)))))))
#s(approx (+ (cosh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1)) (sinh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1))) #s(hole binary64 (+ (* 1/2 (+ (sin ky) (/ 1 (sin ky)))) (+ (* 1/2 (+ (* -1 (sin ky)) (/ 1 (sin ky)))) (* (pow kx 2) (+ (* -1/2 (+ (* 1/2 (/ 1 (sin ky))) (* 1/2 (/ 1 (pow (sin ky) 3))))) (* 1/2 (- (* 1/2 (/ 1 (sin ky))) (* 1/2 (/ 1 (pow (sin ky) 3)))))))))))
#s(approx (+ (cosh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1)) (sinh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1))) #s(hole binary64 (+ (* 1/2 (+ (sin ky) (/ 1 (sin ky)))) (+ (* 1/2 (+ (* -1 (sin ky)) (/ 1 (sin ky)))) (* (pow kx 2) (+ (* -1/2 (+ (* 1/2 (/ 1 (sin ky))) (* 1/2 (/ 1 (pow (sin ky) 3))))) (+ (* 1/2 (- (* 1/2 (/ 1 (sin ky))) (* 1/2 (/ 1 (pow (sin ky) 3))))) (* (pow kx 2) (+ (* 1/2 (- (+ (* -1/24 (/ (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2))) (* 3 (/ 1 (pow (sin ky) 4)))) (sin ky))) (* 1/8 (/ 1 (pow (sin ky) 5)))) (+ (* -1 (* (sin ky) (+ (* -1/24 (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2))) (* 3 (/ 1 (pow (sin ky) 4))))) (* 1/8 (/ 1 (pow (sin ky) 4)))))) (* 1/4 (/ 1 (pow (sin ky) 3)))))) (* 1/2 (- (+ (* -1/24 (/ (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2))) (* 3 (/ 1 (pow (sin ky) 4)))) (sin ky))) (+ (* 1/8 (/ 1 (pow (sin ky) 5))) (* 1/4 (/ 1 (pow (sin ky) 3))))) (* (sin ky) (+ (* -1/24 (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2))) (* 3 (/ 1 (pow (sin ky) 4))))) (* 1/8 (/ 1 (pow (sin ky) 4))))))))))))))))
#s(approx (+ (cosh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1)) (sinh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1))) #s(hole binary64 (+ (* 1/2 (+ (sin ky) (/ 1 (sin ky)))) (+ (* 1/2 (+ (* -1 (sin ky)) (/ 1 (sin ky)))) (* (pow kx 2) (+ (* -1/2 (+ (* 1/2 (/ 1 (sin ky))) (* 1/2 (/ 1 (pow (sin ky) 3))))) (+ (* 1/2 (- (* 1/2 (/ 1 (sin ky))) (* 1/2 (/ 1 (pow (sin ky) 3))))) (* (pow kx 2) (+ (* 1/2 (- (+ (* -1/24 (/ (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2))) (* 3 (/ 1 (pow (sin ky) 4)))) (sin ky))) (* 1/8 (/ 1 (pow (sin ky) 5)))) (+ (* -1 (* (sin ky) (+ (* -1/24 (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2))) (* 3 (/ 1 (pow (sin ky) 4))))) (* 1/8 (/ 1 (pow (sin ky) 4)))))) (* 1/4 (/ 1 (pow (sin ky) 3)))))) (+ (* 1/2 (- (+ (* -1/24 (/ (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2))) (* 3 (/ 1 (pow (sin ky) 4)))) (sin ky))) (+ (* 1/8 (/ 1 (pow (sin ky) 5))) (* 1/4 (/ 1 (pow (sin ky) 3))))) (* (sin ky) (+ (* -1/24 (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2))) (* 3 (/ 1 (pow (sin ky) 4))))) (* 1/8 (/ 1 (pow (sin ky) 4))))))) (* (pow kx 2) (+ (* 1/2 (- (+ (* -1/720 (/ (+ (* 30 (/ 1 (pow (sin ky) 6))) (+ (* 180 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 4))) (* 360 (/ (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2)))) (pow (sin ky) 2))))) (sin ky))) (* 1/48 (/ (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2))) (* 3 (/ 1 (pow (sin ky) 4)))) (pow (sin ky) 3)))) (+ (* -1 (* (sin ky) (- (+ (* -1/720 (+ (* 180 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 4))) (+ (* 360 (/ (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2)))) (pow (sin ky) 2))) (* 30 (/ 1 (pow (sin ky) 6)))))) (* 1/48 (/ (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2))) (* 3 (/ 1 (pow (sin ky) 4)))) (pow (sin ky) 2)))) (* 1/48 (/ 1 (pow (sin ky) 6)))))) (+ (* -1/2 (/ (+ (* -1/24 (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2))) (* 3 (/ 1 (pow (sin ky) 4))))) (* 1/8 (/ 1 (pow (sin ky) 4)))) (sin ky))) (+ (* 1/48 (/ 1 (pow (sin ky) 7))) (* 1/2 (/ (+ (* -1 (* (sin ky) (+ (* -1/24 (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2))) (* 3 (/ 1 (pow (sin ky) 4))))) (* 1/8 (/ 1 (pow (sin ky) 4)))))) (* 1/4 (/ 1 (pow (sin ky) 3)))) (pow (sin ky) 2)))))))) (* 1/2 (- (+ (* -1/720 (/ (+ (* 30 (/ 1 (pow (sin ky) 6))) (+ (* 180 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 4))) (* 360 (/ (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2)))) (pow (sin ky) 2))))) (sin ky))) (* 1/48 (/ (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2))) (* 3 (/ 1 (pow (sin ky) 4)))) (pow (sin ky) 3)))) (+ (* -1/2 (/ (- (* 1/4 (/ 1 (pow (sin ky) 3))) (* (sin ky) (+ (* -1/24 (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2))) (* 3 (/ 1 (pow (sin ky) 4))))) (* 1/8 (/ 1 (pow (sin ky) 4)))))) (pow (sin ky) 2))) (+ (* 1/48 (/ 1 (pow (sin ky) 7))) (+ (* 1/2 (/ (+ (* -1/24 (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2))) (* 3 (/ 1 (pow (sin ky) 4))))) (* 1/8 (/ 1 (pow (sin ky) 4)))) (sin ky))) (* (sin ky) (- (+ (* -1/720 (+ (* 180 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 4))) (+ (* 360 (/ (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2)))) (pow (sin ky) 2))) (* 30 (/ 1 (pow (sin ky) 6)))))) (* 1/48 (/ (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2))) (* 3 (/ 1 (pow (sin ky) 4)))) (pow (sin ky) 2)))) (* 1/48 (/ 1 (pow (sin ky) 6))))))))))))))))))))))
#s(approx (cosh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1)) #s(hole binary64 (* 1/2 (+ (sin ky) (/ 1 (sin ky))))))
#s(approx (cosh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1)) #s(hole binary64 (+ (* 1/2 (* (pow kx 2) (- (* 1/2 (/ 1 (sin ky))) (* 1/2 (/ 1 (pow (sin ky) 3)))))) (* 1/2 (+ (sin ky) (/ 1 (sin ky)))))))
#s(approx (cosh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1)) #s(hole binary64 (+ (* 1/2 (+ (sin ky) (/ 1 (sin ky)))) (* (pow kx 2) (+ (* 1/2 (* (pow kx 2) (- (+ (* -1/24 (/ (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2))) (* 3 (/ 1 (pow (sin ky) 4)))) (sin ky))) (+ (* 1/8 (/ 1 (pow (sin ky) 5))) (* 1/4 (/ 1 (pow (sin ky) 3))))) (* (sin ky) (+ (* -1/24 (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2))) (* 3 (/ 1 (pow (sin ky) 4))))) (* 1/8 (/ 1 (pow (sin ky) 4)))))))) (* 1/2 (- (* 1/2 (/ 1 (sin ky))) (* 1/2 (/ 1 (pow (sin ky) 3))))))))))
#s(approx (cosh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1)) #s(hole binary64 (+ (* 1/2 (+ (sin ky) (/ 1 (sin ky)))) (* (pow kx 2) (+ (* 1/2 (- (* 1/2 (/ 1 (sin ky))) (* 1/2 (/ 1 (pow (sin ky) 3))))) (* (pow kx 2) (+ (* 1/2 (* (pow kx 2) (- (+ (* -1/720 (/ (+ (* 180 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 4))) (+ (* 360 (/ (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2)))) (pow (sin ky) 2))) (* 30 (/ 1 (pow (sin ky) 6))))) (sin ky))) (* 1/48 (/ (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2))) (* 3 (/ 1 (pow (sin ky) 4)))) (pow (sin ky) 3)))) (+ (* -1/2 (/ (- (* 1/4 (/ 1 (pow (sin ky) 3))) (* (sin ky) (+ (* -1/24 (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2))) (* 3 (/ 1 (pow (sin ky) 4))))) (* 1/8 (/ 1 (pow (sin ky) 4)))))) (pow (sin ky) 2))) (+ (* 1/48 (/ 1 (pow (sin ky) 7))) (+ (* 1/2 (/ (+ (* -1/24 (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2))) (* 3 (/ 1 (pow (sin ky) 4))))) (* 1/8 (/ 1 (pow (sin ky) 4)))) (sin ky))) (* (sin ky) (- (+ (* -1/720 (+ (* 30 (/ 1 (pow (sin ky) 6))) (+ (* 180 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 4))) (* 360 (/ (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2)))) (pow (sin ky) 2)))))) (* 1/48 (/ (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2))) (* 3 (/ 1 (pow (sin ky) 4)))) (pow (sin ky) 2)))) (* 1/48 (/ 1 (pow (sin ky) 6))))))))))) (* 1/2 (- (+ (* -1/24 (/ (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2))) (* 3 (/ 1 (pow (sin ky) 4)))) (sin ky))) (+ (* 1/8 (/ 1 (pow (sin ky) 5))) (* 1/4 (/ 1 (pow (sin ky) 3))))) (* (sin ky) (+ (* -1/24 (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2))) (* 3 (/ 1 (pow (sin ky) 4))))) (* 1/8 (/ 1 (pow (sin ky) 4))))))))))))))
#s(approx (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1) #s(hole binary64 (* -1 (log (sin ky)))))
#s(approx (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1) #s(hole binary64 (+ (* -1 (log (sin ky))) (* -1/2 (/ (pow kx 2) (pow (sin ky) 2))))))
#s(approx (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1) #s(hole binary64 (+ (* -1 (log (sin ky))) (* (pow kx 2) (- (* -1/24 (* (pow kx 2) (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2))) (* 3 (/ 1 (pow (sin ky) 4)))))) (* 1/2 (/ 1 (pow (sin ky) 2))))))))
#s(approx (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1) #s(hole binary64 (+ (* -1 (log (sin ky))) (* (pow kx 2) (- (* (pow kx 2) (+ (* -1/24 (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2))) (* 3 (/ 1 (pow (sin ky) 4))))) (* -1/720 (* (pow kx 2) (+ (* 30 (/ 1 (pow (sin ky) 6))) (+ (* 180 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 4))) (* 360 (/ (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2)))) (pow (sin ky) 2))))))))) (* 1/2 (/ 1 (pow (sin ky) 2))))))))
#s(approx (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(hole binary64 (log (sin ky))))
#s(approx (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(hole binary64 (+ (log (sin ky)) (* 1/2 (/ (pow kx 2) (pow (sin ky) 2))))))
#s(approx (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(hole binary64 (+ (log (sin ky)) (* (pow kx 2) (+ (* 1/24 (* (pow kx 2) (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2))) (* 3 (/ 1 (pow (sin ky) 4)))))) (* 1/2 (/ 1 (pow (sin ky) 2))))))))
#s(approx (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(hole binary64 (+ (log (sin ky)) (* (pow kx 2) (+ (* (pow kx 2) (+ (* 1/720 (* (pow kx 2) (+ (* 180 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 4))) (+ (* 360 (/ (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2)))) (pow (sin ky) 2))) (* 30 (/ 1 (pow (sin ky) 6))))))) (* 1/24 (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2))) (* 3 (/ 1 (pow (sin ky) 4))))))) (* 1/2 (/ 1 (pow (sin ky) 2))))))))
#s(approx (sinh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1)) #s(hole binary64 (* 1/2 (+ (* -1 (sin ky)) (/ 1 (sin ky))))))
#s(approx (sinh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1)) #s(hole binary64 (+ (* -1/2 (* (pow kx 2) (+ (* 1/2 (/ 1 (sin ky))) (* 1/2 (/ 1 (pow (sin ky) 3)))))) (* 1/2 (+ (* -1 (sin ky)) (/ 1 (sin ky)))))))
#s(approx (sinh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1)) #s(hole binary64 (+ (* 1/2 (+ (* -1 (sin ky)) (/ 1 (sin ky)))) (* (pow kx 2) (+ (* -1/2 (+ (* 1/2 (/ 1 (sin ky))) (* 1/2 (/ 1 (pow (sin ky) 3))))) (* 1/2 (* (pow kx 2) (- (+ (* -1/24 (/ (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2))) (* 3 (/ 1 (pow (sin ky) 4)))) (sin ky))) (* 1/8 (/ 1 (pow (sin ky) 5)))) (+ (* -1 (* (sin ky) (+ (* -1/24 (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2))) (* 3 (/ 1 (pow (sin ky) 4))))) (* 1/8 (/ 1 (pow (sin ky) 4)))))) (* 1/4 (/ 1 (pow (sin ky) 3))))))))))))
#s(approx (sinh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1)) #s(hole binary64 (+ (* 1/2 (+ (* -1 (sin ky)) (/ 1 (sin ky)))) (* (pow kx 2) (+ (* -1/2 (+ (* 1/2 (/ 1 (sin ky))) (* 1/2 (/ 1 (pow (sin ky) 3))))) (* (pow kx 2) (+ (* 1/2 (* (pow kx 2) (- (+ (* -1/720 (/ (+ (* 180 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 4))) (+ (* 360 (/ (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2)))) (pow (sin ky) 2))) (* 30 (/ 1 (pow (sin ky) 6))))) (sin ky))) (* 1/48 (/ (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2))) (* 3 (/ 1 (pow (sin ky) 4)))) (pow (sin ky) 3)))) (+ (* -1 (* (sin ky) (- (+ (* -1/720 (+ (* 30 (/ 1 (pow (sin ky) 6))) (+ (* 180 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 4))) (* 360 (/ (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2)))) (pow (sin ky) 2)))))) (* 1/48 (/ (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2))) (* 3 (/ 1 (pow (sin ky) 4)))) (pow (sin ky) 2)))) (* 1/48 (/ 1 (pow (sin ky) 6)))))) (+ (* -1/2 (/ (+ (* -1/24 (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2))) (* 3 (/ 1 (pow (sin ky) 4))))) (* 1/8 (/ 1 (pow (sin ky) 4)))) (sin ky))) (+ (* 1/48 (/ 1 (pow (sin ky) 7))) (* 1/2 (/ (+ (* -1 (* (sin ky) (+ (* -1/24 (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2))) (* 3 (/ 1 (pow (sin ky) 4))))) (* 1/8 (/ 1 (pow (sin ky) 4)))))) (* 1/4 (/ 1 (pow (sin ky) 3)))) (pow (sin ky) 2))))))))) (* 1/2 (- (+ (* -1/24 (/ (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2))) (* 3 (/ 1 (pow (sin ky) 4)))) (sin ky))) (* 1/8 (/ 1 (pow (sin ky) 5)))) (+ (* -1 (* (sin ky) (+ (* -1/24 (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2))) (* 3 (/ 1 (pow (sin ky) 4))))) (* 1/8 (/ 1 (pow (sin ky) 4)))))) (* 1/4 (/ 1 (pow (sin ky) 3)))))))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (/ (- (cos (- kx kx)) (cos (+ kx kx))) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (sin th)))
#s(approx (* (/ (sin ky) (sqrt (+ (/ (- (cos (- kx kx)) (cos (+ kx kx))) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2))))))
#s(approx (* (/ (sin ky) (sqrt (+ (/ (- (cos (- kx kx)) (cos (+ kx kx))) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (+ (sin th) (* (pow kx 2) (+ (* -1/2 (/ (sin th) (pow (sin ky) 2))) (* 1/2 (* (pow kx 2) (* (pow (sin ky) 2) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))))))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (/ (- (cos (- kx kx)) (cos (+ kx kx))) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (+ (sin th) (* (pow kx 2) (+ (* -1/2 (/ (sin th) (pow (sin ky) 2))) (* (pow kx 2) (+ (* -1/2 (* (pow kx 2) (* (pow (sin ky) 2) (* (sin th) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))) (pow (sin ky) 2))) (+ (* 2/45 (/ 1 (pow (sin ky) 4))) (+ (* 2/3 (/ 1 (pow (sin ky) 6))) (/ 1 (pow (sin ky) 8))))))))) (* 1/2 (* (pow (sin ky) 2) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6))))))))))))))
#s(approx (/ (sin ky) (sqrt (+ (/ (- (cos (- kx kx)) (cos (+ kx kx))) 2) (pow (sin ky) 2)))) #s(hole binary64 1))
#s(approx (/ (sin ky) (sqrt (+ (/ (- (cos (- kx kx)) (cos (+ kx kx))) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ 1 (* -1/2 (/ (pow kx 2) (pow (sin ky) 2))))))
#s(approx (/ (sin ky) (sqrt (+ (/ (- (cos (- kx kx)) (cos (+ kx kx))) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ 1 (* (pow kx 2) (- (* 1/2 (* (pow kx 2) (* (pow (sin ky) 2) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6))))))) (* 1/2 (/ 1 (pow (sin ky) 2))))))))
#s(approx (/ (sin ky) (sqrt (+ (/ (- (cos (- kx kx)) (cos (+ kx kx))) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ 1 (* (pow kx 2) (- (* (pow kx 2) (+ (* -1/2 (* (pow kx 2) (* (pow (sin ky) 2) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))) (pow (sin ky) 2))) (+ (* 2/45 (/ 1 (pow (sin ky) 4))) (+ (* 2/3 (/ 1 (pow (sin ky) 6))) (/ 1 (pow (sin ky) 8)))))))) (* 1/2 (* (pow (sin ky) 2) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))))))) (* 1/2 (/ 1 (pow (sin ky) 2))))))))
#s(approx (sqrt (+ (/ (- (cos (- kx kx)) (cos (+ kx kx))) 2) (pow (sin ky) 2))) #s(hole binary64 (sin ky)))
#s(approx (sqrt (+ (/ (- (cos (- kx kx)) (cos (+ kx kx))) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (sin ky) (* 1/2 (/ (pow kx 2) (sin ky))))))
#s(approx (sqrt (+ (/ (- (cos (- kx kx)) (cos (+ kx kx))) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (sin ky) (* (pow kx 2) (+ (* -1/2 (/ (* (pow kx 2) (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2))))) (sin ky))) (* 1/2 (/ 1 (sin ky))))))))
#s(approx (sqrt (+ (/ (- (cos (- kx kx)) (cos (+ kx kx))) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (sin ky) (* (pow kx 2) (+ (* (pow kx 2) (+ (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (sin ky))) (* 1/2 (/ (* (pow kx 2) (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2))))) (sin ky))))) (* 1/2 (/ 1 (sin ky))))))))
#s(approx (+ (/ (- (cos (- kx kx)) (cos (+ kx kx))) 2) (pow (sin ky) 2)) #s(hole binary64 (pow (sin ky) 2)))
#s(approx (+ (/ (- (cos (- kx kx)) (cos (+ kx kx))) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (pow kx 2) (pow (sin ky) 2))))
#s(approx (+ (/ (- (cos (- kx kx)) (cos (+ kx kx))) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (* (pow kx 2) (+ 1 (* -1/3 (pow kx 2)))) (pow (sin ky) 2))))
#s(approx (+ (/ (- (cos (- kx kx)) (cos (+ kx 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 (/ (- (cos (- kx kx)) (cos (+ kx kx))) 2) #s(hole binary64 (pow kx 2)))
#s(approx (/ (- (cos (- kx kx)) (cos (+ kx kx))) 2) #s(hole binary64 (* (pow kx 2) (+ 1 (* -1/3 (pow kx 2))))))
#s(approx (/ (- (cos (- kx kx)) (cos (+ kx kx))) 2) #s(hole binary64 (* (pow kx 2) (+ 1 (* (pow kx 2) (- (* 2/45 (pow kx 2)) 1/3))))))
#s(approx (/ (- (cos (- kx kx)) (cos (+ kx 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 (- (cos (- kx kx)) (cos (+ kx kx))) #s(hole binary64 (* 2 (pow kx 2))))
#s(approx (- (cos (- kx kx)) (cos (+ kx kx))) #s(hole binary64 (* (pow kx 2) (+ 2 (* -2/3 (pow kx 2))))))
#s(approx (- (cos (- kx kx)) (cos (+ kx kx))) #s(hole binary64 (* (pow kx 2) (+ 2 (* (pow kx 2) (- (* 4/45 (pow kx 2)) 2/3))))))
#s(approx (- (cos (- kx kx)) (cos (+ kx kx))) #s(hole binary64 (* (pow kx 2) (+ 2 (* (pow kx 2) (- (* (pow kx 2) (+ 4/45 (* -2/315 (pow kx 2)))) 2/3))))))
#s(approx (cos (- kx kx)) #s(hole binary64 1))
#s(approx (- kx kx) #s(hole binary64 0))
#s(approx (cos (+ kx kx)) #s(hole binary64 1))
#s(approx (cos (+ kx kx)) #s(hole binary64 (+ 1 (* -2 (pow kx 2)))))
#s(approx (cos (+ kx kx)) #s(hole binary64 (+ 1 (* (pow kx 2) (- (* 2/3 (pow kx 2)) 2)))))
#s(approx (cos (+ kx kx)) #s(hole binary64 (+ 1 (* (pow kx 2) (- (* (pow kx 2) (+ 2/3 (* -4/45 (pow kx 2)))) 2)))))
#s(approx (+ kx kx) #s(hole binary64 (* 2 kx)))
#s(approx (/ (* (sin th) (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(hole binary64 (sin th)))
#s(approx (/ (* (sin th) (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(hole binary64 (+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2))))))
#s(approx (/ (* (sin th) (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(hole binary64 (+ (sin th) (* (pow kx 2) (+ (* -1/2 (/ (sin th) (pow (sin ky) 2))) (* 1/2 (* (pow kx 2) (* (pow (sin ky) 2) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))))))))))))
#s(approx (/ (* (sin th) (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(hole binary64 (+ (sin th) (* (pow kx 2) (+ (* -1/2 (/ (sin th) (pow (sin ky) 2))) (* (pow kx 2) (+ (* -1/2 (* (pow kx 2) (* (pow (sin ky) 2) (* (sin th) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))) (pow (sin ky) 2))) (+ (* 2/45 (/ 1 (pow (sin ky) 4))) (+ (* 2/3 (/ 1 (pow (sin ky) 6))) (/ 1 (pow (sin ky) 8))))))))) (* 1/2 (* (pow (sin ky) 2) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6))))))))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
#s(approx (* (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (sin th)) (sin ky)) #s(hole binary64 (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
#s(approx (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (sin th)) #s(hole binary64 (* (sin th) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
#s(approx (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) #s(hole binary64 (sqrt (/ 1 (+ (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 (* (pow (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) 1/2) -1) (* (sin th) (sin ky))) #s(hole binary64 (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
#s(approx (pow (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) 1/2) -1) #s(hole binary64 (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))
#s(approx (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) 1/2) #s(hole binary64 (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
#s(approx (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) #s(hole binary64 (+ (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 (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
#s(approx (* (+ (cosh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1)) (sinh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1))) (sin ky)) #s(hole binary64 (* (sin ky) (+ (* 1/2 (+ (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* 1/2 (+ (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (* -1 (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))))
#s(approx (+ (cosh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1)) (sinh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1))) #s(hole binary64 (+ (* 1/2 (+ (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* 1/2 (+ (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (* -1 (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))
#s(approx (cosh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1)) #s(hole binary64 (* 1/2 (+ (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))
#s(approx (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1) #s(hole binary64 (* -1 (log (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
#s(approx (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(hole binary64 (log (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))
#s(approx (sinh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1)) #s(hole binary64 (* 1/2 (+ (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (* -1 (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (/ (- (cos (- kx kx)) (cos (+ kx kx))) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 kx)))) (pow (sin ky) 2)))))))
#s(approx (/ (sin ky) (sqrt (+ (/ (- (cos (- kx kx)) (cos (+ kx kx))) 2) (pow (sin ky) 2)))) #s(hole binary64 (* (sin ky) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 kx)))) (pow (sin ky) 2)))))))
#s(approx (sqrt (+ (/ (- (cos (- kx kx)) (cos (+ kx kx))) 2) (pow (sin ky) 2))) #s(hole binary64 (sqrt (+ (* 1/2 (- 1 (cos (* 2 kx)))) (pow (sin ky) 2)))))
#s(approx (+ (/ (- (cos (- kx kx)) (cos (+ kx kx))) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (* 1/2 (- 1 (cos (* 2 kx)))) (pow (sin ky) 2))))
#s(approx (/ (- (cos (- kx kx)) (cos (+ kx kx))) 2) #s(hole binary64 (* 1/2 (- 1 (cos (* 2 kx))))))
#s(approx (- (cos (- kx kx)) (cos (+ kx kx))) #s(hole binary64 (- 1 (cos (* 2 kx)))))
#s(approx (cos (+ kx kx)) #s(hole binary64 (cos (* 2 kx))))
#s(approx (/ (* (sin th) (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(hole binary64 (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (/ (- (cos (- kx kx)) (cos (+ kx kx))) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (neg (* -2 kx))))) (pow (sin ky) 2)))))))
#s(approx (/ (sin ky) (sqrt (+ (/ (- (cos (- kx kx)) (cos (+ kx kx))) 2) (pow (sin ky) 2)))) #s(hole binary64 (* (sin ky) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (neg (* -2 kx))))) (pow (sin ky) 2)))))))
#s(approx (sqrt (+ (/ (- (cos (- kx kx)) (cos (+ kx kx))) 2) (pow (sin ky) 2))) #s(hole binary64 (sqrt (+ (* 1/2 (- 1 (cos (neg (* -2 kx))))) (pow (sin ky) 2)))))
#s(approx (+ (/ (- (cos (- kx kx)) (cos (+ kx kx))) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (* 1/2 (- 1 (cos (neg (* -2 kx))))) (pow (sin ky) 2))))
#s(approx (/ (- (cos (- kx kx)) (cos (+ kx kx))) 2) #s(hole binary64 (* 1/2 (- 1 (cos (neg (* -2 kx)))))))
#s(approx (- (cos (- kx kx)) (cos (+ kx kx))) #s(hole binary64 (- 1 (cos (neg (* -2 kx))))))
#s(approx (cos (+ kx kx)) #s(hole binary64 (cos (neg (* -2 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (/ (* ky (sin th)) (sin kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (* ky (+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx))))) (/ (sin th) (sin kx))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (* ky (+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (* (pow ky 2) (+ (* 1/120 (/ (sin th) (sin kx))) (+ (* 1/12 (/ (sin th) (pow (sin kx) 3))) (* 1/2 (* (sin kx) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))))))))) (/ (sin th) (sin kx))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (* ky (+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (* (pow ky 2) (+ (* 1/120 (/ (sin th) (sin kx))) (+ (* 1/12 (/ (sin th) (pow (sin kx) 3))) (+ (* 1/2 (* (sin kx) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))) (* (pow ky 2) (+ (* -1/2 (* (sin kx) (* (sin th) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))) (pow (sin kx) 2))) (+ (* 2/45 (/ 1 (pow (sin kx) 4))) (+ (* 2/3 (/ 1 (pow (sin kx) 6))) (/ 1 (pow (sin kx) 8)))))))) (+ (* -1/12 (* (sin kx) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))) (+ (* -1/240 (/ (sin th) (pow (sin kx) 3))) (* -1/5040 (/ (sin th) (sin kx)))))))))))))) (/ (sin th) (sin kx))))))
#s(approx (* (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (sin th)) (sin ky)) #s(hole binary64 (/ (* ky (sin th)) (sin kx))))
#s(approx (* (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (sin th)) (sin ky)) #s(hole binary64 (* ky (+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx))))) (/ (sin th) (sin kx))))))
#s(approx (* (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (sin th)) (sin ky)) #s(hole binary64 (* ky (+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (* (pow ky 2) (+ (* 1/120 (/ (sin th) (sin kx))) (+ (* 1/12 (/ (sin th) (pow (sin kx) 3))) (* 1/2 (* (sin kx) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))))))))) (/ (sin th) (sin kx))))))
#s(approx (* (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (sin th)) (sin ky)) #s(hole binary64 (* ky (+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (* (pow ky 2) (+ (* 1/120 (/ (sin th) (sin kx))) (+ (* 1/12 (/ (sin th) (pow (sin kx) 3))) (+ (* 1/2 (* (sin kx) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))) (* (pow ky 2) (+ (* -1/2 (* (sin kx) (* (sin th) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))) (pow (sin kx) 2))) (+ (* 2/45 (/ 1 (pow (sin kx) 4))) (+ (* 2/3 (/ 1 (pow (sin kx) 6))) (/ 1 (pow (sin kx) 8)))))))) (+ (* -1/12 (* (sin kx) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))) (+ (* -1/240 (/ (sin th) (pow (sin kx) 3))) (* -1/5040 (/ (sin th) (sin kx)))))))))))))) (/ (sin th) (sin kx))))))
#s(approx (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (sin th)) #s(hole binary64 (/ (sin th) (sin kx))))
#s(approx (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (sin th)) #s(hole binary64 (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (sin th) (sin kx)))))
#s(approx (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (sin th)) #s(hole binary64 (+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* 1/2 (* (pow ky 2) (* (sin kx) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))))))))) (/ (sin th) (sin kx)))))
#s(approx (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (sin th)) #s(hole binary64 (+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* (pow ky 2) (+ (* -1/2 (* (pow ky 2) (* (sin kx) (* (sin th) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))) (pow (sin kx) 2))) (+ (* 2/45 (/ 1 (pow (sin kx) 4))) (+ (* 2/3 (/ 1 (pow (sin kx) 6))) (/ 1 (pow (sin kx) 8))))))))) (* 1/2 (* (sin kx) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))))))) (/ (sin th) (sin kx)))))
#s(approx (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) #s(hole binary64 (/ 1 (sin kx))))
#s(approx (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) #s(hole binary64 (+ (* -1/2 (/ (pow ky 2) (pow (sin kx) 3))) (/ 1 (sin kx)))))
#s(approx (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) #s(hole binary64 (+ (* (pow ky 2) (- (* 1/2 (* (pow ky 2) (* (sin kx) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))) (* 1/2 (/ 1 (pow (sin kx) 3))))) (/ 1 (sin kx)))))
#s(approx (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) #s(hole binary64 (+ (* (pow ky 2) (- (* (pow ky 2) (+ (* -1/2 (* (pow ky 2) (* (sin kx) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))) (pow (sin kx) 2))) (+ (* 2/45 (/ 1 (pow (sin kx) 4))) (+ (* 2/3 (/ 1 (pow (sin kx) 6))) (/ 1 (pow (sin kx) 8)))))))) (* 1/2 (* (sin kx) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))))))) (* 1/2 (/ 1 (pow (sin kx) 3))))) (/ 1 (sin kx)))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) #s(hole binary64 (sin kx)))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) #s(hole binary64 (+ (sin kx) (* 1/2 (/ (pow ky 2) (sin kx))))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) #s(hole binary64 (+ (sin kx) (* (pow ky 2) (+ (* -1/2 (/ (* (pow ky 2) (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2))))) (sin kx))) (* 1/2 (/ 1 (sin kx))))))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) #s(hole binary64 (+ (sin kx) (* (pow ky 2) (+ (* (pow ky 2) (+ (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (sin kx))) (* 1/2 (/ (* (pow ky 2) (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))))) (sin kx))))) (* 1/2 (/ 1 (sin kx))))))))
#s(approx (sin ky) #s(hole binary64 ky))
#s(approx (sin ky) #s(hole binary64 (* ky (+ 1 (* -1/6 (pow ky 2))))))
#s(approx (sin ky) #s(hole binary64 (* ky (+ 1 (* (pow ky 2) (- (* 1/120 (pow ky 2)) 1/6))))))
#s(approx (sin ky) #s(hole binary64 (* ky (+ 1 (* (pow ky 2) (- (* (pow ky 2) (+ 1/120 (* -1/5040 (pow ky 2)))) 1/6))))))
#s(approx ky #s(hole binary64 ky))
#s(approx (* (pow (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) 1/2) -1) (* (sin th) (sin ky))) #s(hole binary64 (/ (* ky (sin th)) (sin kx))))
#s(approx (* (pow (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) 1/2) -1) (* (sin th) (sin ky))) #s(hole binary64 (* ky (+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx))))) (/ (sin th) (sin kx))))))
#s(approx (* (pow (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) 1/2) -1) (* (sin th) (sin ky))) #s(hole binary64 (* ky (+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (* (pow ky 2) (+ (* 1/120 (/ (sin th) (sin kx))) (+ (* 1/12 (/ (sin th) (pow (sin kx) 3))) (* 1/2 (* (sin kx) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))))))))) (/ (sin th) (sin kx))))))
#s(approx (* (pow (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) 1/2) -1) (* (sin th) (sin ky))) #s(hole binary64 (* ky (+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (* (pow ky 2) (+ (* 1/120 (/ (sin th) (sin kx))) (+ (* 1/12 (/ (sin th) (pow (sin kx) 3))) (+ (* 1/2 (* (sin kx) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))) (* (pow ky 2) (+ (* -1/2 (* (sin kx) (* (sin th) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))) (pow (sin kx) 2))) (+ (* 2/45 (/ 1 (pow (sin kx) 4))) (+ (* 2/3 (/ 1 (pow (sin kx) 6))) (/ 1 (pow (sin kx) 8)))))))) (+ (* -1/12 (* (sin kx) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))) (+ (* -1/240 (/ (sin th) (pow (sin kx) 3))) (* -1/5040 (/ (sin th) (sin kx)))))))))))))) (/ (sin th) (sin kx))))))
#s(approx (pow (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) 1/2) -1) #s(hole binary64 (/ 1 (sin kx))))
#s(approx (pow (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) 1/2) -1) #s(hole binary64 (+ (* -1/2 (/ (pow ky 2) (pow (sin kx) 3))) (/ 1 (sin kx)))))
#s(approx (pow (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) 1/2) -1) #s(hole binary64 (+ (* (pow ky 2) (- (* 1/2 (* (pow ky 2) (* (sin kx) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))) (* 1/2 (/ 1 (pow (sin kx) 3))))) (/ 1 (sin kx)))))
#s(approx (pow (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) 1/2) -1) #s(hole binary64 (+ (* (pow ky 2) (- (* (pow ky 2) (+ (* -1/2 (* (pow ky 2) (* (sin kx) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))) (pow (sin kx) 2))) (+ (* 2/45 (/ 1 (pow (sin kx) 4))) (+ (* 2/3 (/ 1 (pow (sin kx) 6))) (/ 1 (pow (sin kx) 8)))))))) (* 1/2 (* (sin kx) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))))))) (* 1/2 (/ 1 (pow (sin kx) 3))))) (/ 1 (sin kx)))))
#s(approx (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) 1/2) #s(hole binary64 (sin kx)))
#s(approx (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) 1/2) #s(hole binary64 (+ (sin kx) (* 1/2 (/ (pow ky 2) (sin kx))))))
#s(approx (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) 1/2) #s(hole binary64 (+ (sin kx) (* (pow ky 2) (+ (* -1/2 (/ (* (pow ky 2) (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2))))) (sin kx))) (* 1/2 (/ 1 (sin kx))))))))
#s(approx (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) 1/2) #s(hole binary64 (+ (sin kx) (* (pow ky 2) (+ (* (pow ky 2) (+ (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (sin kx))) (* 1/2 (/ (* (pow ky 2) (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))))) (sin kx))))) (* 1/2 (/ 1 (sin kx))))))))
#s(approx (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) #s(hole binary64 (pow (sin kx) 2)))
#s(approx (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) #s(hole binary64 (+ (pow ky 2) (pow (sin kx) 2))))
#s(approx (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) #s(hole binary64 (+ (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2)))) (pow (sin kx) 2))))
#s(approx (+ (* (sin kx) (sin kx)) (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 th) (sin ky)) #s(hole binary64 (* ky (sin th))))
#s(approx (* (sin th) (sin ky)) #s(hole binary64 (* ky (+ (sin th) (* -1/6 (* (pow ky 2) (sin th)))))))
#s(approx (* (sin th) (sin ky)) #s(hole binary64 (* ky (+ (sin th) (* (pow ky 2) (+ (* -1/6 (sin th)) (* 1/120 (* (pow ky 2) (sin th)))))))))
#s(approx (* (sin th) (sin ky)) #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 (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (/ ky (sin kx))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (* ky (+ (* -1 (* (pow ky 2) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx))))))
#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 (sin kx))) (+ (* 1/2 (* (sin kx) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))))) (* 1/12 (/ 1 (pow (sin kx) 3)))))) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx))))))
#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 (sin kx))) (+ (* 1/12 (/ 1 (pow (sin kx) 3))) (+ (* 1/2 (* (sin kx) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))))) (* (pow ky 2) (- (+ (* -1/2 (* (sin kx) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))) (pow (sin kx) 2))) (+ (* 2/45 (/ 1 (pow (sin kx) 4))) (+ (* 2/3 (/ 1 (pow (sin kx) 6))) (/ 1 (pow (sin kx) 8))))))) (* -1/12 (* (sin kx) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))) (+ (* 1/5040 (/ 1 (sin kx))) (* 1/240 (/ 1 (pow (sin kx) 3)))))))))) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx))))))
#s(approx (* (+ (cosh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1)) (sinh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1))) (sin ky)) #s(hole binary64 (* ky (+ (* 1/2 (+ (sin kx) (/ 1 (sin kx)))) (* 1/2 (+ (* -1 (sin kx)) (/ 1 (sin kx))))))))
#s(approx (* (+ (cosh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1)) (sinh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1))) (sin ky)) #s(hole binary64 (* ky (+ (* 1/2 (+ (sin kx) (/ 1 (sin kx)))) (+ (* 1/2 (+ (* -1 (sin kx)) (/ 1 (sin kx)))) (* (pow ky 2) (+ (* -1/2 (+ (* 1/2 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3))))) (+ (* -1/6 (+ (* 1/2 (+ (sin kx) (/ 1 (sin kx)))) (* 1/2 (+ (* -1 (sin kx)) (/ 1 (sin kx)))))) (* 1/2 (- (* 1/2 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))))))))))
#s(approx (* (+ (cosh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1)) (sinh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1))) (sin ky)) #s(hole binary64 (* ky (+ (* 1/2 (+ (sin kx) (/ 1 (sin kx)))) (+ (* 1/2 (+ (* -1 (sin kx)) (/ 1 (sin kx)))) (* (pow ky 2) (+ (* -1/2 (+ (* 1/2 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3))))) (+ (* -1/6 (+ (* 1/2 (+ (sin kx) (/ 1 (sin kx)))) (* 1/2 (+ (* -1 (sin kx)) (/ 1 (sin kx)))))) (+ (* 1/2 (- (* 1/2 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3))))) (* (pow ky 2) (+ (* -1/6 (+ (* -1/2 (+ (* 1/2 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3))))) (* 1/2 (- (* 1/2 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3))))))) (+ (* 1/120 (+ (* 1/2 (+ (sin kx) (/ 1 (sin kx)))) (* 1/2 (+ (* -1 (sin kx)) (/ 1 (sin kx)))))) (+ (* 1/2 (- (+ (* -1/24 (/ (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))) (* 3 (/ 1 (pow (sin kx) 4)))) (sin kx))) (* 1/8 (/ 1 (pow (sin kx) 5)))) (+ (* -1 (* (sin kx) (+ (* -1/24 (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))) (* 3 (/ 1 (pow (sin kx) 4))))) (* 1/8 (/ 1 (pow (sin kx) 4)))))) (* 1/4 (/ 1 (pow (sin kx) 3)))))) (* 1/2 (- (+ (* -1/24 (/ (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))) (* 3 (/ 1 (pow (sin kx) 4)))) (sin kx))) (+ (* 1/8 (/ 1 (pow (sin kx) 5))) (* 1/4 (/ 1 (pow (sin kx) 3))))) (* (sin kx) (+ (* -1/24 (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))) (* 3 (/ 1 (pow (sin kx) 4))))) (* 1/8 (/ 1 (pow (sin kx) 4))))))))))))))))))))
#s(approx (* (+ (cosh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1)) (sinh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1))) (sin ky)) #s(hole binary64 (* ky (+ (* 1/2 (+ (sin kx) (/ 1 (sin kx)))) (+ (* 1/2 (+ (* -1 (sin kx)) (/ 1 (sin kx)))) (* (pow ky 2) (+ (* -1/2 (+ (* 1/2 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3))))) (+ (* -1/6 (+ (* 1/2 (+ (sin kx) (/ 1 (sin kx)))) (* 1/2 (+ (* -1 (sin kx)) (/ 1 (sin kx)))))) (+ (* 1/2 (- (* 1/2 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3))))) (* (pow ky 2) (+ (* -1/6 (+ (* -1/2 (+ (* 1/2 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3))))) (* 1/2 (- (* 1/2 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3))))))) (+ (* 1/120 (+ (* 1/2 (+ (sin kx) (/ 1 (sin kx)))) (* 1/2 (+ (* -1 (sin kx)) (/ 1 (sin kx)))))) (+ (* 1/2 (- (+ (* -1/24 (/ (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))) (* 3 (/ 1 (pow (sin kx) 4)))) (sin kx))) (* 1/8 (/ 1 (pow (sin kx) 5)))) (+ (* -1 (* (sin kx) (+ (* -1/24 (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))) (* 3 (/ 1 (pow (sin kx) 4))))) (* 1/8 (/ 1 (pow (sin kx) 4)))))) (* 1/4 (/ 1 (pow (sin kx) 3)))))) (+ (* 1/2 (- (+ (* -1/24 (/ (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))) (* 3 (/ 1 (pow (sin kx) 4)))) (sin kx))) (+ (* 1/8 (/ 1 (pow (sin kx) 5))) (* 1/4 (/ 1 (pow (sin kx) 3))))) (* (sin kx) (+ (* -1/24 (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))) (* 3 (/ 1 (pow (sin kx) 4))))) (* 1/8 (/ 1 (pow (sin kx) 4))))))) (* (pow ky 2) (+ (* -1/6 (+ (* 1/2 (- (+ (* -1/24 (/ (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))) (* 3 (/ 1 (pow (sin kx) 4)))) (sin kx))) (* 1/8 (/ 1 (pow (sin kx) 5)))) (+ (* -1 (* (sin kx) (+ (* -1/24 (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))) (* 3 (/ 1 (pow (sin kx) 4))))) (* 1/8 (/ 1 (pow (sin kx) 4)))))) (* 1/4 (/ 1 (pow (sin kx) 3)))))) (* 1/2 (- (+ (* -1/24 (/ (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))) (* 3 (/ 1 (pow (sin kx) 4)))) (sin kx))) (+ (* 1/8 (/ 1 (pow (sin kx) 5))) (* 1/4 (/ 1 (pow (sin kx) 3))))) (* (sin kx) (+ (* -1/24 (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))) (* 3 (/ 1 (pow (sin kx) 4))))) (* 1/8 (/ 1 (pow (sin kx) 4))))))))) (+ (* -1/5040 (+ (* 1/2 (+ (sin kx) (/ 1 (sin kx)))) (* 1/2 (+ (* -1 (sin kx)) (/ 1 (sin kx)))))) (+ (* 1/120 (+ (* -1/2 (+ (* 1/2 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3))))) (* 1/2 (- (* 1/2 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3))))))) (+ (* 1/2 (- (+ (* -1/720 (/ (+ (* 180 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 4))) (+ (* 360 (/ (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2)))) (pow (sin kx) 2))) (* 30 (/ 1 (pow (sin kx) 6))))) (sin kx))) (* 1/48 (/ (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))) (* 3 (/ 1 (pow (sin kx) 4)))) (pow (sin kx) 3)))) (+ (* -1 (* (sin kx) (- (+ (* -1/720 (+ (* 30 (/ 1 (pow (sin kx) 6))) (+ (* 180 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 4))) (* 360 (/ (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2)))) (pow (sin kx) 2)))))) (* 1/48 (/ (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))) (* 3 (/ 1 (pow (sin kx) 4)))) (pow (sin kx) 2)))) (* 1/48 (/ 1 (pow (sin kx) 6)))))) (+ (* -1/2 (/ (+ (* -1/24 (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))) (* 3 (/ 1 (pow (sin kx) 4))))) (* 1/8 (/ 1 (pow (sin kx) 4)))) (sin kx))) (+ (* 1/48 (/ 1 (pow (sin kx) 7))) (* 1/2 (/ (+ (* -1 (* (sin kx) (+ (* -1/24 (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))) (* 3 (/ 1 (pow (sin kx) 4))))) (* 1/8 (/ 1 (pow (sin kx) 4)))))) (* 1/4 (/ 1 (pow (sin kx) 3)))) (pow (sin kx) 2)))))))) (* 1/2 (- (+ (* -1/720 (/ (+ (* 180 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 4))) (+ (* 360 (/ (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2)))) (pow (sin kx) 2))) (* 30 (/ 1 (pow (sin kx) 6))))) (sin kx))) (* 1/48 (/ (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))) (* 3 (/ 1 (pow (sin kx) 4)))) (pow (sin kx) 3)))) (+ (* -1/2 (/ (- (* 1/4 (/ 1 (pow (sin kx) 3))) (* (sin kx) (+ (* -1/24 (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))) (* 3 (/ 1 (pow (sin kx) 4))))) (* 1/8 (/ 1 (pow (sin kx) 4)))))) (pow (sin kx) 2))) (+ (* 1/48 (/ 1 (pow (sin kx) 7))) (+ (* 1/2 (/ (+ (* -1/24 (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))) (* 3 (/ 1 (pow (sin kx) 4))))) (* 1/8 (/ 1 (pow (sin kx) 4)))) (sin kx))) (* (sin kx) (- (+ (* -1/720 (+ (* 30 (/ 1 (pow (sin kx) 6))) (+ (* 180 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 4))) (* 360 (/ (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2)))) (pow (sin kx) 2)))))) (* 1/48 (/ (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))) (* 3 (/ 1 (pow (sin kx) 4)))) (pow (sin kx) 2)))) (* 1/48 (/ 1 (pow (sin kx) 6)))))))))))))))))))))))))))))
#s(approx (+ (cosh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1)) (sinh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1))) #s(hole binary64 (+ (* 1/2 (+ (sin kx) (/ 1 (sin kx)))) (* 1/2 (+ (* -1 (sin kx)) (/ 1 (sin kx)))))))
#s(approx (+ (cosh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1)) (sinh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1))) #s(hole binary64 (+ (* 1/2 (+ (sin kx) (/ 1 (sin kx)))) (+ (* 1/2 (+ (* -1 (sin kx)) (/ 1 (sin kx)))) (* (pow ky 2) (+ (* -1/2 (+ (* 1/2 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3))))) (* 1/2 (- (* 1/2 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))))))))
#s(approx (+ (cosh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1)) (sinh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1))) #s(hole binary64 (+ (* 1/2 (+ (sin kx) (/ 1 (sin kx)))) (+ (* 1/2 (+ (* -1 (sin kx)) (/ 1 (sin kx)))) (* (pow ky 2) (+ (* -1/2 (+ (* 1/2 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3))))) (+ (* 1/2 (- (* 1/2 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3))))) (* (pow ky 2) (+ (* 1/2 (- (+ (* -1/24 (/ (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))) (* 3 (/ 1 (pow (sin kx) 4)))) (sin kx))) (* 1/8 (/ 1 (pow (sin kx) 5)))) (+ (* -1 (* (sin kx) (+ (* -1/24 (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))) (* 3 (/ 1 (pow (sin kx) 4))))) (* 1/8 (/ 1 (pow (sin kx) 4)))))) (* 1/4 (/ 1 (pow (sin kx) 3)))))) (* 1/2 (- (+ (* -1/24 (/ (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))) (* 3 (/ 1 (pow (sin kx) 4)))) (sin kx))) (+ (* 1/8 (/ 1 (pow (sin kx) 5))) (* 1/4 (/ 1 (pow (sin kx) 3))))) (* (sin kx) (+ (* -1/24 (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))) (* 3 (/ 1 (pow (sin kx) 4))))) (* 1/8 (/ 1 (pow (sin kx) 4))))))))))))))))
#s(approx (+ (cosh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1)) (sinh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1))) #s(hole binary64 (+ (* 1/2 (+ (sin kx) (/ 1 (sin kx)))) (+ (* 1/2 (+ (* -1 (sin kx)) (/ 1 (sin kx)))) (* (pow ky 2) (+ (* -1/2 (+ (* 1/2 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3))))) (+ (* 1/2 (- (* 1/2 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3))))) (* (pow ky 2) (+ (* 1/2 (- (+ (* -1/24 (/ (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))) (* 3 (/ 1 (pow (sin kx) 4)))) (sin kx))) (* 1/8 (/ 1 (pow (sin kx) 5)))) (+ (* -1 (* (sin kx) (+ (* -1/24 (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))) (* 3 (/ 1 (pow (sin kx) 4))))) (* 1/8 (/ 1 (pow (sin kx) 4)))))) (* 1/4 (/ 1 (pow (sin kx) 3)))))) (+ (* 1/2 (- (+ (* -1/24 (/ (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))) (* 3 (/ 1 (pow (sin kx) 4)))) (sin kx))) (+ (* 1/8 (/ 1 (pow (sin kx) 5))) (* 1/4 (/ 1 (pow (sin kx) 3))))) (* (sin kx) (+ (* -1/24 (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))) (* 3 (/ 1 (pow (sin kx) 4))))) (* 1/8 (/ 1 (pow (sin kx) 4))))))) (* (pow ky 2) (+ (* 1/2 (- (+ (* -1/720 (/ (+ (* 30 (/ 1 (pow (sin kx) 6))) (+ (* 180 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 4))) (* 360 (/ (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2)))) (pow (sin kx) 2))))) (sin kx))) (* 1/48 (/ (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))) (* 3 (/ 1 (pow (sin kx) 4)))) (pow (sin kx) 3)))) (+ (* -1 (* (sin kx) (- (+ (* -1/720 (+ (* 180 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 4))) (+ (* 360 (/ (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2)))) (pow (sin kx) 2))) (* 30 (/ 1 (pow (sin kx) 6)))))) (* 1/48 (/ (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))) (* 3 (/ 1 (pow (sin kx) 4)))) (pow (sin kx) 2)))) (* 1/48 (/ 1 (pow (sin kx) 6)))))) (+ (* -1/2 (/ (+ (* -1/24 (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))) (* 3 (/ 1 (pow (sin kx) 4))))) (* 1/8 (/ 1 (pow (sin kx) 4)))) (sin kx))) (+ (* 1/48 (/ 1 (pow (sin kx) 7))) (* 1/2 (/ (+ (* -1 (* (sin kx) (+ (* -1/24 (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))) (* 3 (/ 1 (pow (sin kx) 4))))) (* 1/8 (/ 1 (pow (sin kx) 4)))))) (* 1/4 (/ 1 (pow (sin kx) 3)))) (pow (sin kx) 2)))))))) (* 1/2 (- (+ (* -1/720 (/ (+ (* 30 (/ 1 (pow (sin kx) 6))) (+ (* 180 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 4))) (* 360 (/ (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2)))) (pow (sin kx) 2))))) (sin kx))) (* 1/48 (/ (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))) (* 3 (/ 1 (pow (sin kx) 4)))) (pow (sin kx) 3)))) (+ (* -1/2 (/ (- (* 1/4 (/ 1 (pow (sin kx) 3))) (* (sin kx) (+ (* -1/24 (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))) (* 3 (/ 1 (pow (sin kx) 4))))) (* 1/8 (/ 1 (pow (sin kx) 4)))))) (pow (sin kx) 2))) (+ (* 1/48 (/ 1 (pow (sin kx) 7))) (+ (* 1/2 (/ (+ (* -1/24 (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))) (* 3 (/ 1 (pow (sin kx) 4))))) (* 1/8 (/ 1 (pow (sin kx) 4)))) (sin kx))) (* (sin kx) (- (+ (* -1/720 (+ (* 180 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 4))) (+ (* 360 (/ (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2)))) (pow (sin kx) 2))) (* 30 (/ 1 (pow (sin kx) 6)))))) (* 1/48 (/ (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))) (* 3 (/ 1 (pow (sin kx) 4)))) (pow (sin kx) 2)))) (* 1/48 (/ 1 (pow (sin kx) 6))))))))))))))))))))))
#s(approx (cosh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1)) #s(hole binary64 (* 1/2 (+ (sin kx) (/ 1 (sin kx))))))
#s(approx (cosh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1)) #s(hole binary64 (+ (* 1/2 (* (pow ky 2) (- (* 1/2 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (* 1/2 (+ (sin kx) (/ 1 (sin kx)))))))
#s(approx (cosh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1)) #s(hole binary64 (+ (* 1/2 (+ (sin kx) (/ 1 (sin kx)))) (* (pow ky 2) (+ (* 1/2 (* (pow ky 2) (- (+ (* -1/24 (/ (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))) (* 3 (/ 1 (pow (sin kx) 4)))) (sin kx))) (+ (* 1/8 (/ 1 (pow (sin kx) 5))) (* 1/4 (/ 1 (pow (sin kx) 3))))) (* (sin kx) (+ (* -1/24 (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))) (* 3 (/ 1 (pow (sin kx) 4))))) (* 1/8 (/ 1 (pow (sin kx) 4)))))))) (* 1/2 (- (* 1/2 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3))))))))))
#s(approx (cosh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1)) #s(hole binary64 (+ (* 1/2 (+ (sin kx) (/ 1 (sin kx)))) (* (pow ky 2) (+ (* 1/2 (- (* 1/2 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3))))) (* (pow ky 2) (+ (* 1/2 (* (pow ky 2) (- (+ (* -1/720 (/ (+ (* 180 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 4))) (+ (* 360 (/ (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2)))) (pow (sin kx) 2))) (* 30 (/ 1 (pow (sin kx) 6))))) (sin kx))) (* 1/48 (/ (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))) (* 3 (/ 1 (pow (sin kx) 4)))) (pow (sin kx) 3)))) (+ (* -1/2 (/ (- (* 1/4 (/ 1 (pow (sin kx) 3))) (* (sin kx) (+ (* -1/24 (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))) (* 3 (/ 1 (pow (sin kx) 4))))) (* 1/8 (/ 1 (pow (sin kx) 4)))))) (pow (sin kx) 2))) (+ (* 1/48 (/ 1 (pow (sin kx) 7))) (+ (* 1/2 (/ (+ (* -1/24 (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))) (* 3 (/ 1 (pow (sin kx) 4))))) (* 1/8 (/ 1 (pow (sin kx) 4)))) (sin kx))) (* (sin kx) (- (+ (* -1/720 (+ (* 30 (/ 1 (pow (sin kx) 6))) (+ (* 180 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 4))) (* 360 (/ (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2)))) (pow (sin kx) 2)))))) (* 1/48 (/ (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))) (* 3 (/ 1 (pow (sin kx) 4)))) (pow (sin kx) 2)))) (* 1/48 (/ 1 (pow (sin kx) 6))))))))))) (* 1/2 (- (+ (* -1/24 (/ (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))) (* 3 (/ 1 (pow (sin kx) 4)))) (sin kx))) (+ (* 1/8 (/ 1 (pow (sin kx) 5))) (* 1/4 (/ 1 (pow (sin kx) 3))))) (* (sin kx) (+ (* -1/24 (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))) (* 3 (/ 1 (pow (sin kx) 4))))) (* 1/8 (/ 1 (pow (sin kx) 4))))))))))))))
#s(approx (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1) #s(hole binary64 (* -1 (log (sin kx)))))
#s(approx (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1) #s(hole binary64 (+ (* -1 (log (sin kx))) (* -1/2 (/ (pow ky 2) (pow (sin kx) 2))))))
#s(approx (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1) #s(hole binary64 (+ (* -1 (log (sin kx))) (* (pow ky 2) (- (* -1/24 (* (pow ky 2) (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))) (* 3 (/ 1 (pow (sin kx) 4)))))) (* 1/2 (/ 1 (pow (sin kx) 2))))))))
#s(approx (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1) #s(hole binary64 (+ (* -1 (log (sin kx))) (* (pow ky 2) (- (* (pow ky 2) (+ (* -1/24 (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))) (* 3 (/ 1 (pow (sin kx) 4))))) (* -1/720 (* (pow ky 2) (+ (* 30 (/ 1 (pow (sin kx) 6))) (+ (* 180 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 4))) (* 360 (/ (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2)))) (pow (sin kx) 2))))))))) (* 1/2 (/ 1 (pow (sin kx) 2))))))))
#s(approx (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(hole binary64 (log (sin kx))))
#s(approx (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(hole binary64 (+ (log (sin kx)) (* 1/2 (/ (pow ky 2) (pow (sin kx) 2))))))
#s(approx (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(hole binary64 (+ (log (sin kx)) (* (pow ky 2) (+ (* 1/24 (* (pow ky 2) (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))) (* 3 (/ 1 (pow (sin kx) 4)))))) (* 1/2 (/ 1 (pow (sin kx) 2))))))))
#s(approx (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(hole binary64 (+ (log (sin kx)) (* (pow ky 2) (+ (* (pow ky 2) (+ (* 1/720 (* (pow ky 2) (+ (* 180 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 4))) (+ (* 360 (/ (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2)))) (pow (sin kx) 2))) (* 30 (/ 1 (pow (sin kx) 6))))))) (* 1/24 (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))) (* 3 (/ 1 (pow (sin kx) 4))))))) (* 1/2 (/ 1 (pow (sin kx) 2))))))))
#s(approx (sinh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1)) #s(hole binary64 (* 1/2 (+ (* -1 (sin kx)) (/ 1 (sin kx))))))
#s(approx (sinh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1)) #s(hole binary64 (+ (* -1/2 (* (pow ky 2) (+ (* 1/2 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (* 1/2 (+ (* -1 (sin kx)) (/ 1 (sin kx)))))))
#s(approx (sinh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1)) #s(hole binary64 (+ (* 1/2 (+ (* -1 (sin kx)) (/ 1 (sin kx)))) (* (pow ky 2) (+ (* -1/2 (+ (* 1/2 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3))))) (* 1/2 (* (pow ky 2) (- (+ (* -1/24 (/ (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))) (* 3 (/ 1 (pow (sin kx) 4)))) (sin kx))) (* 1/8 (/ 1 (pow (sin kx) 5)))) (+ (* -1 (* (sin kx) (+ (* -1/24 (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))) (* 3 (/ 1 (pow (sin kx) 4))))) (* 1/8 (/ 1 (pow (sin kx) 4)))))) (* 1/4 (/ 1 (pow (sin kx) 3))))))))))))
#s(approx (sinh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1)) #s(hole binary64 (+ (* 1/2 (+ (* -1 (sin kx)) (/ 1 (sin kx)))) (* (pow ky 2) (+ (* -1/2 (+ (* 1/2 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3))))) (* (pow ky 2) (+ (* 1/2 (* (pow ky 2) (- (+ (* -1/720 (/ (+ (* 180 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 4))) (+ (* 360 (/ (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2)))) (pow (sin kx) 2))) (* 30 (/ 1 (pow (sin kx) 6))))) (sin kx))) (* 1/48 (/ (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))) (* 3 (/ 1 (pow (sin kx) 4)))) (pow (sin kx) 3)))) (+ (* -1 (* (sin kx) (- (+ (* -1/720 (+ (* 30 (/ 1 (pow (sin kx) 6))) (+ (* 180 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 4))) (* 360 (/ (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2)))) (pow (sin kx) 2)))))) (* 1/48 (/ (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))) (* 3 (/ 1 (pow (sin kx) 4)))) (pow (sin kx) 2)))) (* 1/48 (/ 1 (pow (sin kx) 6)))))) (+ (* -1/2 (/ (+ (* -1/24 (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))) (* 3 (/ 1 (pow (sin kx) 4))))) (* 1/8 (/ 1 (pow (sin kx) 4)))) (sin kx))) (+ (* 1/48 (/ 1 (pow (sin kx) 7))) (* 1/2 (/ (+ (* -1 (* (sin kx) (+ (* -1/24 (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))) (* 3 (/ 1 (pow (sin kx) 4))))) (* 1/8 (/ 1 (pow (sin kx) 4)))))) (* 1/4 (/ 1 (pow (sin kx) 3)))) (pow (sin kx) 2))))))))) (* 1/2 (- (+ (* -1/24 (/ (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))) (* 3 (/ 1 (pow (sin kx) 4)))) (sin kx))) (* 1/8 (/ 1 (pow (sin kx) 5)))) (+ (* -1 (* (sin kx) (+ (* -1/24 (- (* -12 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))) (* 3 (/ 1 (pow (sin kx) 4))))) (* 1/8 (/ 1 (pow (sin kx) 4)))))) (* 1/4 (/ 1 (pow (sin kx) 3)))))))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (/ (- (cos (- kx kx)) (cos (+ kx kx))) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (* (* ky (* (sin th) (sqrt 2))) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (/ (- (cos (- kx kx)) (cos (+ kx kx))) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (* ky (+ (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ (sin th) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* -1/6 (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (/ (- (cos (- kx kx)) (cos (+ kx kx))) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (* ky (+ (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ (sin th) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (+ (* -1/6 (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (* (pow ky 2) (+ (* 1/120 (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (+ (* 1/3 (* (/ (sin th) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* 1/2 (* (/ (* (sin th) (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3)))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx))))))))))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (/ (- (cos (- kx kx)) (cos (+ kx kx))) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (* ky (+ (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ (sin th) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (+ (* -1/6 (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (* (pow ky 2) (+ (* 1/120 (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (+ (* 1/3 (* (/ (sin th) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (+ (* 1/2 (* (/ (* (sin th) (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3)))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -1/2 (* (/ (* (sin th) (+ (* -2 (/ (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3))))) (* (pow (sqrt 2) 2) (- 1 (cos (* 2 kx)))))) (+ (* 8/45 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (+ (* 2 (/ (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (- 1 (cos (* 2 kx))))) (* 8/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))) (+ (* -1/12 (* (/ (* (sin th) (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3)))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))) (+ (* -1/60 (* (/ (sin th) (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* -1/5040 (* (* (sin th) (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))))))))))))))))))
#s(approx (/ (sin ky) (sqrt (+ (/ (- (cos (- kx kx)) (cos (+ kx kx))) 2) (pow (sin ky) 2)))) #s(hole binary64 (* (* ky (sqrt 2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))))
#s(approx (/ (sin ky) (sqrt (+ (/ (- (cos (- kx kx)) (cos (+ kx kx))) 2) (pow (sin ky) 2)))) #s(hole binary64 (* ky (+ (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ 1 (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* -1/6 (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))))))))))
#s(approx (/ (sin ky) (sqrt (+ (/ (- (cos (- kx kx)) (cos (+ kx kx))) 2) (pow (sin ky) 2)))) #s(hole binary64 (* ky (+ (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ 1 (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (+ (* -1/6 (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (* (pow ky 2) (+ (* 1/120 (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (+ (* 1/3 (* (/ 1 (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* 1/2 (* (/ (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx))))))))))))))))
#s(approx (/ (sin ky) (sqrt (+ (/ (- (cos (- kx kx)) (cos (+ kx kx))) 2) (pow (sin ky) 2)))) #s(hole binary64 (* ky (+ (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -2 (* (/ 1 (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (+ (* -1/6 (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (* (pow ky 2) (+ (* 1/120 (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (+ (* 1/3 (* (/ 1 (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (+ (* 1/2 (* (/ (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -1/2 (* (/ (+ (* -2 (/ (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3))))) (* (pow (sqrt 2) 2) (- 1 (cos (* 2 kx)))))) (+ (* 8/45 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (+ (* 2 (/ (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (- 1 (cos (* 2 kx))))) (* 8/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))) (+ (* -1/12 (* (/ (- (+ (* 4/3 (/ 1 (pow (- 1 (cos (* 2 kx))) 2))) (* 8 (/ 1 (pow (- 1 (cos (* 2 kx))) 3)))) (* 4 (/ 1 (* (pow (sqrt 2) 2) (pow (- 1 (cos (* 2 kx))) 3))))) (sqrt 2)) (sqrt (- 1 (cos (* 2 kx)))))) (+ (* -1/60 (* (/ 1 (sqrt 2)) (sqrt (/ 1 (pow (- 1 (cos (* 2 kx))) 3))))) (* -1/5040 (* (sqrt 2) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))))))))))))))))))
#s(approx (sqrt (+ (/ (- (cos (- kx kx)) (cos (+ kx kx))) 2) (pow (sin ky) 2))) #s(hole binary64 (* (sqrt 1/2) (sqrt (- 1 (cos (* 2 kx)))))))
#s(approx (sqrt (+ (/ (- (cos (- kx kx)) (cos (+ kx kx))) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (* 1/2 (* (/ (pow ky 2) (sqrt 1/2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (* (sqrt 1/2) (sqrt (- 1 (cos (* 2 kx))))))))
#s(approx (sqrt (+ (/ (- (cos (- kx kx)) (cos (+ kx kx))) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (* (sqrt 1/2) (sqrt (- 1 (cos (* 2 kx))))) (* (pow ky 2) (+ (* -1/2 (* (/ (* (pow ky 2) (+ 1/3 (* 1/4 (/ 1 (* (pow (sqrt 1/2) 2) (- 1 (cos (* 2 kx)))))))) (sqrt 1/2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (* 1/2 (* (/ 1 (sqrt 1/2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))))))))
#s(approx (sqrt (+ (/ (- (cos (- kx kx)) (cos (+ kx kx))) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (* (sqrt 1/2) (sqrt (- 1 (cos (* 2 kx))))) (* (pow ky 2) (+ (* 1/2 (* (/ 1 (sqrt 1/2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (* (pow ky 2) (+ (* -1/2 (* (/ (+ 1/3 (* 1/4 (/ 1 (* (pow (sqrt 1/2) 2) (- 1 (cos (* 2 kx))))))) (sqrt 1/2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))) (* 1/2 (* (/ (* (pow ky 2) (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (* (pow (sqrt 1/2) 2) (- 1 (cos (* 2 kx))))))) (* (pow (sqrt 1/2) 2) (- 1 (cos (* 2 kx)))))))) (sqrt 1/2)) (sqrt (/ 1 (- 1 (cos (* 2 kx))))))))))))))
#s(approx (+ (/ (- (cos (- kx kx)) (cos (+ kx kx))) 2) (pow (sin ky) 2)) #s(hole binary64 (* 1/2 (- 1 (cos (* 2 kx))))))
#s(approx (+ (/ (- (cos (- kx kx)) (cos (+ kx kx))) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (* 1/2 (- 1 (cos (* 2 kx)))) (pow ky 2))))
#s(approx (+ (/ (- (cos (- kx kx)) (cos (+ kx kx))) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (* 1/2 (- 1 (cos (* 2 kx)))) (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2)))))))
#s(approx (+ (/ (- (cos (- kx kx)) (cos (+ kx kx))) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (* 1/2 (- 1 (cos (* 2 kx)))) (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3)))))))
#s(approx (/ (* (sin th) (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(hole binary64 (/ (* ky (sin th)) (sin kx))))
#s(approx (/ (* (sin th) (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(hole binary64 (* ky (+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx))))) (/ (sin th) (sin kx))))))
#s(approx (/ (* (sin th) (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(hole binary64 (* ky (+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (* (pow ky 2) (+ (* 1/120 (/ (sin th) (sin kx))) (+ (* 1/12 (/ (sin th) (pow (sin kx) 3))) (* 1/2 (* (sin kx) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))))))))) (/ (sin th) (sin kx))))))
#s(approx (/ (* (sin th) (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(hole binary64 (* ky (+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (* (pow ky 2) (+ (* 1/120 (/ (sin th) (sin kx))) (+ (* 1/12 (/ (sin th) (pow (sin kx) 3))) (+ (* 1/2 (* (sin kx) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))) (* (pow ky 2) (+ (* -1/2 (* (sin kx) (* (sin th) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))) (pow (sin kx) 2))) (+ (* 2/45 (/ 1 (pow (sin kx) 4))) (+ (* 2/3 (/ 1 (pow (sin kx) 6))) (/ 1 (pow (sin kx) 8)))))))) (+ (* -1/12 (* (sin kx) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))) (+ (* -1/240 (/ (sin th) (pow (sin kx) 3))) (* -1/5040 (/ (sin th) (sin kx)))))))))))))) (/ (sin th) (sin kx))))))
#s(approx (sin ky) #s(hole binary64 (sin ky)))
#s(approx (pow (sin ky) 2) #s(hole binary64 (pow (sin ky) 2)))
#s(approx (* (sin th) (sin ky)) #s(hole binary64 (* (sin ky) (sin th))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (* (* th (sin ky)) (sqrt (/ 1 (+ (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 (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* (sin ky) (sqrt (/ 1 (+ (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 (+ (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* (pow th 2) (+ (* -1/6 (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* 1/120 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ (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 (+ (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* (pow th 2) (+ (* -1/6 (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* (pow th 2) (+ (* -1/5040 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* 1/120 (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))))))))
#s(approx (* (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (sin th)) (sin ky)) #s(hole binary64 (* (* th (sin ky)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
#s(approx (* (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (sin th)) (sin ky)) #s(hole binary64 (* th (+ (* -1/6 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))
#s(approx (* (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (sin th)) (sin ky)) #s(hole binary64 (* th (+ (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* (pow th 2) (+ (* -1/6 (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* 1/120 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))))))
#s(approx (* (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (sin th)) (sin ky)) #s(hole binary64 (* th (+ (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* (pow th 2) (+ (* -1/6 (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* (pow th 2) (+ (* -1/5040 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* 1/120 (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))))))))
#s(approx (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (sin th)) #s(hole binary64 (* th (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
#s(approx (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (sin th)) #s(hole binary64 (* th (+ (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (* -1/6 (* (pow th 2) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))))
#s(approx (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (sin th)) #s(hole binary64 (* th (+ (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (* (pow th 2) (+ (* -1/6 (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 1/120 (* (pow th 2) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))))))
#s(approx (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (sin th)) #s(hole binary64 (* th (+ (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (* (pow th 2) (+ (* -1/6 (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* (pow th 2) (+ (* -1/5040 (* (pow th 2) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* 1/120 (sqrt (/ 1 (+ (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 th #s(hole binary64 th))
#s(approx (* (pow (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) 1/2) -1) (* (sin th) (sin ky))) #s(hole binary64 (* (* th (sin ky)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
#s(approx (* (pow (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) 1/2) -1) (* (sin th) (sin ky))) #s(hole binary64 (* th (+ (* -1/6 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))
#s(approx (* (pow (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) 1/2) -1) (* (sin th) (sin ky))) #s(hole binary64 (* th (+ (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* (pow th 2) (+ (* -1/6 (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* 1/120 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))))))
#s(approx (* (pow (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) 1/2) -1) (* (sin th) (sin ky))) #s(hole binary64 (* th (+ (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* (pow th 2) (+ (* -1/6 (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* (pow th 2) (+ (* -1/5040 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* 1/120 (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))))))))
#s(approx (* (sin th) (sin ky)) #s(hole binary64 (* th (sin ky))))
#s(approx (* (sin th) (sin ky)) #s(hole binary64 (* th (+ (sin ky) (* -1/6 (* (pow th 2) (sin ky)))))))
#s(approx (* (sin th) (sin ky)) #s(hole binary64 (* th (+ (sin ky) (* (pow th 2) (+ (* -1/6 (sin ky)) (* 1/120 (* (pow th 2) (sin ky)))))))))
#s(approx (* (sin th) (sin ky)) #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 (* (/ (sin ky) (sqrt (+ (/ (- (cos (- kx kx)) (cos (+ kx kx))) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (* (* th (sin ky)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 kx)))) (pow (sin ky) 2)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (/ (- (cos (- kx kx)) (cos (+ kx kx))) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (* th (+ (* -1/6 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 kx)))) (pow (sin ky) 2)))))) (* (sin ky) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 kx)))) (pow (sin ky) 2)))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (/ (- (cos (- kx kx)) (cos (+ kx kx))) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (* th (+ (* (sin ky) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 kx)))) (pow (sin ky) 2))))) (* (pow th 2) (+ (* -1/6 (* (sin ky) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 kx)))) (pow (sin ky) 2)))))) (* 1/120 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 kx)))) (pow (sin ky) 2))))))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (/ (- (cos (- kx kx)) (cos (+ kx kx))) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (* th (+ (* (sin ky) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 kx)))) (pow (sin ky) 2))))) (* (pow th 2) (+ (* -1/6 (* (sin ky) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 kx)))) (pow (sin ky) 2)))))) (* (pow th 2) (+ (* -1/5040 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 kx)))) (pow (sin ky) 2)))))) (* 1/120 (* (sin ky) (sqrt (/ 1 (+ (* 1/2 (- 1 (cos (* 2 kx)))) (pow (sin ky) 2))))))))))))))
#s(approx (/ (* (sin th) (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(hole binary64 (* (* th (sin ky)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
#s(approx (/ (* (sin th) (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(hole binary64 (* th (+ (* -1/6 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))
#s(approx (/ (* (sin th) (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(hole binary64 (* th (+ (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* (pow th 2) (+ (* -1/6 (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* 1/120 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))))))
#s(approx (/ (* (sin th) (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) #s(hole binary64 (* th (+ (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* (pow th 2) (+ (* -1/6 (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* (pow th 2) (+ (* -1/5040 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* 1/120 (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))))))))
#s(approx (sin th) #s(hole binary64 (sin th)))
Outputs
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (*.f64 (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)) (sin.f64 th)) (sin.f64 ky)))
(*.f64 (*.f64 (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)) (sin.f64 th)) (sin.f64 ky))
(*.f64 (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)) (sin.f64 th))
(*.f64 (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1/2 binary64)) (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1/2 binary64)))
(pow.f64 (pow.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal -1 binary64)) #s(literal 1/2 binary64))
(pow.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal -1/2 binary64))
(pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64))
(/.f64 (-.f64 (*.f64 (cosh.f64 (*.f64 (log.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky))) #s(literal -1 binary64))) (cosh.f64 (*.f64 (log.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky))) #s(literal -1 binary64)))) (*.f64 (sinh.f64 (*.f64 (log.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky))) #s(literal -1 binary64))) (sinh.f64 (*.f64 (log.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky))) #s(literal -1 binary64))))) (-.f64 (cosh.f64 (*.f64 (log.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky))) #s(literal -1 binary64))) (sinh.f64 (*.f64 (log.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky))) #s(literal -1 binary64)))))
(/.f64 (+.f64 (pow.f64 (cosh.f64 (*.f64 (log.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky))) #s(literal -1 binary64))) #s(literal 3 binary64)) (pow.f64 (sinh.f64 (*.f64 (log.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky))) #s(literal -1 binary64))) #s(literal 3 binary64))) (fma.f64 (cosh.f64 (*.f64 (log.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky))) #s(literal -1 binary64))) (cosh.f64 (*.f64 (log.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky))) #s(literal -1 binary64))) (-.f64 (*.f64 (sinh.f64 (*.f64 (log.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky))) #s(literal -1 binary64))) (sinh.f64 (*.f64 (log.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky))) #s(literal -1 binary64)))) (*.f64 (cosh.f64 (*.f64 (log.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky))) #s(literal -1 binary64))) (sinh.f64 (*.f64 (log.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky))) #s(literal -1 binary64)))))))
(/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))
(sqrt.f64 (pow.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal -1 binary64)))
(exp.f64 (*.f64 (log.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky))) #s(literal -1 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky))) #s(literal -1 binary64))) (sinh.f64 (*.f64 (log.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky))) #s(literal -1 binary64))))
(*.f64 (pow.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 1/4 binary64)) (pow.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 1/4 binary64)))
(pow.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 1/2 binary64))
(sqrt.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
(hypot.f64 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) (pow.f64 (sin.f64 ky) #s(literal 1 binary64)))
(hypot.f64 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) (neg.f64 (sin.f64 ky)))
(hypot.f64 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) (fabs.f64 (sin.f64 ky)))
(hypot.f64 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) (sin.f64 ky))
(hypot.f64 (neg.f64 (sin.f64 kx)) (pow.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)) (fabs.f64 (sin.f64 ky)))
(hypot.f64 (neg.f64 (sin.f64 kx)) (sin.f64 ky))
(hypot.f64 (fabs.f64 (sin.f64 kx)) (pow.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)) (fabs.f64 (sin.f64 ky)))
(hypot.f64 (fabs.f64 (sin.f64 kx)) (sin.f64 ky))
(hypot.f64 (sin.f64 kx) (pow.f64 (sin.f64 ky) #s(literal 1 binary64)))
(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))
(exp.f64 (*.f64 (log.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #s(literal 1/2 binary64)))
(sin.f64 kx)
kx
(sin.f64 ky)
ky
#s(literal -1 binary64)
(sin.f64 th)
th
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)) (*.f64 (sin.f64 th) (sin.f64 ky))))
(*.f64 (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)) (*.f64 (sin.f64 th) (sin.f64 ky)))
(*.f64 (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1/2 binary64)) (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1/2 binary64)))
(pow.f64 (pow.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal -1 binary64)) #s(literal 1/2 binary64))
(pow.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal -1/2 binary64))
(pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64))
(/.f64 (-.f64 (*.f64 (cosh.f64 (*.f64 (log.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky))) #s(literal -1 binary64))) (cosh.f64 (*.f64 (log.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky))) #s(literal -1 binary64)))) (*.f64 (sinh.f64 (*.f64 (log.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky))) #s(literal -1 binary64))) (sinh.f64 (*.f64 (log.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky))) #s(literal -1 binary64))))) (-.f64 (cosh.f64 (*.f64 (log.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky))) #s(literal -1 binary64))) (sinh.f64 (*.f64 (log.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky))) #s(literal -1 binary64)))))
(/.f64 (+.f64 (pow.f64 (cosh.f64 (*.f64 (log.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky))) #s(literal -1 binary64))) #s(literal 3 binary64)) (pow.f64 (sinh.f64 (*.f64 (log.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky))) #s(literal -1 binary64))) #s(literal 3 binary64))) (fma.f64 (cosh.f64 (*.f64 (log.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky))) #s(literal -1 binary64))) (cosh.f64 (*.f64 (log.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky))) #s(literal -1 binary64))) (-.f64 (*.f64 (sinh.f64 (*.f64 (log.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky))) #s(literal -1 binary64))) (sinh.f64 (*.f64 (log.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky))) #s(literal -1 binary64)))) (*.f64 (cosh.f64 (*.f64 (log.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky))) #s(literal -1 binary64))) (sinh.f64 (*.f64 (log.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky))) #s(literal -1 binary64)))))))
(/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))
(sqrt.f64 (pow.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal -1 binary64)))
(exp.f64 (*.f64 (log.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky))) #s(literal -1 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky))) #s(literal -1 binary64))) (sinh.f64 (*.f64 (log.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky))) #s(literal -1 binary64))))
(*.f64 (pow.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 1/4 binary64)) (pow.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 1/4 binary64)))
(pow.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 1/2 binary64))
(sqrt.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
(hypot.f64 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) (pow.f64 (sin.f64 ky) #s(literal 1 binary64)))
(hypot.f64 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) (neg.f64 (sin.f64 ky)))
(hypot.f64 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) (fabs.f64 (sin.f64 ky)))
(hypot.f64 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) (sin.f64 ky))
(hypot.f64 (neg.f64 (sin.f64 kx)) (pow.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)) (fabs.f64 (sin.f64 ky)))
(hypot.f64 (neg.f64 (sin.f64 kx)) (sin.f64 ky))
(hypot.f64 (fabs.f64 (sin.f64 kx)) (pow.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)) (fabs.f64 (sin.f64 ky)))
(hypot.f64 (fabs.f64 (sin.f64 kx)) (sin.f64 ky))
(hypot.f64 (sin.f64 kx) (pow.f64 (sin.f64 ky) #s(literal 1 binary64)))
(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))
(exp.f64 (*.f64 (log.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #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 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
(/.f64 (+.f64 (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (pow.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)) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(fma.f64 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))
(fma.f64 (neg.f64 (sin.f64 kx)) (neg.f64 (sin.f64 kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))
(fma.f64 (fabs.f64 (sin.f64 kx)) (fabs.f64 (sin.f64 kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))
(fma.f64 (sin.f64 kx) (sin.f64 kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))
(-.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 (neg.f64 (sin.f64 ky)) (sin.f64 ky)))
(+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))
(*.f64 (pow.f64 (sin.f64 ky) #s(literal 1 binary64)) (pow.f64 (sin.f64 ky) #s(literal 1 binary64)))
(*.f64 (neg.f64 (sin.f64 ky)) (neg.f64 (sin.f64 ky)))
(*.f64 (fabs.f64 (sin.f64 ky)) (fabs.f64 (sin.f64 ky)))
(*.f64 (sin.f64 ky) (sin.f64 ky))
(pow.f64 (sin.f64 ky) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 ky ky)) (cos.f64 (+.f64 ky ky))) #s(literal 2 binary64))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))
(exp.f64 (*.f64 (log.f64 (sin.f64 ky)) #s(literal 2 binary64)))
#s(literal 2 binary64)
#s(literal 1/2 binary64)
(*.f64 (sin.f64 th) (sin.f64 ky))
(/.f64 (-.f64 (cos.f64 (-.f64 th ky)) (cos.f64 (+.f64 th ky))) #s(literal 2 binary64))
(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (*.f64 (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)) (sin.f64 ky))) (sin.f64 th))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (*.f64 (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)) (sin.f64 ky)))
(*.f64 (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)) (sin.f64 ky))
(*.f64 (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1/2 binary64)) (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1/2 binary64)))
(pow.f64 (pow.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal -1 binary64)) #s(literal 1/2 binary64))
(pow.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal -1/2 binary64))
(pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64))
(/.f64 (-.f64 (*.f64 (cosh.f64 (*.f64 (log.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky))) #s(literal -1 binary64))) (cosh.f64 (*.f64 (log.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky))) #s(literal -1 binary64)))) (*.f64 (sinh.f64 (*.f64 (log.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky))) #s(literal -1 binary64))) (sinh.f64 (*.f64 (log.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky))) #s(literal -1 binary64))))) (-.f64 (cosh.f64 (*.f64 (log.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky))) #s(literal -1 binary64))) (sinh.f64 (*.f64 (log.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky))) #s(literal -1 binary64)))))
(/.f64 (+.f64 (pow.f64 (cosh.f64 (*.f64 (log.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky))) #s(literal -1 binary64))) #s(literal 3 binary64)) (pow.f64 (sinh.f64 (*.f64 (log.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky))) #s(literal -1 binary64))) #s(literal 3 binary64))) (fma.f64 (cosh.f64 (*.f64 (log.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky))) #s(literal -1 binary64))) (cosh.f64 (*.f64 (log.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky))) #s(literal -1 binary64))) (-.f64 (*.f64 (sinh.f64 (*.f64 (log.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky))) #s(literal -1 binary64))) (sinh.f64 (*.f64 (log.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky))) #s(literal -1 binary64)))) (*.f64 (cosh.f64 (*.f64 (log.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky))) #s(literal -1 binary64))) (sinh.f64 (*.f64 (log.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky))) #s(literal -1 binary64)))))))
(/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))
(sqrt.f64 (pow.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal -1 binary64)))
(exp.f64 (*.f64 (log.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky))) #s(literal -1 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky))) #s(literal -1 binary64))) (sinh.f64 (*.f64 (log.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky))) #s(literal -1 binary64))))
(/.f64 (+.f64 (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)) (exp.f64 (neg.f64 (*.f64 (log.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky))) #s(literal -1 binary64))))) #s(literal 2 binary64))
(cosh.f64 (neg.f64 (*.f64 (log.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky))) #s(literal -1 binary64))))
(cosh.f64 (*.f64 (log.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky))) #s(literal -1 binary64)))
(*.f64 (log.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky))) #s(literal -1 binary64))
(log.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)))
(/.f64 (-.f64 (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)) (exp.f64 (neg.f64 (*.f64 (log.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky))) #s(literal -1 binary64))))) #s(literal 2 binary64))
(sinh.f64 (*.f64 (log.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky))) #s(literal -1 binary64)))
(*.f64 (/.f64 (sin.f64 ky) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (sin.f64 th))
(/.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)))
(*.f64 (pow.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 1/4 binary64)) (pow.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 1/4 binary64)))
(pow.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 1/2 binary64))
(sqrt.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
(hypot.f64 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) (pow.f64 (sin.f64 ky) #s(literal 1 binary64)))
(hypot.f64 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) (neg.f64 (sin.f64 ky)))
(hypot.f64 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) (fabs.f64 (sin.f64 ky)))
(hypot.f64 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) (sin.f64 ky))
(hypot.f64 (neg.f64 (sin.f64 kx)) (pow.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)) (fabs.f64 (sin.f64 ky)))
(hypot.f64 (neg.f64 (sin.f64 kx)) (sin.f64 ky))
(hypot.f64 (fabs.f64 (sin.f64 kx)) (pow.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)) (fabs.f64 (sin.f64 ky)))
(hypot.f64 (fabs.f64 (sin.f64 kx)) (sin.f64 ky))
(hypot.f64 (sin.f64 kx) (pow.f64 (sin.f64 ky) #s(literal 1 binary64)))
(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))
(exp.f64 (*.f64 (log.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #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 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
(/.f64 (+.f64 (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (pow.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)) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(fma.f64 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))
(fma.f64 (neg.f64 (sin.f64 kx)) (neg.f64 (sin.f64 kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))
(fma.f64 (fabs.f64 (sin.f64 kx)) (fabs.f64 (sin.f64 kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))
(fma.f64 (sin.f64 kx) (sin.f64 kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))
(-.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 (neg.f64 (sin.f64 ky)) (sin.f64 ky)))
(+.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 1 binary64)) (pow.f64 (sin.f64 kx) #s(literal 1 binary64)))
(*.f64 (neg.f64 (sin.f64 kx)) (neg.f64 (sin.f64 kx)))
(*.f64 (fabs.f64 (sin.f64 kx)) (fabs.f64 (sin.f64 kx)))
(*.f64 (sin.f64 kx) (sin.f64 kx))
(pow.f64 (sin.f64 kx) #s(literal 2 binary64))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (*.f64 #s(literal -2 binary64) kx)))) #s(literal -2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (*.f64 #s(literal -2 binary64) kx))) #s(literal 2 binary64))
(-.f64 (/.f64 (cos.f64 (-.f64 kx kx)) #s(literal 2 binary64)) (/.f64 (cos.f64 (*.f64 #s(literal -2 binary64) kx)) #s(literal 2 binary64)))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) kx))))
(exp.f64 (*.f64 (log.f64 (sin.f64 kx)) #s(literal 2 binary64)))
(*.f64 #s(literal -2 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (-.f64 kx kx) (+.f64 kx kx)) #s(literal 2 binary64))) (sin.f64 (/.f64 (+.f64 (-.f64 kx kx) (+.f64 kx kx)) #s(literal 2 binary64)))))
(/.f64 (-.f64 (*.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (-.f64 kx kx))) (*.f64 (cos.f64 (*.f64 #s(literal -2 binary64) kx)) (cos.f64 (*.f64 #s(literal -2 binary64) kx)))) (+.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (*.f64 #s(literal -2 binary64) kx))))
(/.f64 (-.f64 (pow.f64 (cos.f64 (-.f64 kx kx)) #s(literal 3 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal -2 binary64) kx)) #s(literal 3 binary64))) (fma.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (-.f64 kx kx)) (fma.f64 (cos.f64 (*.f64 #s(literal -2 binary64) kx)) (cos.f64 (*.f64 #s(literal -2 binary64) kx)) (*.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (*.f64 #s(literal -2 binary64) kx))))))
(-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (*.f64 #s(literal -2 binary64) kx)))
(fma.f64 (cos.f64 kx) (cos.f64 kx) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))
(sin.f64 (+.f64 (-.f64 kx kx) (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (neg.f64 (-.f64 kx kx)))
(cos.f64 (-.f64 kx kx))
(+.f64 (*.f64 (cos.f64 kx) (cos.f64 kx)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))
(/.f64 (-.f64 (pow.f64 kx #s(literal 3 binary64)) (pow.f64 kx #s(literal 3 binary64))) (fma.f64 kx kx (fma.f64 kx kx (*.f64 kx kx))))
(/.f64 (-.f64 (*.f64 kx kx) (*.f64 kx kx)) (+.f64 kx kx))
(-.f64 kx kx)
(sin.f64 (fma.f64 #s(literal 2 binary64) kx (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (+.f64 kx kx) (/.f64 (PI.f64) #s(literal 2 binary64))))
(-.f64 (*.f64 (cos.f64 kx) (cos.f64 kx)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))
(cos.f64 (neg.f64 (*.f64 #s(literal 2 binary64) kx)))
(cos.f64 (neg.f64 (+.f64 kx kx)))
(cos.f64 (*.f64 #s(literal -2 binary64) kx))
(cos.f64 (*.f64 #s(literal 2 binary64) kx))
(cos.f64 (+.f64 kx kx))
(/.f64 (-.f64 (*.f64 kx kx) (*.f64 kx kx)) (-.f64 kx kx))
(/.f64 (+.f64 (pow.f64 kx #s(literal 3 binary64)) (pow.f64 kx #s(literal 3 binary64))) (fma.f64 kx kx (-.f64 (*.f64 kx kx) (*.f64 kx kx))))
(+.f64 kx kx)
(/.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)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (-.f64 (sin.f64 th) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 kx kx) (sin.f64 th)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (+.f64 (sin.f64 th) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 kx kx) (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 (sin.f64 th) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) (*.f64 #s(literal 3/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 binary64))))))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (+.f64 (sin.f64 th) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 kx kx) (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 (sin.f64 th) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal 1/3 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) (*.f64 #s(literal 3/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 binary64)))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (fma.f64 #s(literal 2/45 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) (fma.f64 #s(literal 2/3 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 binary64)) (pow.f64 (sin.f64 ky) #s(literal -8 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 (sin.f64 th) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) (*.f64 #s(literal 3/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 binary64)))))))))))))
#s(approx (* (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (sin th)) (sin ky)) (sin.f64 th))
#s(approx (* (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (sin th)) (sin ky)) (-.f64 (sin.f64 th) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 kx kx) (sin.f64 th)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
#s(approx (* (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (sin th)) (sin ky)) (+.f64 (sin.f64 th) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 kx kx) (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 (sin.f64 th) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) (*.f64 #s(literal 3/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 binary64))))))))))))
#s(approx (* (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (sin th)) (sin ky)) (+.f64 (sin.f64 th) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 kx kx) (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 (sin.f64 th) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal 1/3 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) (*.f64 #s(literal 3/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 binary64)))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (fma.f64 #s(literal 2/45 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) (fma.f64 #s(literal 2/3 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 binary64)) (pow.f64 (sin.f64 ky) #s(literal -8 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 (sin.f64 th) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) (*.f64 #s(literal 3/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 binary64)))))))))))))
#s(approx (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (sin th)) (/.f64 (sin.f64 th) (sin.f64 ky)))
#s(approx (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (sin th)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 kx kx) (sin.f64 th)) (pow.f64 (sin.f64 ky) #s(literal 3 binary64))) (/.f64 (sin.f64 th) (sin.f64 ky))))
#s(approx (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (sin th)) (fma.f64 (*.f64 kx kx) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 ky) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 kx kx) (*.f64 (sin.f64 ky) (*.f64 (sin.f64 th) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) (*.f64 #s(literal 3/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 binary64))))))))) (/.f64 (sin.f64 th) (sin.f64 ky))))
#s(approx (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (sin th)) (fma.f64 (*.f64 kx kx) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 ky) #s(literal 3 binary64))) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 kx kx) (*.f64 (sin.f64 ky) (*.f64 (sin.f64 th) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal 1/3 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) (*.f64 #s(literal 3/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 binary64)))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (fma.f64 #s(literal 2/45 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) (fma.f64 #s(literal 2/3 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 binary64)) (pow.f64 (sin.f64 ky) #s(literal -8 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 ky) (*.f64 (sin.f64 th) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) (*.f64 #s(literal 3/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 binary64)))))))))) (/.f64 (sin.f64 th) (sin.f64 ky))))
#s(approx (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (pow.f64 (sin.f64 ky) #s(literal -1 binary64)))
#s(approx (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal 3 binary64))) (pow.f64 (sin.f64 ky) #s(literal -1 binary64))))
#s(approx (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (fma.f64 (*.f64 kx kx) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 kx kx) (*.f64 (sin.f64 ky) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) (*.f64 #s(literal 3/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 binary64)))))) (*.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 ky) #s(literal -3 binary64)))) (pow.f64 (sin.f64 ky) #s(literal -1 binary64))))
#s(approx (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (fma.f64 (*.f64 kx kx) (fma.f64 (*.f64 kx kx) (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 kx kx) (*.f64 (sin.f64 ky) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal 1/3 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) (*.f64 #s(literal 3/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 binary64)))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (fma.f64 #s(literal 2/45 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) (fma.f64 #s(literal 2/3 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 binary64)) (pow.f64 (sin.f64 ky) #s(literal -8 binary64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 ky) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) (*.f64 #s(literal 3/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 binary64))))))) (*.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 ky) #s(literal -3 binary64)))) (pow.f64 (sin.f64 ky) #s(literal -1 binary64))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (sin.f64 ky))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (-.f64 (sin.f64 ky) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 kx kx) (sin.f64 ky)))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (+.f64 (sin.f64 ky) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 kx kx) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64))))) (sin.f64 ky)) (*.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 ky) #s(literal -1 binary64)))))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (+.f64 (sin.f64 ky) (*.f64 (*.f64 kx kx) (fma.f64 (*.f64 kx kx) (fma.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)))) (sin.f64 ky)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 kx kx) (-.f64 #s(literal 2/45 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (sin.f64 ky)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 ky) #s(literal -1 binary64)))))))
#s(approx (sin kx) kx)
#s(approx (sin kx) (*.f64 kx (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 kx kx)))))
#s(approx (sin kx) (*.f64 kx (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 kx kx) (-.f64 (*.f64 #s(literal 1/120 binary64) (*.f64 kx kx)) #s(literal 1/6 binary64))))))
#s(approx (sin kx) (*.f64 kx (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 kx kx) (-.f64 (*.f64 (*.f64 kx kx) (+.f64 #s(literal 1/120 binary64) (*.f64 #s(literal -1/5040 binary64) (*.f64 kx kx)))) #s(literal 1/6 binary64))))))
#s(approx kx kx)
#s(approx (* (pow (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) 1/2) -1) (* (sin th) (sin ky))) (sin.f64 th))
#s(approx (* (pow (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) 1/2) -1) (* (sin th) (sin ky))) (-.f64 (sin.f64 th) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 kx kx) (sin.f64 th)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
#s(approx (* (pow (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) 1/2) -1) (* (sin th) (sin ky))) (+.f64 (sin.f64 th) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 kx kx) (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 (sin.f64 th) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) (*.f64 #s(literal 3/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 binary64))))))))))))
#s(approx (* (pow (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) 1/2) -1) (* (sin th) (sin ky))) (+.f64 (sin.f64 th) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 kx kx) (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 (sin.f64 th) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal 1/3 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) (*.f64 #s(literal 3/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 binary64)))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (fma.f64 #s(literal 2/45 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) (fma.f64 #s(literal 2/3 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 binary64)) (pow.f64 (sin.f64 ky) #s(literal -8 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 (sin.f64 th) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) (*.f64 #s(literal 3/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 binary64)))))))))))))
#s(approx (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (pow.f64 (sin.f64 ky) #s(literal -1 binary64)))
#s(approx (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal 3 binary64))) (pow.f64 (sin.f64 ky) #s(literal -1 binary64))))
#s(approx (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (fma.f64 (*.f64 kx kx) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 kx kx) (*.f64 (sin.f64 ky) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) (*.f64 #s(literal 3/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 binary64)))))) (*.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 ky) #s(literal -3 binary64)))) (pow.f64 (sin.f64 ky) #s(literal -1 binary64))))
#s(approx (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (fma.f64 (*.f64 kx kx) (fma.f64 (*.f64 kx kx) (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 kx kx) (*.f64 (sin.f64 ky) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal 1/3 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) (*.f64 #s(literal 3/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 binary64)))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (fma.f64 #s(literal 2/45 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) (fma.f64 #s(literal 2/3 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 binary64)) (pow.f64 (sin.f64 ky) #s(literal -8 binary64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 ky) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) (*.f64 #s(literal 3/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 binary64))))))) (*.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 ky) #s(literal -3 binary64)))) (pow.f64 (sin.f64 ky) #s(literal -1 binary64))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (sin.f64 ky))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (-.f64 (sin.f64 ky) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 kx kx) (sin.f64 ky)))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (+.f64 (sin.f64 ky) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 kx kx) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64))))) (sin.f64 ky)) (*.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 ky) #s(literal -1 binary64)))))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (+.f64 (sin.f64 ky) (*.f64 (*.f64 kx kx) (fma.f64 (*.f64 kx kx) (fma.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)))) (sin.f64 ky)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 kx kx) (-.f64 #s(literal 2/45 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (sin.f64 ky)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 ky) #s(literal -1 binary64)))))))
#s(approx (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))
#s(approx (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) (fma.f64 kx kx (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
#s(approx (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) (fma.f64 (*.f64 kx kx) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 kx kx))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
#s(approx (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) (fma.f64 (*.f64 kx kx) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 kx kx) (-.f64 (*.f64 #s(literal 2/45 binary64) (*.f64 kx kx)) #s(literal 1/3 binary64)))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(literal 1 binary64))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 kx kx) (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) (*.f64 #s(literal 3/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 binary64)))))) (*.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)))))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 kx kx) (fma.f64 (*.f64 kx kx) (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 kx kx) (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal 1/3 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) (*.f64 #s(literal 3/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 binary64)))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (fma.f64 #s(literal 2/45 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) (fma.f64 #s(literal 2/3 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 binary64)) (pow.f64 (sin.f64 ky) #s(literal -8 binary64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) (*.f64 #s(literal 3/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 binary64))))))) (*.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)))))))
#s(approx (* (+ (cosh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1)) (sinh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1))) (sin ky)) (*.f64 (sin.f64 ky) (*.f64 #s(literal 1/2 binary64) (+.f64 (+.f64 (sin.f64 ky) (pow.f64 (sin.f64 ky) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (sin.f64 ky) (pow.f64 (sin.f64 ky) #s(literal -1 binary64)))))))
#s(approx (* (+ (cosh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1)) (sinh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1))) (sin ky)) (fma.f64 (sin.f64 ky) (*.f64 #s(literal 1/2 binary64) (+.f64 (+.f64 (sin.f64 ky) (pow.f64 (sin.f64 ky) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (sin.f64 ky) (pow.f64 (sin.f64 ky) #s(literal -1 binary64))))) (*.f64 (*.f64 kx kx) (*.f64 (sin.f64 ky) (fma.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (pow.f64 (sin.f64 ky) #s(literal -1 binary64)) (pow.f64 (sin.f64 ky) #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 ky) #s(literal -1 binary64)) (*.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 ky) #s(literal -3 binary64))))))))))
#s(approx (* (+ (cosh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1)) (sinh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1))) (sin ky)) (fma.f64 (sin.f64 ky) (*.f64 #s(literal 1/2 binary64) (+.f64 (+.f64 (sin.f64 ky) (pow.f64 (sin.f64 ky) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (sin.f64 ky) (pow.f64 (sin.f64 ky) #s(literal -1 binary64))))) (*.f64 (*.f64 kx kx) (fma.f64 (sin.f64 ky) (fma.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (pow.f64 (sin.f64 ky) #s(literal -1 binary64)) (pow.f64 (sin.f64 ky) #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 ky) #s(literal -1 binary64)) (*.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 ky) #s(literal -3 binary64)))))) (*.f64 (*.f64 kx kx) (*.f64 (sin.f64 ky) (*.f64 #s(literal 1/2 binary64) (+.f64 (-.f64 (fma.f64 #s(literal -1/24 binary64) (/.f64 (fma.f64 #s(literal -12 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)))) (sin.f64 ky)) (*.f64 #s(literal 1/8 binary64) (pow.f64 (sin.f64 ky) #s(literal -5 binary64)))) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 ky) (fma.f64 #s(literal -1/24 binary64) (fma.f64 #s(literal -12 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)))) (*.f64 #s(literal 1/8 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64))))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -3 binary64))))) (-.f64 (fma.f64 #s(literal -1/24 binary64) (/.f64 (fma.f64 #s(literal -12 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)))) (sin.f64 ky)) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (sin.f64 ky) #s(literal -5 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -3 binary64))))) (*.f64 (sin.f64 ky) (fma.f64 #s(literal -1/24 binary64) (fma.f64 #s(literal -12 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)))) (*.f64 #s(literal 1/8 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64))))))))))))))
#s(approx (* (+ (cosh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1)) (sinh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1))) (sin ky)) (fma.f64 (sin.f64 ky) (*.f64 #s(literal 1/2 binary64) (+.f64 (+.f64 (sin.f64 ky) (pow.f64 (sin.f64 ky) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (sin.f64 ky) (pow.f64 (sin.f64 ky) #s(literal -1 binary64))))) (*.f64 (*.f64 kx kx) (fma.f64 (sin.f64 ky) (fma.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (pow.f64 (sin.f64 ky) #s(literal -1 binary64)) (pow.f64 (sin.f64 ky) #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 ky) #s(literal -1 binary64)) (*.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 ky) #s(literal -3 binary64)))))) (*.f64 (*.f64 kx kx) (fma.f64 (sin.f64 ky) (*.f64 #s(literal 1/2 binary64) (+.f64 (-.f64 (fma.f64 #s(literal -1/24 binary64) (/.f64 (fma.f64 #s(literal -12 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)))) (sin.f64 ky)) (*.f64 #s(literal 1/8 binary64) (pow.f64 (sin.f64 ky) #s(literal -5 binary64)))) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 ky) (fma.f64 #s(literal -1/24 binary64) (fma.f64 #s(literal -12 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)))) (*.f64 #s(literal 1/8 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64))))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -3 binary64))))) (-.f64 (fma.f64 #s(literal -1/24 binary64) (/.f64 (fma.f64 #s(literal -12 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)))) (sin.f64 ky)) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (sin.f64 ky) #s(literal -5 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -3 binary64))))) (*.f64 (sin.f64 ky) (fma.f64 #s(literal -1/24 binary64) (fma.f64 #s(literal -12 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)))) (*.f64 #s(literal 1/8 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)))))))) (*.f64 (*.f64 kx kx) (*.f64 (sin.f64 ky) (*.f64 #s(literal 1/2 binary64) (+.f64 (-.f64 (fma.f64 #s(literal -1/720 binary64) (/.f64 (fma.f64 #s(literal 180 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)))) (pow.f64 (sin.f64 ky) #s(literal 4 binary64))) (fma.f64 #s(literal 360 binary64) (/.f64 (-.f64 #s(literal 2/45 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 #s(literal 30 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 binary64))))) (sin.f64 ky)) (*.f64 #s(literal 1/48 binary64) (/.f64 (fma.f64 #s(literal -12 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)))) (pow.f64 (sin.f64 ky) #s(literal 3 binary64))))) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 ky) (-.f64 (fma.f64 #s(literal -1/720 binary64) (fma.f64 #s(literal 30 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 binary64)) (fma.f64 #s(literal 180 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)))) (pow.f64 (sin.f64 ky) #s(literal 4 binary64))) (*.f64 #s(literal 360 binary64) (/.f64 (-.f64 #s(literal 2/45 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/48 binary64) (/.f64 (fma.f64 #s(literal -12 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (*.f64 #s(literal 1/48 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 binary64))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1/24 binary64) (fma.f64 #s(literal -12 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)))) (*.f64 #s(literal 1/8 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)))) (sin.f64 ky)) (fma.f64 #s(literal 1/48 binary64) (pow.f64 (sin.f64 ky) #s(literal -7 binary64)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 ky) (fma.f64 #s(literal -1/24 binary64) (fma.f64 #s(literal -12 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)))) (*.f64 #s(literal 1/8 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64))))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -3 binary64)))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))))) (-.f64 (fma.f64 #s(literal -1/720 binary64) (/.f64 (fma.f64 #s(literal 180 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)))) (pow.f64 (sin.f64 ky) #s(literal 4 binary64))) (fma.f64 #s(literal 360 binary64) (/.f64 (-.f64 #s(literal 2/45 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 #s(literal 30 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 binary64))))) (sin.f64 ky)) (*.f64 #s(literal 1/48 binary64) (/.f64 (fma.f64 #s(literal -12 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)))) (pow.f64 (sin.f64 ky) #s(literal 3 binary64))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -3 binary64))) (*.f64 (sin.f64 ky) (fma.f64 #s(literal -1/24 binary64) (fma.f64 #s(literal -12 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)))) (*.f64 #s(literal 1/8 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)))))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (fma.f64 #s(literal 1/48 binary64) (pow.f64 (sin.f64 ky) #s(literal -7 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/24 binary64) (fma.f64 #s(literal -12 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)))) (*.f64 #s(literal 1/8 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)))) (sin.f64 ky)) (*.f64 (sin.f64 ky) (-.f64 (fma.f64 #s(literal -1/720 binary64) (fma.f64 #s(literal 30 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 binary64)) (fma.f64 #s(literal 180 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)))) (pow.f64 (sin.f64 ky) #s(literal 4 binary64))) (*.f64 #s(literal 360 binary64) (/.f64 (-.f64 #s(literal 2/45 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/48 binary64) (/.f64 (fma.f64 #s(literal -12 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (*.f64 #s(literal 1/48 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 binary64)))))))))))))))))))
#s(approx (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (*.f64 #s(literal 1/2 binary64) (+.f64 (+.f64 (sin.f64 ky) (pow.f64 (sin.f64 ky) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (sin.f64 ky) (pow.f64 (sin.f64 ky) #s(literal -1 binary64))))))
#s(approx (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (fma.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 ky) (pow.f64 (sin.f64 ky) #s(literal -1 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (sin.f64 ky) (pow.f64 (sin.f64 ky) #s(literal -1 binary64))) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (pow.f64 (sin.f64 ky) #s(literal -1 binary64)) (pow.f64 (sin.f64 ky) #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 ky) #s(literal -1 binary64)) (*.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 ky) #s(literal -3 binary64))))))))))
#s(approx (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (fma.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 ky) (pow.f64 (sin.f64 ky) #s(literal -1 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (sin.f64 ky) (pow.f64 (sin.f64 ky) #s(literal -1 binary64))) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (pow.f64 (sin.f64 ky) #s(literal -1 binary64)) (pow.f64 (sin.f64 ky) #s(literal -3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 ky) #s(literal -1 binary64)) (*.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 ky) #s(literal -3 binary64)))) (*.f64 (*.f64 kx kx) (*.f64 #s(literal 1/2 binary64) (+.f64 (-.f64 (fma.f64 #s(literal -1/24 binary64) (/.f64 (fma.f64 #s(literal -12 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)))) (sin.f64 ky)) (*.f64 #s(literal 1/8 binary64) (pow.f64 (sin.f64 ky) #s(literal -5 binary64)))) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 ky) (fma.f64 #s(literal -1/24 binary64) (fma.f64 #s(literal -12 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)))) (*.f64 #s(literal 1/8 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64))))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -3 binary64))))) (-.f64 (fma.f64 #s(literal -1/24 binary64) (/.f64 (fma.f64 #s(literal -12 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)))) (sin.f64 ky)) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (sin.f64 ky) #s(literal -5 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -3 binary64))))) (*.f64 (sin.f64 ky) (fma.f64 #s(literal -1/24 binary64) (fma.f64 #s(literal -12 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)))) (*.f64 #s(literal 1/8 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)))))))))))))))
#s(approx (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (fma.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 ky) (pow.f64 (sin.f64 ky) #s(literal -1 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (sin.f64 ky) (pow.f64 (sin.f64 ky) #s(literal -1 binary64))) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (pow.f64 (sin.f64 ky) #s(literal -1 binary64)) (pow.f64 (sin.f64 ky) #s(literal -3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 ky) #s(literal -1 binary64)) (*.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 ky) #s(literal -3 binary64)))) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal 1/2 binary64) (-.f64 (fma.f64 #s(literal -1/24 binary64) (/.f64 (fma.f64 #s(literal -12 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)))) (sin.f64 ky)) (*.f64 #s(literal 1/8 binary64) (pow.f64 (sin.f64 ky) #s(literal -5 binary64)))) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 ky) (fma.f64 #s(literal -1/24 binary64) (fma.f64 #s(literal -12 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)))) (*.f64 #s(literal 1/8 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64))))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (fma.f64 #s(literal -1/24 binary64) (/.f64 (fma.f64 #s(literal -12 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)))) (sin.f64 ky)) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (sin.f64 ky) #s(literal -5 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -3 binary64))))) (*.f64 (sin.f64 ky) (fma.f64 #s(literal -1/24 binary64) (fma.f64 #s(literal -12 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)))) (*.f64 #s(literal 1/8 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)))))) (*.f64 (*.f64 kx kx) (*.f64 #s(literal 1/2 binary64) (+.f64 (-.f64 (fma.f64 #s(literal -1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 binary64)) (fma.f64 #s(literal 180 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)))) (pow.f64 (sin.f64 ky) #s(literal 4 binary64))) (*.f64 #s(literal 360 binary64) (/.f64 (-.f64 #s(literal 2/45 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (sin.f64 ky)) (*.f64 #s(literal 1/48 binary64) (/.f64 (fma.f64 #s(literal -12 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)))) (pow.f64 (sin.f64 ky) #s(literal 3 binary64))))) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 ky) (-.f64 (fma.f64 #s(literal -1/720 binary64) (fma.f64 #s(literal 180 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)))) (pow.f64 (sin.f64 ky) #s(literal 4 binary64))) (fma.f64 #s(literal 360 binary64) (/.f64 (-.f64 #s(literal 2/45 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 #s(literal 30 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 binary64))))) (*.f64 #s(literal 1/48 binary64) (/.f64 (fma.f64 #s(literal -12 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (*.f64 #s(literal 1/48 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 binary64))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1/24 binary64) (fma.f64 #s(literal -12 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)))) (*.f64 #s(literal 1/8 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)))) (sin.f64 ky)) (fma.f64 #s(literal 1/48 binary64) (pow.f64 (sin.f64 ky) #s(literal -7 binary64)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 ky) (fma.f64 #s(literal -1/24 binary64) (fma.f64 #s(literal -12 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)))) (*.f64 #s(literal 1/8 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64))))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -3 binary64)))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))))) (-.f64 (fma.f64 #s(literal -1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 binary64)) (fma.f64 #s(literal 180 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)))) (pow.f64 (sin.f64 ky) #s(literal 4 binary64))) (*.f64 #s(literal 360 binary64) (/.f64 (-.f64 #s(literal 2/45 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (sin.f64 ky)) (*.f64 #s(literal 1/48 binary64) (/.f64 (fma.f64 #s(literal -12 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)))) (pow.f64 (sin.f64 ky) #s(literal 3 binary64))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -3 binary64))) (*.f64 (sin.f64 ky) (fma.f64 #s(literal -1/24 binary64) (fma.f64 #s(literal -12 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)))) (*.f64 #s(literal 1/8 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)))))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (fma.f64 #s(literal 1/48 binary64) (pow.f64 (sin.f64 ky) #s(literal -7 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/24 binary64) (fma.f64 #s(literal -12 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)))) (*.f64 #s(literal 1/8 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)))) (sin.f64 ky)) (*.f64 (sin.f64 ky) (-.f64 (fma.f64 #s(literal -1/720 binary64) (fma.f64 #s(literal 180 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)))) (pow.f64 (sin.f64 ky) #s(literal 4 binary64))) (fma.f64 #s(literal 360 binary64) (/.f64 (-.f64 #s(literal 2/45 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 #s(literal 30 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 binary64))))) (*.f64 #s(literal 1/48 binary64) (/.f64 (fma.f64 #s(literal -12 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (*.f64 #s(literal 1/48 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 binary64)))))))))))))))))))))
#s(approx (cosh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1)) (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 ky) (pow.f64 (sin.f64 ky) #s(literal -1 binary64)))))
#s(approx (cosh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1)) (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 kx kx) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 ky) #s(literal -1 binary64)) (*.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 ky) #s(literal -3 binary64)))) (+.f64 (sin.f64 ky) (pow.f64 (sin.f64 ky) #s(literal -1 binary64))))))
#s(approx (cosh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1)) (fma.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 ky) (pow.f64 (sin.f64 ky) #s(literal -1 binary64))) (*.f64 (*.f64 kx kx) (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 kx kx) (-.f64 (fma.f64 #s(literal -1/24 binary64) (/.f64 (fma.f64 #s(literal -12 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)))) (sin.f64 ky)) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (sin.f64 ky) #s(literal -5 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -3 binary64))))) (*.f64 (sin.f64 ky) (fma.f64 #s(literal -1/24 binary64) (fma.f64 #s(literal -12 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)))) (*.f64 #s(literal 1/8 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 ky) #s(literal -1 binary64)) (*.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 ky) #s(literal -3 binary64)))))))))
#s(approx (cosh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1)) (fma.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 ky) (pow.f64 (sin.f64 ky) #s(literal -1 binary64))) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 ky) #s(literal -1 binary64)) (*.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 ky) #s(literal -3 binary64)))) (*.f64 (*.f64 kx kx) (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 kx kx) (-.f64 (fma.f64 #s(literal -1/720 binary64) (/.f64 (fma.f64 #s(literal 180 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)))) (pow.f64 (sin.f64 ky) #s(literal 4 binary64))) (fma.f64 #s(literal 360 binary64) (/.f64 (-.f64 #s(literal 2/45 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 #s(literal 30 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 binary64))))) (sin.f64 ky)) (*.f64 #s(literal 1/48 binary64) (/.f64 (fma.f64 #s(literal -12 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)))) (pow.f64 (sin.f64 ky) #s(literal 3 binary64))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -3 binary64))) (*.f64 (sin.f64 ky) (fma.f64 #s(literal -1/24 binary64) (fma.f64 #s(literal -12 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)))) (*.f64 #s(literal 1/8 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)))))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (fma.f64 #s(literal 1/48 binary64) (pow.f64 (sin.f64 ky) #s(literal -7 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/24 binary64) (fma.f64 #s(literal -12 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)))) (*.f64 #s(literal 1/8 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)))) (sin.f64 ky)) (*.f64 (sin.f64 ky) (-.f64 (fma.f64 #s(literal -1/720 binary64) (fma.f64 #s(literal 30 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 binary64)) (fma.f64 #s(literal 180 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)))) (pow.f64 (sin.f64 ky) #s(literal 4 binary64))) (*.f64 #s(literal 360 binary64) (/.f64 (-.f64 #s(literal 2/45 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/48 binary64) (/.f64 (fma.f64 #s(literal -12 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (*.f64 #s(literal 1/48 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 binary64))))))))) (-.f64 (fma.f64 #s(literal -1/24 binary64) (/.f64 (fma.f64 #s(literal -12 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)))) (sin.f64 ky)) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (sin.f64 ky) #s(literal -5 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -3 binary64))))) (*.f64 (sin.f64 ky) (fma.f64 #s(literal -1/24 binary64) (fma.f64 #s(literal -12 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)))) (*.f64 #s(literal 1/8 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)))))))))))))
#s(approx (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1) (log.f64 (pow.f64 (sin.f64 ky) #s(literal -1 binary64))))
#s(approx (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1) (fma.f64 #s(literal -1 binary64) (log.f64 (sin.f64 ky)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
#s(approx (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1) (fma.f64 #s(literal -1 binary64) (log.f64 (sin.f64 ky)) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -1/24 binary64) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -12 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64))))) (*.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)))))))
#s(approx (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1) (fma.f64 #s(literal -1 binary64) (log.f64 (sin.f64 ky)) (*.f64 (*.f64 kx kx) (fma.f64 (*.f64 kx kx) (fma.f64 #s(literal -1/24 binary64) (fma.f64 #s(literal -12 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)))) (*.f64 #s(literal -1/720 binary64) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal 30 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 binary64)) (fma.f64 #s(literal 180 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)))) (pow.f64 (sin.f64 ky) #s(literal 4 binary64))) (*.f64 #s(literal 360 binary64) (/.f64 (-.f64 #s(literal 2/45 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))) (*.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)))))))
#s(approx (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (log.f64 (sin.f64 ky)))
#s(approx (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (-.f64 (log.f64 (sin.f64 ky)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
#s(approx (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (+.f64 (log.f64 (sin.f64 ky)) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -12 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64))))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)))))))
#s(approx (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (+.f64 (log.f64 (sin.f64 ky)) (*.f64 (*.f64 kx kx) (fma.f64 (*.f64 kx kx) (fma.f64 #s(literal 1/720 binary64) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal 180 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)))) (pow.f64 (sin.f64 ky) #s(literal 4 binary64))) (fma.f64 #s(literal 360 binary64) (/.f64 (-.f64 #s(literal 2/45 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 #s(literal 30 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 binary64)))))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -12 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)))))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)))))))
#s(approx (sinh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1)) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (sin.f64 ky) (pow.f64 (sin.f64 ky) #s(literal -1 binary64)))))
#s(approx (sinh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 kx kx) (*.f64 #s(literal 1/2 binary64) (+.f64 (pow.f64 (sin.f64 ky) #s(literal -1 binary64)) (pow.f64 (sin.f64 ky) #s(literal -3 binary64))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (sin.f64 ky) (pow.f64 (sin.f64 ky) #s(literal -1 binary64))))))
#s(approx (sinh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (sin.f64 ky) (pow.f64 (sin.f64 ky) #s(literal -1 binary64))) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (pow.f64 (sin.f64 ky) #s(literal -1 binary64)) (pow.f64 (sin.f64 ky) #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 kx kx) (-.f64 (fma.f64 #s(literal -1/24 binary64) (/.f64 (fma.f64 #s(literal -12 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)))) (sin.f64 ky)) (*.f64 #s(literal 1/8 binary64) (pow.f64 (sin.f64 ky) #s(literal -5 binary64)))) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 ky) (fma.f64 #s(literal -1/24 binary64) (fma.f64 #s(literal -12 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)))) (*.f64 #s(literal 1/8 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64))))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -3 binary64)))))))))))
#s(approx (sinh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (sin.f64 ky) (pow.f64 (sin.f64 ky) #s(literal -1 binary64))) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (pow.f64 (sin.f64 ky) #s(literal -1 binary64)) (pow.f64 (sin.f64 ky) #s(literal -3 binary64)))) (*.f64 (*.f64 kx kx) (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 kx kx) (-.f64 (fma.f64 #s(literal -1/720 binary64) (/.f64 (fma.f64 #s(literal 180 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)))) (pow.f64 (sin.f64 ky) #s(literal 4 binary64))) (fma.f64 #s(literal 360 binary64) (/.f64 (-.f64 #s(literal 2/45 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 #s(literal 30 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 binary64))))) (sin.f64 ky)) (*.f64 #s(literal 1/48 binary64) (/.f64 (fma.f64 #s(literal -12 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)))) (pow.f64 (sin.f64 ky) #s(literal 3 binary64))))) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 ky) (-.f64 (fma.f64 #s(literal -1/720 binary64) (fma.f64 #s(literal 30 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 binary64)) (fma.f64 #s(literal 180 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)))) (pow.f64 (sin.f64 ky) #s(literal 4 binary64))) (*.f64 #s(literal 360 binary64) (/.f64 (-.f64 #s(literal 2/45 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/48 binary64) (/.f64 (fma.f64 #s(literal -12 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (*.f64 #s(literal 1/48 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 binary64))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1/24 binary64) (fma.f64 #s(literal -12 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)))) (*.f64 #s(literal 1/8 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)))) (sin.f64 ky)) (fma.f64 #s(literal 1/48 binary64) (pow.f64 (sin.f64 ky) #s(literal -7 binary64)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 ky) (fma.f64 #s(literal -1/24 binary64) (fma.f64 #s(literal -12 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)))) (*.f64 #s(literal 1/8 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64))))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -3 binary64)))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))))) (-.f64 (fma.f64 #s(literal -1/24 binary64) (/.f64 (fma.f64 #s(literal -12 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)))) (sin.f64 ky)) (*.f64 #s(literal 1/8 binary64) (pow.f64 (sin.f64 ky) #s(literal -5 binary64)))) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 ky) (fma.f64 #s(literal -1/24 binary64) (fma.f64 #s(literal -12 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)))) (*.f64 #s(literal 1/8 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64))))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -3 binary64))))))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (-.f64 (sin.f64 th) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 kx kx) (sin.f64 th)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (+.f64 (sin.f64 th) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 kx kx) (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 (sin.f64 th) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) (*.f64 #s(literal 3/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 binary64))))))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (+.f64 (sin.f64 th) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 kx kx) (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 (sin.f64 th) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal 1/3 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) (*.f64 #s(literal 3/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 binary64)))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (fma.f64 #s(literal 2/45 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) (fma.f64 #s(literal 2/3 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 binary64)) (pow.f64 (sin.f64 ky) #s(literal -8 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 (sin.f64 th) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) (*.f64 #s(literal 3/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 binary64)))))))))))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(literal 1 binary64))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 kx kx) (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) (*.f64 #s(literal 3/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 binary64)))))) (*.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)))))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 kx kx) (fma.f64 (*.f64 kx kx) (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 kx kx) (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal 1/3 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) (*.f64 #s(literal 3/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 binary64)))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (fma.f64 #s(literal 2/45 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) (fma.f64 #s(literal 2/3 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 binary64)) (pow.f64 (sin.f64 ky) #s(literal -8 binary64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) (*.f64 #s(literal 3/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 binary64))))))) (*.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)))))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (sin.f64 ky))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (-.f64 (sin.f64 ky) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 kx kx) (sin.f64 ky)))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (+.f64 (sin.f64 ky) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 kx kx) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64))))) (sin.f64 ky)) (*.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 ky) #s(literal -1 binary64)))))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (+.f64 (sin.f64 ky) (*.f64 (*.f64 kx kx) (fma.f64 (*.f64 kx kx) (fma.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)))) (sin.f64 ky)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 kx kx) (-.f64 #s(literal 2/45 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (sin.f64 ky)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 ky) #s(literal -1 binary64)))))))
#s(approx (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))
#s(approx (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) (fma.f64 kx kx (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
#s(approx (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) (fma.f64 (*.f64 kx kx) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 kx kx))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
#s(approx (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) (fma.f64 (*.f64 kx kx) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 kx kx) (-.f64 (*.f64 #s(literal 2/45 binary64) (*.f64 kx kx)) #s(literal 1/3 binary64)))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
#s(approx (/ (- (cos (- kx kx)) (cos (+ kx kx))) 2) (*.f64 kx kx))
#s(approx (/ (- (cos (- kx kx)) (cos (+ kx kx))) 2) (*.f64 (*.f64 kx kx) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 kx kx)))))
#s(approx (/ (- (cos (- kx kx)) (cos (+ kx kx))) 2) (*.f64 (*.f64 kx kx) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 kx kx) (-.f64 (*.f64 #s(literal 2/45 binary64) (*.f64 kx kx)) #s(literal 1/3 binary64))))))
#s(approx (/ (- (cos (- kx kx)) (cos (+ kx kx))) 2) (*.f64 (*.f64 kx kx) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 kx kx) (-.f64 (*.f64 (*.f64 kx kx) (+.f64 #s(literal 2/45 binary64) (*.f64 #s(literal -1/315 binary64) (*.f64 kx kx)))) #s(literal 1/3 binary64))))))
#s(approx (- (cos (- kx kx)) (cos (+ kx kx))) (*.f64 #s(literal 2 binary64) (*.f64 kx kx)))
#s(approx (- (cos (- kx kx)) (cos (+ kx kx))) (*.f64 (*.f64 kx kx) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal -2/3 binary64) (*.f64 kx kx)))))
#s(approx (- (cos (- kx kx)) (cos (+ kx kx))) (*.f64 (*.f64 kx kx) (+.f64 #s(literal 2 binary64) (*.f64 (*.f64 kx kx) (-.f64 (*.f64 #s(literal 4/45 binary64) (*.f64 kx kx)) #s(literal 2/3 binary64))))))
#s(approx (- (cos (- kx kx)) (cos (+ kx kx))) (*.f64 (*.f64 kx kx) (+.f64 #s(literal 2 binary64) (*.f64 (*.f64 kx kx) (-.f64 (*.f64 (*.f64 kx kx) (+.f64 #s(literal 4/45 binary64) (*.f64 #s(literal -2/315 binary64) (*.f64 kx kx)))) #s(literal 2/3 binary64))))))
#s(approx (cos (- kx kx)) #s(literal 1 binary64))
#s(approx (- kx kx) #s(literal 0 binary64))
#s(approx (cos (+ kx kx)) #s(literal 1 binary64))
#s(approx (cos (+ kx kx)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (*.f64 kx kx))))
#s(approx (cos (+ kx kx)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 kx kx) (-.f64 (*.f64 #s(literal 2/3 binary64) (*.f64 kx kx)) #s(literal 2 binary64)))))
#s(approx (cos (+ kx kx)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 kx kx) (-.f64 (*.f64 (*.f64 kx kx) (-.f64 #s(literal 2/3 binary64) (*.f64 #s(literal 4/45 binary64) (*.f64 kx kx)))) #s(literal 2 binary64)))))
#s(approx (+ kx kx) (*.f64 #s(literal 2 binary64) kx))
#s(approx (/ (* (sin th) (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (sin.f64 th))
#s(approx (/ (* (sin th) (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (-.f64 (sin.f64 th) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 kx kx) (sin.f64 th)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
#s(approx (/ (* (sin th) (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (+.f64 (sin.f64 th) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 kx kx) (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 (sin.f64 th) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) (*.f64 #s(literal 3/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 binary64))))))))))))
#s(approx (/ (* (sin th) (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (+.f64 (sin.f64 th) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 kx kx) (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 (sin.f64 th) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal 1/3 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) (*.f64 #s(literal 3/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 binary64)))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (fma.f64 #s(literal 2/45 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) (fma.f64 #s(literal 2/3 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 binary64)) (pow.f64 (sin.f64 ky) #s(literal -8 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 (sin.f64 th) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) (*.f64 #s(literal 3/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 binary64)))))))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64))))
#s(approx (* (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (sin th)) (sin ky)) (*.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64))))
#s(approx (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (sin th)) (*.f64 (sin.f64 th) (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64))))
#s(approx (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)))
#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 (* (pow (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) 1/2) -1) (* (sin th) (sin ky))) (*.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64))))
#s(approx (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))
#s(approx (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) (fma.f64 (sin.f64 kx) (sin.f64 kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (*.f64 (sin.f64 ky) (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64))))
#s(approx (* (+ (cosh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1)) (sinh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1))) (sin ky)) (*.f64 (sin.f64 ky) (*.f64 #s(literal 1/2 binary64) (+.f64 (+.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64))) (-.f64 (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)) (*.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))))))
#s(approx (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (*.f64 #s(literal 1/2 binary64) (+.f64 (+.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64))) (-.f64 (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)) (*.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))))
#s(approx (cosh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1)) (*.f64 #s(literal 1/2 binary64) (+.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)))))
#s(approx (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1) (*.f64 #s(literal -1 binary64) (log.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))
#s(approx (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (log.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky))))
#s(approx (sinh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1)) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)) (*.f64 #s(literal 1 binary64) (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 ky) (sin.f64 th)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) kx))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (*.f64 (sin.f64 ky) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) kx))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) kx))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
#s(approx (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) kx))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
#s(approx (/ (- (cos (- kx kx)) (cos (+ kx kx))) 2) (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) kx)))))
#s(approx (- (cos (- kx kx)) (cos (+ kx kx))) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) kx))))
#s(approx (cos (+ kx kx)) (cos.f64 (*.f64 #s(literal -2 binary64) kx)))
#s(approx (/ (* (sin th) (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (*.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (*.f64 (sin.f64 ky) (sin.f64 th)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) kx))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (*.f64 (sin.f64 ky) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) kx))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) kx))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
#s(approx (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) kx))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
#s(approx (/ (- (cos (- kx kx)) (cos (+ kx kx))) 2) (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) kx)))))
#s(approx (- (cos (- kx kx)) (cos (+ kx kx))) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) kx))))
#s(approx (cos (+ kx kx)) (cos.f64 (*.f64 #s(literal -2 binary64) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 ky (sin.f64 th)) (sin.f64 kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 ky (fma.f64 (*.f64 ky ky) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (*.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sin.f64 kx)))) (/.f64 (sin.f64 th) (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 ky (fma.f64 (*.f64 ky ky) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sin.f64 kx)) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal 1/120 binary64) (/.f64 (sin.f64 th) (sin.f64 kx)) (fma.f64 #s(literal 1/12 binary64) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 kx) (*.f64 (sin.f64 th) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) (*.f64 #s(literal 3/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -6 binary64)))))))))))) (/.f64 (sin.f64 th) (sin.f64 kx)))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 ky (fma.f64 (*.f64 ky ky) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sin.f64 kx)) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal 1/120 binary64) (/.f64 (sin.f64 th) (sin.f64 kx)) (fma.f64 #s(literal 1/12 binary64) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 kx) (*.f64 (sin.f64 th) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) (*.f64 #s(literal 3/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -6 binary64)))))) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 kx) (*.f64 (sin.f64 th) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal 1/3 binary64) (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) (*.f64 #s(literal 3/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -6 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (fma.f64 #s(literal 2/45 binary64) (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) (fma.f64 #s(literal 2/3 binary64) (pow.f64 (sin.f64 kx) #s(literal -6 binary64)) (pow.f64 (sin.f64 kx) #s(literal -8 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.f64 (sin.f64 kx) (*.f64 (sin.f64 th) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) (*.f64 #s(literal 3/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -6 binary64)))))) (fma.f64 #s(literal -1/240 binary64) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (*.f64 #s(literal -1/5040 binary64) (/.f64 (sin.f64 th) (sin.f64 kx))))))))))))) (/.f64 (sin.f64 th) (sin.f64 kx)))))
#s(approx (* (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (sin th)) (sin ky)) (/.f64 (*.f64 ky (sin.f64 th)) (sin.f64 kx)))
#s(approx (* (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (sin th)) (sin ky)) (*.f64 ky (fma.f64 (*.f64 ky ky) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (*.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sin.f64 kx)))) (/.f64 (sin.f64 th) (sin.f64 kx)))))
#s(approx (* (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (sin th)) (sin ky)) (*.f64 ky (fma.f64 (*.f64 ky ky) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sin.f64 kx)) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal 1/120 binary64) (/.f64 (sin.f64 th) (sin.f64 kx)) (fma.f64 #s(literal 1/12 binary64) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 kx) (*.f64 (sin.f64 th) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) (*.f64 #s(literal 3/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -6 binary64)))))))))))) (/.f64 (sin.f64 th) (sin.f64 kx)))))
#s(approx (* (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (sin th)) (sin ky)) (*.f64 ky (fma.f64 (*.f64 ky ky) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sin.f64 kx)) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal 1/120 binary64) (/.f64 (sin.f64 th) (sin.f64 kx)) (fma.f64 #s(literal 1/12 binary64) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 kx) (*.f64 (sin.f64 th) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) (*.f64 #s(literal 3/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -6 binary64)))))) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 kx) (*.f64 (sin.f64 th) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal 1/3 binary64) (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) (*.f64 #s(literal 3/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -6 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (fma.f64 #s(literal 2/45 binary64) (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) (fma.f64 #s(literal 2/3 binary64) (pow.f64 (sin.f64 kx) #s(literal -6 binary64)) (pow.f64 (sin.f64 kx) #s(literal -8 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.f64 (sin.f64 kx) (*.f64 (sin.f64 th) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) (*.f64 #s(literal 3/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -6 binary64)))))) (fma.f64 #s(literal -1/240 binary64) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (*.f64 #s(literal -1/5040 binary64) (/.f64 (sin.f64 th) (sin.f64 kx))))))))))))) (/.f64 (sin.f64 th) (sin.f64 kx)))))
#s(approx (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (sin th)) (/.f64 (sin.f64 th) (sin.f64 kx)))
#s(approx (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (sin th)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 ky ky) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (/.f64 (sin.f64 th) (sin.f64 kx))))
#s(approx (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (sin th)) (fma.f64 (*.f64 ky ky) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 ky ky) (*.f64 (sin.f64 kx) (*.f64 (sin.f64 th) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) (*.f64 #s(literal 3/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -6 binary64))))))))) (/.f64 (sin.f64 th) (sin.f64 kx))))
#s(approx (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (sin th)) (fma.f64 (*.f64 ky ky) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 ky ky) (*.f64 (sin.f64 kx) (*.f64 (sin.f64 th) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal 1/3 binary64) (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) (*.f64 #s(literal 3/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -6 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (fma.f64 #s(literal 2/45 binary64) (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) (fma.f64 #s(literal 2/3 binary64) (pow.f64 (sin.f64 kx) #s(literal -6 binary64)) (pow.f64 (sin.f64 kx) #s(literal -8 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 kx) (*.f64 (sin.f64 th) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) (*.f64 #s(literal 3/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -6 binary64)))))))))) (/.f64 (sin.f64 th) (sin.f64 kx))))
#s(approx (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (pow.f64 (sin.f64 kx) #s(literal -1 binary64)))
#s(approx (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ky ky) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (pow.f64 (sin.f64 kx) #s(literal -1 binary64))))
#s(approx (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (fma.f64 (*.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 ky ky) (*.f64 (sin.f64 kx) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) (*.f64 #s(literal 3/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -6 binary64)))))) (*.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 kx) #s(literal -3 binary64)))) (pow.f64 (sin.f64 kx) #s(literal -1 binary64))))
#s(approx (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (fma.f64 (*.f64 ky ky) (fma.f64 (*.f64 ky ky) (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 ky ky) (*.f64 (sin.f64 kx) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal 1/3 binary64) (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) (*.f64 #s(literal 3/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -6 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (fma.f64 #s(literal 2/45 binary64) (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) (fma.f64 #s(literal 2/3 binary64) (pow.f64 (sin.f64 kx) #s(literal -6 binary64)) (pow.f64 (sin.f64 kx) #s(literal -8 binary64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 kx) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) (*.f64 #s(literal 3/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -6 binary64))))))) (*.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 kx) #s(literal -3 binary64)))) (pow.f64 (sin.f64 kx) #s(literal -1 binary64))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (sin.f64 kx))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (-.f64 (sin.f64 kx) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ky ky) (sin.f64 kx)))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (+.f64 (sin.f64 kx) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 ky ky) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -2 binary64))))) (sin.f64 kx)) (*.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 kx) #s(literal -1 binary64)))))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (+.f64 (sin.f64 kx) (*.f64 (*.f64 ky ky) (fma.f64 (*.f64 ky ky) (fma.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -2 binary64)))) (sin.f64 kx)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 ky ky) (-.f64 #s(literal 2/45 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))) (sin.f64 kx)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 kx) #s(literal -1 binary64)))))))
#s(approx (sin ky) ky)
#s(approx (sin ky) (*.f64 ky (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 ky ky)))))
#s(approx (sin ky) (*.f64 ky (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 ky ky) (-.f64 (*.f64 #s(literal 1/120 binary64) (*.f64 ky ky)) #s(literal 1/6 binary64))))))
#s(approx (sin ky) (*.f64 ky (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 ky ky) (-.f64 (*.f64 (*.f64 ky ky) (+.f64 #s(literal 1/120 binary64) (*.f64 #s(literal -1/5040 binary64) (*.f64 ky ky)))) #s(literal 1/6 binary64))))))
#s(approx ky ky)
#s(approx (* (pow (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) 1/2) -1) (* (sin th) (sin ky))) (/.f64 (*.f64 ky (sin.f64 th)) (sin.f64 kx)))
#s(approx (* (pow (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) 1/2) -1) (* (sin th) (sin ky))) (*.f64 ky (fma.f64 (*.f64 ky ky) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (*.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sin.f64 kx)))) (/.f64 (sin.f64 th) (sin.f64 kx)))))
#s(approx (* (pow (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) 1/2) -1) (* (sin th) (sin ky))) (*.f64 ky (fma.f64 (*.f64 ky ky) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sin.f64 kx)) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal 1/120 binary64) (/.f64 (sin.f64 th) (sin.f64 kx)) (fma.f64 #s(literal 1/12 binary64) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 kx) (*.f64 (sin.f64 th) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) (*.f64 #s(literal 3/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -6 binary64)))))))))))) (/.f64 (sin.f64 th) (sin.f64 kx)))))
#s(approx (* (pow (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) 1/2) -1) (* (sin th) (sin ky))) (*.f64 ky (fma.f64 (*.f64 ky ky) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sin.f64 kx)) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal 1/120 binary64) (/.f64 (sin.f64 th) (sin.f64 kx)) (fma.f64 #s(literal 1/12 binary64) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 kx) (*.f64 (sin.f64 th) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) (*.f64 #s(literal 3/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -6 binary64)))))) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 kx) (*.f64 (sin.f64 th) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal 1/3 binary64) (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) (*.f64 #s(literal 3/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -6 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (fma.f64 #s(literal 2/45 binary64) (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) (fma.f64 #s(literal 2/3 binary64) (pow.f64 (sin.f64 kx) #s(literal -6 binary64)) (pow.f64 (sin.f64 kx) #s(literal -8 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.f64 (sin.f64 kx) (*.f64 (sin.f64 th) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) (*.f64 #s(literal 3/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -6 binary64)))))) (fma.f64 #s(literal -1/240 binary64) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (*.f64 #s(literal -1/5040 binary64) (/.f64 (sin.f64 th) (sin.f64 kx))))))))))))) (/.f64 (sin.f64 th) (sin.f64 kx)))))
#s(approx (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (pow.f64 (sin.f64 kx) #s(literal -1 binary64)))
#s(approx (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ky ky) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (pow.f64 (sin.f64 kx) #s(literal -1 binary64))))
#s(approx (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (fma.f64 (*.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 ky ky) (*.f64 (sin.f64 kx) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) (*.f64 #s(literal 3/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -6 binary64)))))) (*.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 kx) #s(literal -3 binary64)))) (pow.f64 (sin.f64 kx) #s(literal -1 binary64))))
#s(approx (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (fma.f64 (*.f64 ky ky) (fma.f64 (*.f64 ky ky) (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 ky ky) (*.f64 (sin.f64 kx) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal 1/3 binary64) (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) (*.f64 #s(literal 3/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -6 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (fma.f64 #s(literal 2/45 binary64) (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) (fma.f64 #s(literal 2/3 binary64) (pow.f64 (sin.f64 kx) #s(literal -6 binary64)) (pow.f64 (sin.f64 kx) #s(literal -8 binary64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 kx) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) (*.f64 #s(literal 3/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -6 binary64))))))) (*.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 kx) #s(literal -3 binary64)))) (pow.f64 (sin.f64 kx) #s(literal -1 binary64))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (sin.f64 kx))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (-.f64 (sin.f64 kx) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ky ky) (sin.f64 kx)))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (+.f64 (sin.f64 kx) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 ky ky) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -2 binary64))))) (sin.f64 kx)) (*.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 kx) #s(literal -1 binary64)))))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (+.f64 (sin.f64 kx) (*.f64 (*.f64 ky ky) (fma.f64 (*.f64 ky ky) (fma.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -2 binary64)))) (sin.f64 kx)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 ky ky) (-.f64 #s(literal 2/45 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))) (sin.f64 kx)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 kx) #s(literal -1 binary64)))))))
#s(approx (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))
#s(approx (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) (fma.f64 ky ky (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))
#s(approx (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) (fma.f64 (*.f64 ky ky) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 ky ky))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))
#s(approx (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) (fma.f64 (*.f64 ky ky) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 ky ky) (-.f64 (*.f64 #s(literal 2/45 binary64) (*.f64 ky ky)) #s(literal 1/3 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))
#s(approx (pow (sin ky) 2) (*.f64 ky ky))
#s(approx (pow (sin ky) 2) (*.f64 (*.f64 ky ky) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 ky ky)))))
#s(approx (pow (sin ky) 2) (*.f64 (*.f64 ky ky) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 ky ky) (-.f64 (*.f64 #s(literal 2/45 binary64) (*.f64 ky ky)) #s(literal 1/3 binary64))))))
#s(approx (pow (sin ky) 2) (*.f64 (*.f64 ky ky) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 ky ky) (-.f64 (*.f64 (*.f64 ky ky) (+.f64 #s(literal 2/45 binary64) (*.f64 #s(literal -1/315 binary64) (*.f64 ky ky)))) #s(literal 1/3 binary64))))))
#s(approx (* (sin th) (sin ky)) (*.f64 ky (sin.f64 th)))
#s(approx (* (sin th) (sin ky)) (*.f64 ky (-.f64 (sin.f64 th) (*.f64 #s(literal 1/6 binary64) (*.f64 (*.f64 ky ky) (sin.f64 th))))))
#s(approx (* (sin th) (sin ky)) (*.f64 ky (+.f64 (sin.f64 th) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -1/6 binary64) (sin.f64 th) (*.f64 #s(literal 1/120 binary64) (*.f64 (*.f64 ky ky) (sin.f64 th))))))))
#s(approx (* (sin th) (sin ky)) (*.f64 ky (+.f64 (sin.f64 th) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -1/6 binary64) (sin.f64 th) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -1/5040 binary64) (*.f64 (*.f64 ky ky) (sin.f64 th)) (*.f64 #s(literal 1/120 binary64) (sin.f64 th)))))))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (sin.f64 kx)))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (*.f64 ky (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (sin.f64 kx) #s(literal -1 binary64)) (*.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 kx) #s(literal -3 binary64))))) (pow.f64 (sin.f64 kx) #s(literal -1 binary64)))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (*.f64 ky (fma.f64 (*.f64 ky ky) (-.f64 (*.f64 (*.f64 ky ky) (fma.f64 #s(literal 1/120 binary64) (pow.f64 (sin.f64 kx) #s(literal -1 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 kx) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) (*.f64 #s(literal 3/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -6 binary64))))) (*.f64 #s(literal 1/12 binary64) (pow.f64 (sin.f64 kx) #s(literal -3 binary64)))))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (sin.f64 kx) #s(literal -1 binary64)) (*.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 kx) #s(literal -3 binary64))))) (pow.f64 (sin.f64 kx) #s(literal -1 binary64)))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (*.f64 ky (fma.f64 (*.f64 ky ky) (-.f64 (*.f64 (*.f64 ky ky) (fma.f64 #s(literal 1/120 binary64) (pow.f64 (sin.f64 kx) #s(literal -1 binary64)) (fma.f64 #s(literal 1/12 binary64) (pow.f64 (sin.f64 kx) #s(literal -3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 kx) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) (*.f64 #s(literal 3/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -6 binary64))))) (*.f64 (*.f64 ky ky) (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 kx) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal 1/3 binary64) (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) (*.f64 #s(literal 3/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -6 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (fma.f64 #s(literal 2/45 binary64) (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) (fma.f64 #s(literal 2/3 binary64) (pow.f64 (sin.f64 kx) #s(literal -6 binary64)) (pow.f64 (sin.f64 kx) #s(literal -8 binary64)))))) (*.f64 #s(literal -1/12 binary64) (*.f64 (sin.f64 kx) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) (*.f64 #s(literal 3/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -6 binary64))))))) (fma.f64 #s(literal 1/5040 binary64) (pow.f64 (sin.f64 kx) #s(literal -1 binary64)) (*.f64 #s(literal 1/240 binary64) (pow.f64 (sin.f64 kx) #s(literal -3 binary64)))))))))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (sin.f64 kx) #s(literal -1 binary64)) (*.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 kx) #s(literal -3 binary64))))) (pow.f64 (sin.f64 kx) #s(literal -1 binary64)))))
#s(approx (* (+ (cosh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1)) (sinh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1))) (sin ky)) (*.f64 ky (*.f64 #s(literal 1/2 binary64) (+.f64 (+.f64 (sin.f64 kx) (pow.f64 (sin.f64 kx) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (sin.f64 kx) (pow.f64 (sin.f64 kx) #s(literal -1 binary64)))))))
#s(approx (* (+ (cosh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1)) (sinh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1))) (sin ky)) (*.f64 ky (fma.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 kx) (pow.f64 (sin.f64 kx) #s(literal -1 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (sin.f64 kx) (pow.f64 (sin.f64 kx) #s(literal -1 binary64))) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal -1 binary64)) (pow.f64 (sin.f64 kx) #s(literal -3 binary64)))) (fma.f64 #s(literal -1/6 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (+.f64 (sin.f64 kx) (pow.f64 (sin.f64 kx) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (sin.f64 kx) (pow.f64 (sin.f64 kx) #s(literal -1 binary64))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 kx) #s(literal -1 binary64)) (*.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 kx) #s(literal -3 binary64))))))))))))
#s(approx (* (+ (cosh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1)) (sinh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1))) (sin ky)) (*.f64 ky (fma.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 kx) (pow.f64 (sin.f64 kx) #s(literal -1 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (sin.f64 kx) (pow.f64 (sin.f64 kx) #s(literal -1 binary64))) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal -1 binary64)) (pow.f64 (sin.f64 kx) #s(literal -3 binary64)))) (fma.f64 #s(literal -1/6 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (+.f64 (sin.f64 kx) (pow.f64 (sin.f64 kx) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (sin.f64 kx) (pow.f64 (sin.f64 kx) #s(literal -1 binary64))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 kx) #s(literal -1 binary64)) (*.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 kx) #s(literal -3 binary64)))) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal -1 binary64)) (pow.f64 (sin.f64 kx) #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 kx) #s(literal -1 binary64)) (*.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 kx) #s(literal -3 binary64)))))) (fma.f64 #s(literal 1/120 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (+.f64 (sin.f64 kx) (pow.f64 (sin.f64 kx) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (sin.f64 kx) (pow.f64 (sin.f64 kx) #s(literal -1 binary64))))) (*.f64 #s(literal 1/2 binary64) (+.f64 (-.f64 (fma.f64 #s(literal -1/24 binary64) (/.f64 (fma.f64 #s(literal -12 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (pow.f64 (sin.f64 kx) #s(literal -4 binary64)))) (sin.f64 kx)) (*.f64 #s(literal 1/8 binary64) (pow.f64 (sin.f64 kx) #s(literal -5 binary64)))) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 kx) (fma.f64 #s(literal -1/24 binary64) (fma.f64 #s(literal -12 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (pow.f64 (sin.f64 kx) #s(literal -4 binary64)))) (*.f64 #s(literal 1/8 binary64) (pow.f64 (sin.f64 kx) #s(literal -4 binary64))))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -3 binary64))))) (-.f64 (fma.f64 #s(literal -1/24 binary64) (/.f64 (fma.f64 #s(literal -12 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (pow.f64 (sin.f64 kx) #s(literal -4 binary64)))) (sin.f64 kx)) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (sin.f64 kx) #s(literal -5 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -3 binary64))))) (*.f64 (sin.f64 kx) (fma.f64 #s(literal -1/24 binary64) (fma.f64 #s(literal -12 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (pow.f64 (sin.f64 kx) #s(literal -4 binary64)))) (*.f64 #s(literal 1/8 binary64) (pow.f64 (sin.f64 kx) #s(literal -4 binary64)))))))))))))))))))
#s(approx (* (+ (cosh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1)) (sinh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1))) (sin ky)) (*.f64 ky (fma.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 kx) (pow.f64 (sin.f64 kx) #s(literal -1 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (sin.f64 kx) (pow.f64 (sin.f64 kx) #s(literal -1 binary64))) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal -1 binary64)) (pow.f64 (sin.f64 kx) #s(literal -3 binary64)))) (fma.f64 #s(literal -1/6 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (+.f64 (sin.f64 kx) (pow.f64 (sin.f64 kx) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (sin.f64 kx) (pow.f64 (sin.f64 kx) #s(literal -1 binary64))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 kx) #s(literal -1 binary64)) (*.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 kx) #s(literal -3 binary64)))) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal -1 binary64)) (pow.f64 (sin.f64 kx) #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 kx) #s(literal -1 binary64)) (*.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 kx) #s(literal -3 binary64)))))) (fma.f64 #s(literal 1/120 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (+.f64 (sin.f64 kx) (pow.f64 (sin.f64 kx) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (sin.f64 kx) (pow.f64 (sin.f64 kx) #s(literal -1 binary64))))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (fma.f64 #s(literal -1/24 binary64) (/.f64 (fma.f64 #s(literal -12 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (pow.f64 (sin.f64 kx) #s(literal -4 binary64)))) (sin.f64 kx)) (*.f64 #s(literal 1/8 binary64) (pow.f64 (sin.f64 kx) #s(literal -5 binary64)))) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 kx) (fma.f64 #s(literal -1/24 binary64) (fma.f64 #s(literal -12 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (pow.f64 (sin.f64 kx) #s(literal -4 binary64)))) (*.f64 #s(literal 1/8 binary64) (pow.f64 (sin.f64 kx) #s(literal -4 binary64))))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (fma.f64 #s(literal -1/24 binary64) (/.f64 (fma.f64 #s(literal -12 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (pow.f64 (sin.f64 kx) #s(literal -4 binary64)))) (sin.f64 kx)) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (sin.f64 kx) #s(literal -5 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -3 binary64))))) (*.f64 (sin.f64 kx) (fma.f64 #s(literal -1/24 binary64) (fma.f64 #s(literal -12 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (pow.f64 (sin.f64 kx) #s(literal -4 binary64)))) (*.f64 #s(literal 1/8 binary64) (pow.f64 (sin.f64 kx) #s(literal -4 binary64)))))) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -1/6 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (-.f64 (fma.f64 #s(literal -1/24 binary64) (/.f64 (fma.f64 #s(literal -12 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (pow.f64 (sin.f64 kx) #s(literal -4 binary64)))) (sin.f64 kx)) (*.f64 #s(literal 1/8 binary64) (pow.f64 (sin.f64 kx) #s(literal -5 binary64)))) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 kx) (fma.f64 #s(literal -1/24 binary64) (fma.f64 #s(literal -12 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (pow.f64 (sin.f64 kx) #s(literal -4 binary64)))) (*.f64 #s(literal 1/8 binary64) (pow.f64 (sin.f64 kx) #s(literal -4 binary64))))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -3 binary64))))) (-.f64 (fma.f64 #s(literal -1/24 binary64) (/.f64 (fma.f64 #s(literal -12 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (pow.f64 (sin.f64 kx) #s(literal -4 binary64)))) (sin.f64 kx)) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (sin.f64 kx) #s(literal -5 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -3 binary64))))) (*.f64 (sin.f64 kx) (fma.f64 #s(literal -1/24 binary64) (fma.f64 #s(literal -12 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (pow.f64 (sin.f64 kx) #s(literal -4 binary64)))) (*.f64 #s(literal 1/8 binary64) (pow.f64 (sin.f64 kx) #s(literal -4 binary64)))))))) (fma.f64 #s(literal -1/5040 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (+.f64 (sin.f64 kx) (pow.f64 (sin.f64 kx) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (sin.f64 kx) (pow.f64 (sin.f64 kx) #s(literal -1 binary64))))) (fma.f64 #s(literal 1/120 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal -1 binary64)) (pow.f64 (sin.f64 kx) #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 kx) #s(literal -1 binary64)) (*.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 kx) #s(literal -3 binary64)))))) (*.f64 #s(literal 1/2 binary64) (+.f64 (-.f64 (fma.f64 #s(literal -1/720 binary64) (/.f64 (fma.f64 #s(literal 180 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 4 binary64))) (fma.f64 #s(literal 360 binary64) (/.f64 (-.f64 #s(literal 2/45 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 #s(literal 30 binary64) (pow.f64 (sin.f64 kx) #s(literal -6 binary64))))) (sin.f64 kx)) (*.f64 #s(literal 1/48 binary64) (/.f64 (fma.f64 #s(literal -12 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (pow.f64 (sin.f64 kx) #s(literal -4 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))))) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 kx) (-.f64 (fma.f64 #s(literal -1/720 binary64) (fma.f64 #s(literal 30 binary64) (pow.f64 (sin.f64 kx) #s(literal -6 binary64)) (fma.f64 #s(literal 180 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 4 binary64))) (*.f64 #s(literal 360 binary64) (/.f64 (-.f64 #s(literal 2/45 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/48 binary64) (/.f64 (fma.f64 #s(literal -12 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (pow.f64 (sin.f64 kx) #s(literal -4 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (*.f64 #s(literal 1/48 binary64) (pow.f64 (sin.f64 kx) #s(literal -6 binary64))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1/24 binary64) (fma.f64 #s(literal -12 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (pow.f64 (sin.f64 kx) #s(literal -4 binary64)))) (*.f64 #s(literal 1/8 binary64) (pow.f64 (sin.f64 kx) #s(literal -4 binary64)))) (sin.f64 kx)) (fma.f64 #s(literal 1/48 binary64) (pow.f64 (sin.f64 kx) #s(literal -7 binary64)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 kx) (fma.f64 #s(literal -1/24 binary64) (fma.f64 #s(literal -12 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (pow.f64 (sin.f64 kx) #s(literal -4 binary64)))) (*.f64 #s(literal 1/8 binary64) (pow.f64 (sin.f64 kx) #s(literal -4 binary64))))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -3 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))))) (-.f64 (fma.f64 #s(literal -1/720 binary64) (/.f64 (fma.f64 #s(literal 180 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 4 binary64))) (fma.f64 #s(literal 360 binary64) (/.f64 (-.f64 #s(literal 2/45 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 #s(literal 30 binary64) (pow.f64 (sin.f64 kx) #s(literal -6 binary64))))) (sin.f64 kx)) (*.f64 #s(literal 1/48 binary64) (/.f64 (fma.f64 #s(literal -12 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (pow.f64 (sin.f64 kx) #s(literal -4 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -3 binary64))) (*.f64 (sin.f64 kx) (fma.f64 #s(literal -1/24 binary64) (fma.f64 #s(literal -12 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (pow.f64 (sin.f64 kx) #s(literal -4 binary64)))) (*.f64 #s(literal 1/8 binary64) (pow.f64 (sin.f64 kx) #s(literal -4 binary64)))))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (fma.f64 #s(literal 1/48 binary64) (pow.f64 (sin.f64 kx) #s(literal -7 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/24 binary64) (fma.f64 #s(literal -12 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (pow.f64 (sin.f64 kx) #s(literal -4 binary64)))) (*.f64 #s(literal 1/8 binary64) (pow.f64 (sin.f64 kx) #s(literal -4 binary64)))) (sin.f64 kx)) (*.f64 (sin.f64 kx) (-.f64 (fma.f64 #s(literal -1/720 binary64) (fma.f64 #s(literal 30 binary64) (pow.f64 (sin.f64 kx) #s(literal -6 binary64)) (fma.f64 #s(literal 180 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 4 binary64))) (*.f64 #s(literal 360 binary64) (/.f64 (-.f64 #s(literal 2/45 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/48 binary64) (/.f64 (fma.f64 #s(literal -12 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (pow.f64 (sin.f64 kx) #s(literal -4 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (*.f64 #s(literal 1/48 binary64) (pow.f64 (sin.f64 kx) #s(literal -6 binary64))))))))))))))))))))))))))))
#s(approx (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (*.f64 #s(literal 1/2 binary64) (+.f64 (+.f64 (sin.f64 kx) (pow.f64 (sin.f64 kx) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (sin.f64 kx) (pow.f64 (sin.f64 kx) #s(literal -1 binary64))))))
#s(approx (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (fma.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 kx) (pow.f64 (sin.f64 kx) #s(literal -1 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (sin.f64 kx) (pow.f64 (sin.f64 kx) #s(literal -1 binary64))) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal -1 binary64)) (pow.f64 (sin.f64 kx) #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 kx) #s(literal -1 binary64)) (*.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 kx) #s(literal -3 binary64))))))))))
#s(approx (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (fma.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 kx) (pow.f64 (sin.f64 kx) #s(literal -1 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (sin.f64 kx) (pow.f64 (sin.f64 kx) #s(literal -1 binary64))) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal -1 binary64)) (pow.f64 (sin.f64 kx) #s(literal -3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 kx) #s(literal -1 binary64)) (*.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 kx) #s(literal -3 binary64)))) (*.f64 (*.f64 ky ky) (*.f64 #s(literal 1/2 binary64) (+.f64 (-.f64 (fma.f64 #s(literal -1/24 binary64) (/.f64 (fma.f64 #s(literal -12 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (pow.f64 (sin.f64 kx) #s(literal -4 binary64)))) (sin.f64 kx)) (*.f64 #s(literal 1/8 binary64) (pow.f64 (sin.f64 kx) #s(literal -5 binary64)))) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 kx) (fma.f64 #s(literal -1/24 binary64) (fma.f64 #s(literal -12 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (pow.f64 (sin.f64 kx) #s(literal -4 binary64)))) (*.f64 #s(literal 1/8 binary64) (pow.f64 (sin.f64 kx) #s(literal -4 binary64))))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -3 binary64))))) (-.f64 (fma.f64 #s(literal -1/24 binary64) (/.f64 (fma.f64 #s(literal -12 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (pow.f64 (sin.f64 kx) #s(literal -4 binary64)))) (sin.f64 kx)) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (sin.f64 kx) #s(literal -5 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -3 binary64))))) (*.f64 (sin.f64 kx) (fma.f64 #s(literal -1/24 binary64) (fma.f64 #s(literal -12 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (pow.f64 (sin.f64 kx) #s(literal -4 binary64)))) (*.f64 #s(literal 1/8 binary64) (pow.f64 (sin.f64 kx) #s(literal -4 binary64)))))))))))))))
#s(approx (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (fma.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 kx) (pow.f64 (sin.f64 kx) #s(literal -1 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (sin.f64 kx) (pow.f64 (sin.f64 kx) #s(literal -1 binary64))) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal -1 binary64)) (pow.f64 (sin.f64 kx) #s(literal -3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 kx) #s(literal -1 binary64)) (*.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 kx) #s(literal -3 binary64)))) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (-.f64 (fma.f64 #s(literal -1/24 binary64) (/.f64 (fma.f64 #s(literal -12 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (pow.f64 (sin.f64 kx) #s(literal -4 binary64)))) (sin.f64 kx)) (*.f64 #s(literal 1/8 binary64) (pow.f64 (sin.f64 kx) #s(literal -5 binary64)))) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 kx) (fma.f64 #s(literal -1/24 binary64) (fma.f64 #s(literal -12 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (pow.f64 (sin.f64 kx) #s(literal -4 binary64)))) (*.f64 #s(literal 1/8 binary64) (pow.f64 (sin.f64 kx) #s(literal -4 binary64))))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (fma.f64 #s(literal -1/24 binary64) (/.f64 (fma.f64 #s(literal -12 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (pow.f64 (sin.f64 kx) #s(literal -4 binary64)))) (sin.f64 kx)) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (sin.f64 kx) #s(literal -5 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -3 binary64))))) (*.f64 (sin.f64 kx) (fma.f64 #s(literal -1/24 binary64) (fma.f64 #s(literal -12 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (pow.f64 (sin.f64 kx) #s(literal -4 binary64)))) (*.f64 #s(literal 1/8 binary64) (pow.f64 (sin.f64 kx) #s(literal -4 binary64)))))) (*.f64 (*.f64 ky ky) (*.f64 #s(literal 1/2 binary64) (+.f64 (-.f64 (fma.f64 #s(literal -1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 (sin.f64 kx) #s(literal -6 binary64)) (fma.f64 #s(literal 180 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 4 binary64))) (*.f64 #s(literal 360 binary64) (/.f64 (-.f64 #s(literal 2/45 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))) (sin.f64 kx)) (*.f64 #s(literal 1/48 binary64) (/.f64 (fma.f64 #s(literal -12 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (pow.f64 (sin.f64 kx) #s(literal -4 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))))) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 kx) (-.f64 (fma.f64 #s(literal -1/720 binary64) (fma.f64 #s(literal 180 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 4 binary64))) (fma.f64 #s(literal 360 binary64) (/.f64 (-.f64 #s(literal 2/45 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 #s(literal 30 binary64) (pow.f64 (sin.f64 kx) #s(literal -6 binary64))))) (*.f64 #s(literal 1/48 binary64) (/.f64 (fma.f64 #s(literal -12 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (pow.f64 (sin.f64 kx) #s(literal -4 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (*.f64 #s(literal 1/48 binary64) (pow.f64 (sin.f64 kx) #s(literal -6 binary64))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1/24 binary64) (fma.f64 #s(literal -12 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (pow.f64 (sin.f64 kx) #s(literal -4 binary64)))) (*.f64 #s(literal 1/8 binary64) (pow.f64 (sin.f64 kx) #s(literal -4 binary64)))) (sin.f64 kx)) (fma.f64 #s(literal 1/48 binary64) (pow.f64 (sin.f64 kx) #s(literal -7 binary64)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 kx) (fma.f64 #s(literal -1/24 binary64) (fma.f64 #s(literal -12 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (pow.f64 (sin.f64 kx) #s(literal -4 binary64)))) (*.f64 #s(literal 1/8 binary64) (pow.f64 (sin.f64 kx) #s(literal -4 binary64))))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -3 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))))) (-.f64 (fma.f64 #s(literal -1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 (sin.f64 kx) #s(literal -6 binary64)) (fma.f64 #s(literal 180 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 4 binary64))) (*.f64 #s(literal 360 binary64) (/.f64 (-.f64 #s(literal 2/45 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))) (sin.f64 kx)) (*.f64 #s(literal 1/48 binary64) (/.f64 (fma.f64 #s(literal -12 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (pow.f64 (sin.f64 kx) #s(literal -4 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -3 binary64))) (*.f64 (sin.f64 kx) (fma.f64 #s(literal -1/24 binary64) (fma.f64 #s(literal -12 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (pow.f64 (sin.f64 kx) #s(literal -4 binary64)))) (*.f64 #s(literal 1/8 binary64) (pow.f64 (sin.f64 kx) #s(literal -4 binary64)))))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (fma.f64 #s(literal 1/48 binary64) (pow.f64 (sin.f64 kx) #s(literal -7 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/24 binary64) (fma.f64 #s(literal -12 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (pow.f64 (sin.f64 kx) #s(literal -4 binary64)))) (*.f64 #s(literal 1/8 binary64) (pow.f64 (sin.f64 kx) #s(literal -4 binary64)))) (sin.f64 kx)) (*.f64 (sin.f64 kx) (-.f64 (fma.f64 #s(literal -1/720 binary64) (fma.f64 #s(literal 180 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 4 binary64))) (fma.f64 #s(literal 360 binary64) (/.f64 (-.f64 #s(literal 2/45 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 #s(literal 30 binary64) (pow.f64 (sin.f64 kx) #s(literal -6 binary64))))) (*.f64 #s(literal 1/48 binary64) (/.f64 (fma.f64 #s(literal -12 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (pow.f64 (sin.f64 kx) #s(literal -4 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (*.f64 #s(literal 1/48 binary64) (pow.f64 (sin.f64 kx) #s(literal -6 binary64)))))))))))))))))))))
#s(approx (cosh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1)) (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 kx) (pow.f64 (sin.f64 kx) #s(literal -1 binary64)))))
#s(approx (cosh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1)) (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 kx) #s(literal -1 binary64)) (*.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 kx) #s(literal -3 binary64)))) (+.f64 (sin.f64 kx) (pow.f64 (sin.f64 kx) #s(literal -1 binary64))))))
#s(approx (cosh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1)) (fma.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 kx) (pow.f64 (sin.f64 kx) #s(literal -1 binary64))) (*.f64 (*.f64 ky ky) (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 ky ky) (-.f64 (fma.f64 #s(literal -1/24 binary64) (/.f64 (fma.f64 #s(literal -12 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (pow.f64 (sin.f64 kx) #s(literal -4 binary64)))) (sin.f64 kx)) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (sin.f64 kx) #s(literal -5 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -3 binary64))))) (*.f64 (sin.f64 kx) (fma.f64 #s(literal -1/24 binary64) (fma.f64 #s(literal -12 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (pow.f64 (sin.f64 kx) #s(literal -4 binary64)))) (*.f64 #s(literal 1/8 binary64) (pow.f64 (sin.f64 kx) #s(literal -4 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 kx) #s(literal -1 binary64)) (*.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 kx) #s(literal -3 binary64)))))))))
#s(approx (cosh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1)) (fma.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 kx) (pow.f64 (sin.f64 kx) #s(literal -1 binary64))) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 kx) #s(literal -1 binary64)) (*.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 kx) #s(literal -3 binary64)))) (*.f64 (*.f64 ky ky) (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 ky ky) (-.f64 (fma.f64 #s(literal -1/720 binary64) (/.f64 (fma.f64 #s(literal 180 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 4 binary64))) (fma.f64 #s(literal 360 binary64) (/.f64 (-.f64 #s(literal 2/45 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 #s(literal 30 binary64) (pow.f64 (sin.f64 kx) #s(literal -6 binary64))))) (sin.f64 kx)) (*.f64 #s(literal 1/48 binary64) (/.f64 (fma.f64 #s(literal -12 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (pow.f64 (sin.f64 kx) #s(literal -4 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -3 binary64))) (*.f64 (sin.f64 kx) (fma.f64 #s(literal -1/24 binary64) (fma.f64 #s(literal -12 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (pow.f64 (sin.f64 kx) #s(literal -4 binary64)))) (*.f64 #s(literal 1/8 binary64) (pow.f64 (sin.f64 kx) #s(literal -4 binary64)))))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (fma.f64 #s(literal 1/48 binary64) (pow.f64 (sin.f64 kx) #s(literal -7 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/24 binary64) (fma.f64 #s(literal -12 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (pow.f64 (sin.f64 kx) #s(literal -4 binary64)))) (*.f64 #s(literal 1/8 binary64) (pow.f64 (sin.f64 kx) #s(literal -4 binary64)))) (sin.f64 kx)) (*.f64 (sin.f64 kx) (-.f64 (fma.f64 #s(literal -1/720 binary64) (fma.f64 #s(literal 30 binary64) (pow.f64 (sin.f64 kx) #s(literal -6 binary64)) (fma.f64 #s(literal 180 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 4 binary64))) (*.f64 #s(literal 360 binary64) (/.f64 (-.f64 #s(literal 2/45 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/48 binary64) (/.f64 (fma.f64 #s(literal -12 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (pow.f64 (sin.f64 kx) #s(literal -4 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (*.f64 #s(literal 1/48 binary64) (pow.f64 (sin.f64 kx) #s(literal -6 binary64))))))))) (-.f64 (fma.f64 #s(literal -1/24 binary64) (/.f64 (fma.f64 #s(literal -12 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (pow.f64 (sin.f64 kx) #s(literal -4 binary64)))) (sin.f64 kx)) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (sin.f64 kx) #s(literal -5 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -3 binary64))))) (*.f64 (sin.f64 kx) (fma.f64 #s(literal -1/24 binary64) (fma.f64 #s(literal -12 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (pow.f64 (sin.f64 kx) #s(literal -4 binary64)))) (*.f64 #s(literal 1/8 binary64) (pow.f64 (sin.f64 kx) #s(literal -4 binary64)))))))))))))
#s(approx (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1) (log.f64 (pow.f64 (sin.f64 kx) #s(literal -1 binary64))))
#s(approx (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1) (fma.f64 #s(literal -1 binary64) (log.f64 (sin.f64 kx)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ky ky) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))))
#s(approx (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1) (fma.f64 #s(literal -1 binary64) (log.f64 (sin.f64 kx)) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -1/24 binary64) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -12 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (pow.f64 (sin.f64 kx) #s(literal -4 binary64))))) (*.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 kx) #s(literal -2 binary64)))))))
#s(approx (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1) (fma.f64 #s(literal -1 binary64) (log.f64 (sin.f64 kx)) (*.f64 (*.f64 ky ky) (fma.f64 (*.f64 ky ky) (fma.f64 #s(literal -1/24 binary64) (fma.f64 #s(literal -12 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (pow.f64 (sin.f64 kx) #s(literal -4 binary64)))) (*.f64 #s(literal -1/720 binary64) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal 30 binary64) (pow.f64 (sin.f64 kx) #s(literal -6 binary64)) (fma.f64 #s(literal 180 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 4 binary64))) (*.f64 #s(literal 360 binary64) (/.f64 (-.f64 #s(literal 2/45 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))))))) (*.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 kx) #s(literal -2 binary64)))))))
#s(approx (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (log.f64 (sin.f64 kx)))
#s(approx (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (-.f64 (log.f64 (sin.f64 kx)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ky ky) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))))
#s(approx (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (+.f64 (log.f64 (sin.f64 kx)) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -12 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (pow.f64 (sin.f64 kx) #s(literal -4 binary64))))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 kx) #s(literal -2 binary64)))))))
#s(approx (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (+.f64 (log.f64 (sin.f64 kx)) (*.f64 (*.f64 ky ky) (fma.f64 (*.f64 ky ky) (fma.f64 #s(literal 1/720 binary64) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal 180 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 4 binary64))) (fma.f64 #s(literal 360 binary64) (/.f64 (-.f64 #s(literal 2/45 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 #s(literal 30 binary64) (pow.f64 (sin.f64 kx) #s(literal -6 binary64)))))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -12 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (pow.f64 (sin.f64 kx) #s(literal -4 binary64)))))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 kx) #s(literal -2 binary64)))))))
#s(approx (sinh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1)) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (sin.f64 kx) (pow.f64 (sin.f64 kx) #s(literal -1 binary64)))))
#s(approx (sinh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 ky ky) (*.f64 #s(literal 1/2 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal -1 binary64)) (pow.f64 (sin.f64 kx) #s(literal -3 binary64))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (sin.f64 kx) (pow.f64 (sin.f64 kx) #s(literal -1 binary64))))))
#s(approx (sinh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (sin.f64 kx) (pow.f64 (sin.f64 kx) #s(literal -1 binary64))) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal -1 binary64)) (pow.f64 (sin.f64 kx) #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 ky ky) (-.f64 (fma.f64 #s(literal -1/24 binary64) (/.f64 (fma.f64 #s(literal -12 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (pow.f64 (sin.f64 kx) #s(literal -4 binary64)))) (sin.f64 kx)) (*.f64 #s(literal 1/8 binary64) (pow.f64 (sin.f64 kx) #s(literal -5 binary64)))) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 kx) (fma.f64 #s(literal -1/24 binary64) (fma.f64 #s(literal -12 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (pow.f64 (sin.f64 kx) #s(literal -4 binary64)))) (*.f64 #s(literal 1/8 binary64) (pow.f64 (sin.f64 kx) #s(literal -4 binary64))))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -3 binary64)))))))))))
#s(approx (sinh (* (log (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) -1)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (sin.f64 kx) (pow.f64 (sin.f64 kx) #s(literal -1 binary64))) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal -1 binary64)) (pow.f64 (sin.f64 kx) #s(literal -3 binary64)))) (*.f64 (*.f64 ky ky) (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 ky ky) (-.f64 (fma.f64 #s(literal -1/720 binary64) (/.f64 (fma.f64 #s(literal 180 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 4 binary64))) (fma.f64 #s(literal 360 binary64) (/.f64 (-.f64 #s(literal 2/45 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 #s(literal 30 binary64) (pow.f64 (sin.f64 kx) #s(literal -6 binary64))))) (sin.f64 kx)) (*.f64 #s(literal 1/48 binary64) (/.f64 (fma.f64 #s(literal -12 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (pow.f64 (sin.f64 kx) #s(literal -4 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))))) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 kx) (-.f64 (fma.f64 #s(literal -1/720 binary64) (fma.f64 #s(literal 30 binary64) (pow.f64 (sin.f64 kx) #s(literal -6 binary64)) (fma.f64 #s(literal 180 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 4 binary64))) (*.f64 #s(literal 360 binary64) (/.f64 (-.f64 #s(literal 2/45 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/48 binary64) (/.f64 (fma.f64 #s(literal -12 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (pow.f64 (sin.f64 kx) #s(literal -4 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (*.f64 #s(literal 1/48 binary64) (pow.f64 (sin.f64 kx) #s(literal -6 binary64))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1/24 binary64) (fma.f64 #s(literal -12 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (pow.f64 (sin.f64 kx) #s(literal -4 binary64)))) (*.f64 #s(literal 1/8 binary64) (pow.f64 (sin.f64 kx) #s(literal -4 binary64)))) (sin.f64 kx)) (fma.f64 #s(literal 1/48 binary64) (pow.f64 (sin.f64 kx) #s(literal -7 binary64)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 kx) (fma.f64 #s(literal -1/24 binary64) (fma.f64 #s(literal -12 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (pow.f64 (sin.f64 kx) #s(literal -4 binary64)))) (*.f64 #s(literal 1/8 binary64) (pow.f64 (sin.f64 kx) #s(literal -4 binary64))))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -3 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))))) (-.f64 (fma.f64 #s(literal -1/24 binary64) (/.f64 (fma.f64 #s(literal -12 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (pow.f64 (sin.f64 kx) #s(literal -4 binary64)))) (sin.f64 kx)) (*.f64 #s(literal 1/8 binary64) (pow.f64 (sin.f64 kx) #s(literal -5 binary64)))) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 kx) (fma.f64 #s(literal -1/24 binary64) (fma.f64 #s(literal -12 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -2 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (pow.f64 (sin.f64 kx) #s(literal -4 binary64)))) (*.f64 #s(literal 1/8 binary64) (pow.f64 (sin.f64 kx) #s(literal -4 binary64))))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -3 binary64))))))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (*.f64 ky (*.f64 (sin.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) kx)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 ky (fma.f64 (*.f64 (sin.f64 th) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) kx))))) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -2 binary64) (*.f64 (/.f64 (sin.f64 th) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) kx))) #s(literal -3 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 (sin.f64 th) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) kx))))))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 ky (fma.f64 (*.f64 (sin.f64 th) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) kx))))) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -2 binary64) (*.f64 (/.f64 (sin.f64 th) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) kx))) #s(literal -3 binary64)))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 (sin.f64 th) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) kx)))))) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal 1/120 binary64) (*.f64 (*.f64 (sin.f64 th) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) kx)))))) (fma.f64 #s(literal 1/3 binary64) (*.f64 (/.f64 (sin.f64 th) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) kx))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 th) (-.f64 (fma.f64 #s(literal 4/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) kx))) #s(literal -2 binary64)) (*.f64 #s(literal 8 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) kx))) #s(literal -3 binary64)))) (*.f64 #s(literal 4 binary64) (pow.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) kx))) #s(literal 3 binary64))) #s(literal -1 binary64))))) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) kx)))))))))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 ky (fma.f64 (*.f64 (sin.f64 th) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) kx))))) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -2 binary64) (*.f64 (/.f64 (sin.f64 th) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) kx))) #s(literal -3 binary64)))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 (sin.f64 th) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) kx)))))) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal 1/120 binary64) (*.f64 (*.f64 (sin.f64 th) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) kx)))))) (fma.f64 #s(literal 1/3 binary64) (*.f64 (/.f64 (sin.f64 th) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) kx))) #s(literal -3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 th) (-.f64 (fma.f64 #s(literal 4/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) kx))) #s(literal -2 binary64)) (*.f64 #s(literal 8 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) kx))) #s(literal -3 binary64)))) (*.f64 #s(literal 4 binary64) (pow.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) kx))) #s(literal 3 binary64))) #s(literal -1 binary64))))) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) kx))))) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 th) (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 4/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) kx))) #s(literal -2 binary64)) (*.f64 #s(literal 8 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) kx))) #s(literal -3 binary64)))) (*.f64 #s(literal 4 binary64) (pow.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) kx))) #s(literal 3 binary64))) #s(literal -1 binary64)))) (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) kx))))) (fma.f64 #s(literal 8/45 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) kx))) #s(literal -2 binary64)) (fma.f64 #s(literal 2 binary64) (/.f64 (fma.f64 #s(literal 4/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) kx))) #s(literal -2 binary64)) (*.f64 #s(literal 8 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) kx))) #s(literal -3 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) kx)))) (*.f64 #s(literal 8/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) kx))) #s(literal -3 binary64))))))) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) kx))))) (fma.f64 #s(literal -1/12 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 th) (-.f64 (fma.f64 #s(literal 4/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) kx))) #s(literal -2 binary64)) (*.f64 #s(literal 8 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) kx))) #s(literal -3 binary64)))) (*.f64 #s(literal 4 binary64) (pow.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) kx))) #s(literal 3 binary64))) #s(literal -1 binary64))))) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) kx))))) (fma.f64 #s(literal -1/60 binary64) (*.f64 (/.f64 (sin.f64 th) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) kx))) #s(literal -3 binary64)))) (*.f64 #s(literal -1/5040 binary64) (*.f64 (*.f64 (sin.f64 th) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) kx)))))))))))))))))))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (*.f64 (*.f64 ky (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) kx)))))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (*.f64 ky (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) kx))))) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -2 binary64) (*.f64 (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1 binary64)) (sqrt.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) kx))) #s(literal -3 binary64)))) (*.f64 #s(literal -1/6 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) kx))) #s(literal -1 binary64))))))))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (*.f64 ky (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) kx))))) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -2 binary64) (*.f64 (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1 binary64)) (sqrt.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) kx))) #s(literal -3 binary64)))) (fma.f64 #s(literal -1/6 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) kx))) #s(literal -1 binary64)))) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal 1/120 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) kx))) #s(literal -1 binary64)))) (fma.f64 #s(literal 1/3 binary64) (*.f64 (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1 binary64)) (sqrt.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) kx))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (-.f64 (fma.f64 #s(literal 4/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) kx))) #s(literal -2 binary64)) (*.f64 #s(literal 8 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) kx))) #s(literal -3 binary64)))) (*.f64 #s(literal 4 binary64) (pow.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) kx))) #s(literal 3 binary64))) #s(literal -1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) kx)))))))))))))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (*.f64 ky (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) kx))))) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -2 binary64) (*.f64 (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1 binary64)) (sqrt.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) kx))) #s(literal -3 binary64)))) (fma.f64 #s(literal -1/6 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) kx))) #s(literal -1 binary64)))) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal 1/120 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) kx))) #s(literal -1 binary64)))) (fma.f64 #s(literal 1/3 binary64) (*.f64 (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1 binary64)) (sqrt.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) kx))) #s(literal -3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (-.f64 (fma.f64 #s(literal 4/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) kx))) #s(literal -2 binary64)) (*.f64 #s(literal 8 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) kx))) #s(literal -3 binary64)))) (*.f64 #s(literal 4 binary64) (pow.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) kx))) #s(literal 3 binary64))) #s(literal -1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) kx))))) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 4/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) kx))) #s(literal -2 binary64)) (*.f64 #s(literal 8 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) kx))) #s(literal -3 binary64)))) (*.f64 #s(literal 4 binary64) (pow.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) kx))) #s(literal 3 binary64))) #s(literal -1 binary64)))) (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) kx))))) (fma.f64 #s(literal 8/45 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) kx))) #s(literal -2 binary64)) (fma.f64 #s(literal 2 binary64) (/.f64 (fma.f64 #s(literal 4/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) kx))) #s(literal -2 binary64)) (*.f64 #s(literal 8 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) kx))) #s(literal -3 binary64)))) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) kx)))) (*.f64 #s(literal 8/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) kx))) #s(literal -3 binary64)))))) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) kx))))) (fma.f64 #s(literal -1/12 binary64) (*.f64 (/.f64 (-.f64 (fma.f64 #s(literal 4/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) kx))) #s(literal -2 binary64)) (*.f64 #s(literal 8 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) kx))) #s(literal -3 binary64)))) (*.f64 #s(literal 4 binary64) (pow.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) kx))) #s(literal 3 binary64))) #s(literal -1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) kx))))) (fma.f64 #s(literal -1/60 binary64) (*.f64 (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1 binary64)) (sqrt.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) kx))) #s(literal -3 binary64)))) (*.f64 #s(literal -1/5040 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) kx))) #s(literal -1 binary64)))))))))))))))))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) kx))))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 ky ky) (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) kx)))))) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) kx)))))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (fma.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) kx)))) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 ky ky) (-.f64 #s(literal 1/3 binary64) (*.f64 #s(literal -1/4 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) kx)))) #s(literal -1 binary64))))) (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) kx)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) kx)))))))))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (fma.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) kx)))) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) kx)))))) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (-.f64 #s(literal 1/3 binary64) (*.f64 #s(literal -1/4 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) kx)))) #s(literal -1 binary64)))) (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) kx)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 ky ky) (-.f64 #s(literal 2/45 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 #s(literal 1/3 binary64) (*.f64 #s(literal -1/4 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) kx)))) #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) kx)))))))) (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) kx)))))))))))))
#s(approx (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) kx)))))
#s(approx (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) kx))) (*.f64 ky ky)))
#s(approx (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) kx))) (*.f64 (*.f64 ky ky) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 ky ky))))))
#s(approx (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) kx))) (*.f64 (*.f64 ky ky) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 ky ky) (-.f64 (*.f64 #s(literal 2/45 binary64) (*.f64 ky ky)) #s(literal 1/3 binary64)))))))
#s(approx (/ (* (sin th) (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (/.f64 (*.f64 ky (sin.f64 th)) (sin.f64 kx)))
#s(approx (/ (* (sin th) (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (*.f64 ky (fma.f64 (*.f64 ky ky) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (*.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sin.f64 kx)))) (/.f64 (sin.f64 th) (sin.f64 kx)))))
#s(approx (/ (* (sin th) (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (*.f64 ky (fma.f64 (*.f64 ky ky) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sin.f64 kx)) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal 1/120 binary64) (/.f64 (sin.f64 th) (sin.f64 kx)) (fma.f64 #s(literal 1/12 binary64) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 kx) (*.f64 (sin.f64 th) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) (*.f64 #s(literal 3/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -6 binary64)))))))))))) (/.f64 (sin.f64 th) (sin.f64 kx)))))
#s(approx (/ (* (sin th) (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (*.f64 ky (fma.f64 (*.f64 ky ky) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 th) (sin.f64 kx)) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal 1/120 binary64) (/.f64 (sin.f64 th) (sin.f64 kx)) (fma.f64 #s(literal 1/12 binary64) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 kx) (*.f64 (sin.f64 th) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) (*.f64 #s(literal 3/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -6 binary64)))))) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 kx) (*.f64 (sin.f64 th) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal 1/3 binary64) (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) (*.f64 #s(literal 3/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -6 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (fma.f64 #s(literal 2/45 binary64) (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) (fma.f64 #s(literal 2/3 binary64) (pow.f64 (sin.f64 kx) #s(literal -6 binary64)) (pow.f64 (sin.f64 kx) #s(literal -8 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.f64 (sin.f64 kx) (*.f64 (sin.f64 th) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) (*.f64 #s(literal 3/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -6 binary64)))))) (fma.f64 #s(literal -1/240 binary64) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (*.f64 #s(literal -1/5040 binary64) (/.f64 (sin.f64 th) (sin.f64 kx))))))))))))) (/.f64 (sin.f64 th) (sin.f64 kx)))))
#s(approx (sin ky) (sin.f64 ky))
#s(approx (pow (sin ky) 2) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))
#s(approx (* (sin th) (sin ky)) (*.f64 (sin.f64 ky) (sin.f64 th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (*.f64 th (sin.f64 ky)) (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 th (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 (*.f64 th th) (sin.f64 ky)) (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64))) (*.f64 (sin.f64 ky) (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 th (fma.f64 (sin.f64 ky) (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)) (*.f64 (*.f64 th th) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 ky) (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64))) (*.f64 #s(literal 1/120 binary64) (*.f64 (*.f64 (*.f64 th th) (sin.f64 ky)) (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 th (fma.f64 (sin.f64 ky) (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)) (*.f64 (*.f64 th th) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 ky) (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64))) (*.f64 (*.f64 th th) (fma.f64 #s(literal -1/5040 binary64) (*.f64 (*.f64 (*.f64 th th) (sin.f64 ky)) (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64))) (*.f64 #s(literal 1/120 binary64) (*.f64 (sin.f64 ky) (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)))))))))))
#s(approx (* (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (sin th)) (sin ky)) (*.f64 (*.f64 th (sin.f64 ky)) (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64))))
#s(approx (* (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (sin th)) (sin ky)) (*.f64 th (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 (*.f64 th th) (sin.f64 ky)) (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64))) (*.f64 (sin.f64 ky) (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64))))))
#s(approx (* (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (sin th)) (sin ky)) (*.f64 th (fma.f64 (sin.f64 ky) (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)) (*.f64 (*.f64 th th) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 ky) (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64))) (*.f64 #s(literal 1/120 binary64) (*.f64 (*.f64 (*.f64 th th) (sin.f64 ky)) (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)))))))))
#s(approx (* (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (sin th)) (sin ky)) (*.f64 th (fma.f64 (sin.f64 ky) (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)) (*.f64 (*.f64 th th) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 ky) (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64))) (*.f64 (*.f64 th th) (fma.f64 #s(literal -1/5040 binary64) (*.f64 (*.f64 (*.f64 th th) (sin.f64 ky)) (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64))) (*.f64 #s(literal 1/120 binary64) (*.f64 (sin.f64 ky) (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)))))))))))
#s(approx (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (sin th)) (*.f64 th (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64))))
#s(approx (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (sin th)) (*.f64 th (-.f64 (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)) (*.f64 #s(literal 1/6 binary64) (*.f64 (*.f64 th th) (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)))))))
#s(approx (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (sin th)) (*.f64 th (+.f64 (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)) (*.f64 (*.f64 th th) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)) (*.f64 #s(literal 1/120 binary64) (*.f64 (*.f64 th th) (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)))))))))
#s(approx (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1) (sin th)) (*.f64 th (+.f64 (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)) (*.f64 (*.f64 th th) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)) (*.f64 (*.f64 th th) (fma.f64 #s(literal -1/5040 binary64) (*.f64 (*.f64 th th) (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64))) (*.f64 #s(literal 1/120 binary64) (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64))))))))))
#s(approx (sin th) th)
#s(approx (sin th) (*.f64 th (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 th th)))))
#s(approx (sin th) (*.f64 th (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (-.f64 (*.f64 #s(literal 1/120 binary64) (*.f64 th th)) #s(literal 1/6 binary64))))))
#s(approx (sin th) (*.f64 th (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (-.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal 1/120 binary64) (*.f64 #s(literal -1/5040 binary64) (*.f64 th th)))) #s(literal 1/6 binary64))))))
#s(approx th th)
#s(approx (* (pow (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) 1/2) -1) (* (sin th) (sin ky))) (*.f64 (*.f64 th (sin.f64 ky)) (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64))))
#s(approx (* (pow (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) 1/2) -1) (* (sin th) (sin ky))) (*.f64 th (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 (*.f64 th th) (sin.f64 ky)) (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64))) (*.f64 (sin.f64 ky) (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64))))))
#s(approx (* (pow (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) 1/2) -1) (* (sin th) (sin ky))) (*.f64 th (fma.f64 (sin.f64 ky) (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)) (*.f64 (*.f64 th th) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 ky) (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64))) (*.f64 #s(literal 1/120 binary64) (*.f64 (*.f64 (*.f64 th th) (sin.f64 ky)) (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)))))))))
#s(approx (* (pow (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) 1/2) -1) (* (sin th) (sin ky))) (*.f64 th (fma.f64 (sin.f64 ky) (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)) (*.f64 (*.f64 th th) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 ky) (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64))) (*.f64 (*.f64 th th) (fma.f64 #s(literal -1/5040 binary64) (*.f64 (*.f64 (*.f64 th th) (sin.f64 ky)) (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64))) (*.f64 #s(literal 1/120 binary64) (*.f64 (sin.f64 ky) (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)))))))))))
#s(approx (* (sin th) (sin ky)) (*.f64 th (sin.f64 ky)))
#s(approx (* (sin th) (sin ky)) (*.f64 th (-.f64 (sin.f64 ky) (*.f64 #s(literal 1/6 binary64) (*.f64 (*.f64 th th) (sin.f64 ky))))))
#s(approx (* (sin th) (sin ky)) (*.f64 th (+.f64 (sin.f64 ky) (*.f64 (*.f64 th th) (fma.f64 #s(literal -1/6 binary64) (sin.f64 ky) (*.f64 #s(literal 1/120 binary64) (*.f64 (*.f64 th th) (sin.f64 ky))))))))
#s(approx (* (sin th) (sin ky)) (*.f64 th (+.f64 (sin.f64 ky) (*.f64 (*.f64 th th) (fma.f64 #s(literal -1/6 binary64) (sin.f64 ky) (*.f64 (*.f64 th th) (fma.f64 #s(literal -1/5040 binary64) (*.f64 (*.f64 th th) (sin.f64 ky)) (*.f64 #s(literal 1/120 binary64) (sin.f64 ky)))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (*.f64 th (sin.f64 ky)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) kx))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 th (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 (*.f64 th th) (sin.f64 ky)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) kx))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (*.f64 (sin.f64 ky) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) kx))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 th (fma.f64 (sin.f64 ky) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) kx))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (*.f64 (*.f64 th th) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 ky) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) kx))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/120 binary64) (*.f64 (*.f64 (*.f64 th th) (sin.f64 ky)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) kx))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 th (fma.f64 (sin.f64 ky) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) kx))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (*.f64 (*.f64 th th) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 ky) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) kx))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (*.f64 (*.f64 th th) (fma.f64 #s(literal -1/5040 binary64) (*.f64 (*.f64 (*.f64 th th) (sin.f64 ky)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) kx))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/120 binary64) (*.f64 (sin.f64 ky) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) kx))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))))))))
#s(approx (/ (* (sin th) (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (*.f64 (*.f64 th (sin.f64 ky)) (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64))))
#s(approx (/ (* (sin th) (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (*.f64 th (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 (*.f64 th th) (sin.f64 ky)) (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64))) (*.f64 (sin.f64 ky) (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64))))))
#s(approx (/ (* (sin th) (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (*.f64 th (fma.f64 (sin.f64 ky) (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)) (*.f64 (*.f64 th th) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 ky) (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64))) (*.f64 #s(literal 1/120 binary64) (*.f64 (*.f64 (*.f64 th th) (sin.f64 ky)) (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)))))))))
#s(approx (/ (* (sin th) (sin ky)) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky))))) (*.f64 th (fma.f64 (sin.f64 ky) (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)) (*.f64 (*.f64 th th) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 ky) (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64))) (*.f64 (*.f64 th th) (fma.f64 #s(literal -1/5040 binary64) (*.f64 (*.f64 (*.f64 th th) (sin.f64 ky)) (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64))) (*.f64 #s(literal 1/120 binary64) (*.f64 (sin.f64 ky) (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)))))))))))
#s(approx (sin th) (sin.f64 th))

eval105.0ms (1%)

Memory
0.6MiB live, 190.7MiB allocated; 26ms collecting garbage
Compiler

Compiled 35 604 to 3 298 computations (90.7% saved)

prune1.1s (10.6%)

Memory
-4.5MiB live, 1 902.6MiB allocated; 88ms collecting garbage
Pruning

10 alts after pruning (3 fresh and 7 done)

PrunedKeptTotal
New6350635
Fresh033
Picked055
Done022
Total63510645
Accuracy
100.0%
Counts
645 → 10
Alt Table
Click to see full alt table
StatusAccuracyProgram
94.5%
(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))
81.3%
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (/.f64 (-.f64 (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (pow.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)) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) (sin.f64 th))
82.5%
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (/.f64 (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx))) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
92.3%
(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (*.f64 (pow.f64 (pow.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal -1 binary64)) #s(literal 1/2 binary64)) (sin.f64 ky))) (sin.f64 th))
99.6%
(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (*.f64 (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)) (sin.f64 ky))) (sin.f64 th))
97.5%
(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (*.f64 (+.f64 (cosh.f64 (*.f64 (log.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky))) #s(literal -1 binary64))) (sinh.f64 (*.f64 (log.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky))) #s(literal -1 binary64)))) (sin.f64 ky))) (sin.f64 th))
99.2%
(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (*.f64 (*.f64 (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1/2 binary64)) (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1/2 binary64))) (sin.f64 ky))) (sin.f64 th))
23.3%
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (/.f64 (*.f64 (*.f64 kx kx) (sin.f64 th)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal -1/2 binary64) (sin.f64 th)))
89.5%
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (pow.f64 (pow.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 1/2 binary64)) #s(literal -1 binary64)) (*.f64 (sin.f64 th) (sin.f64 ky))))
99.4%
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (*.f64 (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)) (sin.f64 th)) (sin.f64 ky)))
Compiler

Compiled 326 to 213 computations (34.7% saved)

series171.0ms (1.7%)

Memory
10.3MiB live, 289.9MiB allocated; 18ms collecting garbage
Counts
42 → 254
Calls
Call 1
Inputs
(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (*.f64 (*.f64 (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1/2 binary64)) (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1/2 binary64))) (sin.f64 ky))) (sin.f64 th))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (*.f64 (*.f64 (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1/2 binary64)) (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1/2 binary64))) (sin.f64 ky)))
(*.f64 (*.f64 (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1/2 binary64)) (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1/2 binary64))) (sin.f64 ky))
(*.f64 (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1/2 binary64)) (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1/2 binary64)))
(pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1/2 binary64))
(hypot.f64 (sin.f64 kx) (sin.f64 ky))
(sin.f64 kx)
kx
(sin.f64 ky)
ky
#s(literal -1/2 binary64)
(sin.f64 th)
th
(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (*.f64 (pow.f64 (pow.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal -1 binary64)) #s(literal 1/2 binary64)) (sin.f64 ky))) (sin.f64 th))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (*.f64 (pow.f64 (pow.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal -1 binary64)) #s(literal 1/2 binary64)) (sin.f64 ky)))
(*.f64 (pow.f64 (pow.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal -1 binary64)) #s(literal 1/2 binary64)) (sin.f64 ky))
(pow.f64 (pow.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal -1 binary64)) #s(literal 1/2 binary64))
(pow.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal -1 binary64))
(fma.f64 (sin.f64 kx) (sin.f64 kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))
(pow.f64 (sin.f64 ky) #s(literal 2 binary64))
#s(literal 2 binary64)
#s(literal -1 binary64)
#s(literal 1/2 binary64)
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (/.f64 (-.f64 (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (pow.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)) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (-.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 (/.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (/.f64 (-.f64 (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (pow.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)) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))))
(sqrt.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (/.f64 (-.f64 (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (pow.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)) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(-.f64 (/.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (/.f64 (-.f64 (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (pow.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)) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (-.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 4 binary64)) (/.f64 (-.f64 (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (pow.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)) (*.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 4 binary64))
#s(literal 4 binary64)
(/.f64 (-.f64 (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (pow.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)) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(-.f64 (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) #s(literal 3 binary64)))
(pow.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(literal 3 binary64))
(pow.f64 (sin.f64 kx) #s(literal 2 binary64))
#s(literal 3 binary64)
(pow.f64 (pow.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)) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
(+.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
(pow.f64 (sin.f64 ky) #s(literal 4 binary64))
(*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))
(/.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (-.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)))
Outputs
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (sin th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (+ (sin th) (* (pow kx 2) (+ (* -1/2 (/ (sin th) (pow (sin ky) 2))) (* 1/2 (* (pow kx 2) (* (pow (sin ky) 2) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))))))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (+ (sin th) (* (pow kx 2) (+ (* -1/2 (/ (sin th) (pow (sin ky) 2))) (* (pow kx 2) (+ (* -1/2 (* (pow kx 2) (* (pow (sin ky) 2) (* (sin th) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))) (pow (sin ky) 2))) (+ (* 2/45 (/ 1 (pow (sin ky) 4))) (+ (* 2/3 (/ 1 (pow (sin ky) 6))) (/ 1 (pow (sin ky) 8))))))))) (* 1/2 (* (pow (sin ky) 2) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6))))))))))))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 1))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ 1 (* -1/2 (/ (pow kx 2) (pow (sin ky) 2))))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ 1 (* (pow kx 2) (- (* 1/2 (* (pow kx 2) (* (pow (sin ky) 2) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6))))))) (* 1/2 (/ 1 (pow (sin ky) 2))))))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ 1 (* (pow kx 2) (- (* (pow kx 2) (+ (* -1/2 (* (pow kx 2) (* (pow (sin ky) 2) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))) (pow (sin ky) 2))) (+ (* 2/45 (/ 1 (pow (sin ky) 4))) (+ (* 2/3 (/ 1 (pow (sin ky) 6))) (/ 1 (pow (sin ky) 8)))))))) (* 1/2 (* (pow (sin ky) 2) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))))))) (* 1/2 (/ 1 (pow (sin ky) 2))))))))
#s(approx (* (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2) (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2)) (sin ky)) #s(hole binary64 1))
#s(approx (* (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2) (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2)) (sin ky)) #s(hole binary64 (+ 1 (* -1/2 (/ (pow kx 2) (pow (sin ky) 2))))))
#s(approx (* (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2) (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2)) (sin ky)) #s(hole binary64 (+ 1 (* (pow kx 2) (- (* 1/2 (* (pow kx 2) (* (pow (sin ky) 2) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6))))))) (* 1/2 (/ 1 (pow (sin ky) 2))))))))
#s(approx (* (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2) (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2)) (sin ky)) #s(hole binary64 (+ 1 (* (pow kx 2) (- (* (pow kx 2) (+ (* -1/2 (* (pow kx 2) (* (pow (sin ky) 2) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))) (pow (sin ky) 2))) (+ (* 2/45 (/ 1 (pow (sin ky) 4))) (+ (* 2/3 (/ 1 (pow (sin ky) 6))) (/ 1 (pow (sin ky) 8)))))))) (* 1/2 (* (pow (sin ky) 2) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))))))) (* 1/2 (/ 1 (pow (sin ky) 2))))))))
#s(approx (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2) (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2)) #s(hole binary64 (/ 1 (sin ky))))
#s(approx (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2) (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2)) #s(hole binary64 (+ (* -1/2 (/ (pow kx 2) (pow (sin ky) 3))) (/ 1 (sin ky)))))
#s(approx (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2) (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2)) #s(hole binary64 (+ (* (pow kx 2) (- (* 1/2 (* (pow kx 2) (* (sin ky) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6))))))) (* 1/2 (/ 1 (pow (sin ky) 3))))) (/ 1 (sin ky)))))
#s(approx (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2) (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2)) #s(hole binary64 (+ (* (pow kx 2) (- (* (pow kx 2) (+ (* -1/2 (* (pow kx 2) (* (sin ky) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))) (pow (sin ky) 2))) (+ (* 2/45 (/ 1 (pow (sin ky) 4))) (+ (* 2/3 (/ 1 (pow (sin ky) 6))) (/ 1 (pow (sin ky) 8)))))))) (* 1/2 (* (sin ky) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))))))) (* 1/2 (/ 1 (pow (sin ky) 3))))) (/ 1 (sin ky)))))
#s(approx (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2) #s(hole binary64 (* (pow 1 1/4) (sqrt (/ 1 (sin ky))))))
#s(approx (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2) #s(hole binary64 (+ (* -1/4 (* (pow 1 1/4) (* (pow kx 2) (sqrt (/ 1 (pow (sin ky) 5)))))) (* (pow 1 1/4) (sqrt (/ 1 (sin ky)))))))
#s(approx (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2) #s(hole binary64 (+ (* (pow 1 1/4) (sqrt (/ 1 (sin ky)))) (* (pow kx 2) (+ (* -1/4 (* (pow 1 1/4) (sqrt (/ 1 (pow (sin ky) 5))))) (* (pow 1 1/4) (* (* (pow kx 2) (+ (* 1/96 (- (* 24 (* (pow (sin ky) 2) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (/ 1 (pow (sin ky) 6))))) (* 12 (/ 1 (pow (sin ky) 4))))) (* 1/32 (/ 1 (pow (sin ky) 4))))) (sqrt (/ 1 (sin ky))))))))))
#s(approx (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2) #s(hole binary64 (+ (* (pow 1 1/4) (sqrt (/ 1 (sin ky)))) (* (pow kx 2) (+ (* -1/4 (* (pow 1 1/4) (sqrt (/ 1 (pow (sin ky) 5))))) (* (pow kx 2) (+ (* (pow 1 1/4) (* (sqrt (/ 1 (sin ky))) (+ (* 1/96 (- (* 24 (* (pow (sin ky) 2) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (/ 1 (pow (sin ky) 6))))) (* 12 (/ 1 (pow (sin ky) 4))))) (* 1/32 (/ 1 (pow (sin ky) 4)))))) (* (pow 1 1/4) (* (* (pow kx 2) (- (+ (* -1/384 (/ (- (* 24 (* (pow (sin ky) 2) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (/ 1 (pow (sin ky) 6))))) (* 12 (/ 1 (pow (sin ky) 4)))) (pow (sin ky) 2))) (* 1/2880 (- (+ (* -720 (* (pow (sin ky) 2) (+ (* 2/3 (/ 1 (pow (sin ky) 6))) (+ (* 2/45 (/ 1 (pow (sin ky) 4))) (/ 1 (pow (sin ky) 8)))))) (* 720 (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (/ 1 (pow (sin ky) 6))))) (* 240 (/ 1 (pow (sin ky) 6)))))) (* 1/384 (/ 1 (pow (sin ky) 6))))) (sqrt (/ 1 (sin ky))))))))))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) #s(hole binary64 (sin ky)))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) #s(hole binary64 (+ (sin ky) (* 1/2 (/ (pow kx 2) (sin ky))))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) #s(hole binary64 (+ (sin ky) (* (pow kx 2) (+ (* -1/2 (/ (* (pow kx 2) (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2))))) (sin ky))) (* 1/2 (/ 1 (sin ky))))))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) #s(hole binary64 (+ (sin ky) (* (pow kx 2) (+ (* (pow kx 2) (+ (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (sin ky))) (* 1/2 (/ (* (pow kx 2) (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2))))) (sin ky))))) (* 1/2 (/ 1 (sin ky))))))))
#s(approx (sin kx) #s(hole binary64 kx))
#s(approx (sin kx) #s(hole binary64 (* kx (+ 1 (* -1/6 (pow kx 2))))))
#s(approx (sin kx) #s(hole binary64 (* kx (+ 1 (* (pow kx 2) (- (* 1/120 (pow kx 2)) 1/6))))))
#s(approx (sin kx) #s(hole binary64 (* kx (+ 1 (* (pow kx 2) (- (* (pow kx 2) (+ 1/120 (* -1/5040 (pow kx 2)))) 1/6))))))
#s(approx kx #s(hole binary64 kx))
#s(approx (* (pow (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) -1) 1/2) (sin ky)) #s(hole binary64 1))
#s(approx (* (pow (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) -1) 1/2) (sin ky)) #s(hole binary64 (+ 1 (* -1/2 (/ (pow kx 2) (pow (sin ky) 2))))))
#s(approx (* (pow (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) -1) 1/2) (sin ky)) #s(hole binary64 (+ 1 (* (pow kx 2) (- (* 1/2 (* (pow kx 2) (* (pow (sin ky) 2) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6))))))) (* 1/2 (/ 1 (pow (sin ky) 2))))))))
#s(approx (* (pow (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) -1) 1/2) (sin ky)) #s(hole binary64 (+ 1 (* (pow kx 2) (- (* (pow kx 2) (+ (* -1/2 (* (pow kx 2) (* (pow (sin ky) 2) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))) (pow (sin ky) 2))) (+ (* 2/45 (/ 1 (pow (sin ky) 4))) (+ (* 2/3 (/ 1 (pow (sin ky) 6))) (/ 1 (pow (sin ky) 8)))))))) (* 1/2 (* (pow (sin ky) 2) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))))))) (* 1/2 (/ 1 (pow (sin ky) 2))))))))
#s(approx (pow (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) -1) 1/2) #s(hole binary64 (/ 1 (sin ky))))
#s(approx (pow (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) -1) 1/2) #s(hole binary64 (+ (* -1/2 (/ (pow kx 2) (pow (sin ky) 3))) (/ 1 (sin ky)))))
#s(approx (pow (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) -1) 1/2) #s(hole binary64 (+ (* (pow kx 2) (- (* 1/2 (* (pow kx 2) (* (sin ky) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6))))))) (* 1/2 (/ 1 (pow (sin ky) 3))))) (/ 1 (sin ky)))))
#s(approx (pow (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) -1) 1/2) #s(hole binary64 (+ (* (pow kx 2) (- (* (pow kx 2) (+ (* -1/2 (* (pow kx 2) (* (sin ky) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))) (pow (sin ky) 2))) (+ (* 2/45 (/ 1 (pow (sin ky) 4))) (+ (* 2/3 (/ 1 (pow (sin ky) 6))) (/ 1 (pow (sin ky) 8)))))))) (* 1/2 (* (sin ky) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))))))) (* 1/2 (/ 1 (pow (sin ky) 3))))) (/ 1 (sin ky)))))
#s(approx (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) -1) #s(hole binary64 (/ 1 (pow (sin ky) 2))))
#s(approx (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) -1) #s(hole binary64 (+ (* -1 (/ (pow kx 2) (pow (sin ky) 4))) (/ 1 (pow (sin ky) 2)))))
#s(approx (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) -1) #s(hole binary64 (+ (* (pow kx 2) (- (* (pow kx 2) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (/ 1 (pow (sin ky) 6)))) (/ 1 (pow (sin ky) 4)))) (/ 1 (pow (sin ky) 2)))))
#s(approx (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) -1) #s(hole binary64 (+ (* (pow kx 2) (- (* (pow kx 2) (+ (* -1 (* (pow kx 2) (+ (* 2/45 (/ 1 (pow (sin ky) 4))) (+ (* 2/3 (/ 1 (pow (sin ky) 6))) (/ 1 (pow (sin ky) 8)))))) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (/ 1 (pow (sin ky) 6))))) (/ 1 (pow (sin ky) 4)))) (/ 1 (pow (sin ky) 2)))))
#s(approx (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) #s(hole binary64 (pow (sin ky) 2)))
#s(approx (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) #s(hole binary64 (+ (pow kx 2) (pow (sin ky) 2))))
#s(approx (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) #s(hole binary64 (+ (* (pow kx 2) (+ 1 (* -1/3 (pow kx 2)))) (pow (sin ky) 2))))
#s(approx (+ (* (sin kx) (sin kx)) (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 (* (/ (sin ky) (sqrt (- (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))) (sin th)) #s(hole binary64 (sin th)))
#s(approx (* (/ (sin ky) (sqrt (- (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))) (sin th)) #s(hole binary64 (+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2))))))
#s(approx (* (/ (sin ky) (sqrt (- (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))) (sin th)) #s(hole binary64 (+ (sin th) (* (pow kx 2) (+ (* -1/2 (/ (sin th) (pow (sin ky) 2))) (* 1/2 (* (pow kx 2) (* (pow (sin ky) 2) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))))))))))))
#s(approx (* (/ (sin ky) (sqrt (- (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))) (sin th)) #s(hole binary64 (+ (sin th) (* (pow kx 2) (+ (* -1/2 (/ (sin th) (pow (sin ky) 2))) (* (pow kx 2) (+ (* -1/2 (* (pow kx 2) (* (pow (sin ky) 2) (* (sin th) (+ (* -1 (/ (+ (* -2/3 (pow (sin ky) 4)) (pow (sin ky) 2)) (pow (sin ky) 10))) (+ (* -1 (/ (- 1/3 (/ 1 (pow (sin ky) 2))) (pow (sin ky) 6))) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))) (pow (sin ky) 2))) (+ (* 2/45 (/ 1 (pow (sin ky) 4))) (+ (* 1/3 (/ 1 (pow (sin ky) 6))) (/ 1 (pow (sin ky) 8))))))))))) (* 1/2 (* (pow (sin ky) 2) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6))))))))))))))
#s(approx (/ (sin ky) (sqrt (- (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 1))
#s(approx (/ (sin ky) (sqrt (- (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (+ 1 (* -1/2 (/ (pow kx 2) (pow (sin ky) 2))))))
#s(approx (/ (sin ky) (sqrt (- (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (+ 1 (* (pow kx 2) (- (* 1/2 (* (pow kx 2) (* (pow (sin ky) 2) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6))))))) (* 1/2 (/ 1 (pow (sin ky) 2))))))))
#s(approx (/ (sin ky) (sqrt (- (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (+ 1 (* (pow kx 2) (- (* (pow kx 2) (+ (* -1/2 (* (pow kx 2) (* (pow (sin ky) 2) (+ (* -1 (/ (+ (* -2/3 (pow (sin ky) 4)) (pow (sin ky) 2)) (pow (sin ky) 10))) (+ (* -1 (/ (- 1/3 (/ 1 (pow (sin ky) 2))) (pow (sin ky) 6))) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))) (pow (sin ky) 2))) (+ (* 2/45 (/ 1 (pow (sin ky) 4))) (+ (* 1/3 (/ 1 (pow (sin ky) 6))) (/ 1 (pow (sin ky) 8)))))))))) (* 1/2 (* (pow (sin ky) 2) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))))))) (* 1/2 (/ 1 (pow (sin ky) 2))))))))
#s(approx (sqrt (- (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (sin ky)))
#s(approx (sqrt (- (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (+ (sin ky) (* 1/2 (/ (pow kx 2) (sin ky))))))
#s(approx (sqrt (- (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (+ (sin ky) (* (pow kx 2) (+ (* -1/2 (/ (* (pow kx 2) (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2))))) (sin ky))) (* 1/2 (/ 1 (sin ky))))))))
#s(approx (sqrt (- (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (+ (sin ky) (* (pow kx 2) (+ (* (pow kx 2) (+ (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (sin ky))) (* 1/2 (/ (* (pow kx 2) (- (+ 2/45 (+ (* -1 (/ (+ (* -2/3 (pow (sin ky) 4)) (pow (sin ky) 2)) (pow (sin ky) 6))) (* -1 (/ (- 1/3 (/ 1 (pow (sin ky) 2))) (pow (sin ky) 2))))) (+ (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2))) (* 1/3 (/ 1 (pow (sin ky) 2)))))) (sin ky))))) (* 1/2 (/ 1 (sin ky))))))))
#s(approx (- (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (pow (sin ky) 2)))
#s(approx (- (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (- (pow kx 2) (* -1 (pow (sin ky) 2)))))
#s(approx (- (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (- (* (pow kx 2) (+ 1 (* -1/3 (pow kx 2)))) (* -1 (pow (sin ky) 2)))))
#s(approx (- (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (- (* (pow kx 2) (+ 1 (* (pow kx 2) (- (* (pow kx 2) (- (+ 2/45 (+ (* -1 (/ (+ (* -2/3 (pow (sin ky) 4)) (pow (sin ky) 2)) (pow (sin ky) 6))) (* -1 (/ (- 1/3 (/ 1 (pow (sin ky) 2))) (pow (sin ky) 2))))) (* 1/3 (/ 1 (pow (sin ky) 2))))) 1/3)))) (* -1 (pow (sin ky) 2)))))
#s(approx (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (* -1 (/ (pow kx 4) (pow (sin ky) 2)))))
#s(approx (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (* (pow kx 4) (- (* -1 (/ (* (pow kx 2) (+ (* -2/3 (pow (sin ky) 4)) (pow (sin ky) 2))) (pow (sin ky) 6))) (/ 1 (pow (sin ky) 2))))))
#s(approx (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (* (pow kx 4) (- (* (pow kx 2) (+ (* -1 (/ (* (pow kx 2) (+ 1 (+ (* -2/3 (pow (sin ky) 2)) (+ (* -1/3 (pow (sin ky) 2)) (* 1/5 (pow (sin ky) 4)))))) (pow (sin ky) 6))) (* -1 (/ (+ (* -2/3 (pow (sin ky) 4)) (pow (sin ky) 2)) (pow (sin ky) 6))))) (/ 1 (pow (sin ky) 2))))))
#s(approx (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (* (pow kx 4) (- (* (pow kx 2) (+ (* -1 (/ (+ (* -2/3 (pow (sin ky) 4)) (pow (sin ky) 2)) (pow (sin ky) 6))) (* (pow kx 2) (+ (* -1 (/ (+ 1 (+ (* -2/3 (pow (sin ky) 2)) (+ (* -1/3 (pow (sin ky) 2)) (* 1/5 (pow (sin ky) 4))))) (pow (sin ky) 6))) (* (pow kx 2) (- (* -1 (/ (- (+ (* -2/3 (+ 1 (* -1/3 (pow (sin ky) 2)))) (+ (* -34/945 (pow (sin ky) 4)) (+ (* 2/45 (pow (sin ky) 2)) (* 1/5 (pow (sin ky) 2))))) 2/3) (pow (sin ky) 6))) (/ 1 (pow (sin ky) 8)))))))) (/ 1 (pow (sin ky) 2))))))
#s(approx (pow (sin kx) 4) #s(hole binary64 (pow kx 4)))
#s(approx (pow (sin kx) 4) #s(hole binary64 (* (pow kx 4) (+ 1 (* -2/3 (pow kx 2))))))
#s(approx (pow (sin kx) 4) #s(hole binary64 (* (pow kx 4) (+ 1 (* (pow kx 2) (- (* 1/5 (pow kx 2)) 2/3))))))
#s(approx (pow (sin kx) 4) #s(hole binary64 (* (pow kx 4) (+ 1 (* (pow kx 2) (- (* (pow kx 2) (+ 1/5 (* -34/945 (pow kx 2)))) 2/3))))))
#s(approx (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (* -1 (pow (sin ky) 2))))
#s(approx (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (+ (* -1 (pow (sin ky) 2)) (pow kx 2))))
#s(approx (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (+ (* -1 (pow (sin ky) 2)) (* (pow kx 2) (+ 1 (* -1 (* (pow kx 2) (+ (* -1 (/ (+ 1 (* -1/3 (pow (sin ky) 2))) (pow (sin ky) 2))) (/ 1 (pow (sin ky) 2))))))))))
#s(approx (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (+ (* -1 (pow (sin ky) 2)) (* (pow kx 2) (+ 1 (* (pow kx 2) (- (* (pow kx 2) (- (* 1/3 (/ 1 (pow (sin ky) 2))) (+ (* -1 (/ (+ (* -1 (/ (+ 1 (* -1/3 (pow (sin ky) 2))) (pow (sin ky) 2))) (/ 1 (pow (sin ky) 2))) (pow (sin ky) 2))) (* -1 (/ (- (* 2/45 (pow (sin ky) 2)) 2/3) (pow (sin ky) 2)))))) (+ (* -1 (/ (+ 1 (* -1/3 (pow (sin ky) 2))) (pow (sin ky) 2))) (/ 1 (pow (sin ky) 2))))))))))
#s(approx (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) #s(hole binary64 (* -1 (pow (sin ky) 6))))
#s(approx (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) #s(hole binary64 (- (pow kx 6) (pow (sin ky) 6))))
#s(approx (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) #s(hole binary64 (- (* (pow kx 6) (+ 1 (* -1 (pow kx 2)))) (pow (sin ky) 6))))
#s(approx (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) #s(hole binary64 (- (* (pow kx 6) (+ 1 (* (pow kx 2) (- (* 7/15 (pow kx 2)) 1)))) (pow (sin ky) 6))))
#s(approx (pow (pow (sin kx) 2) 3) #s(hole binary64 (pow kx 6)))
#s(approx (pow (pow (sin kx) 2) 3) #s(hole binary64 (* (pow kx 6) (+ 1 (* -1 (pow kx 2))))))
#s(approx (pow (pow (sin kx) 2) 3) #s(hole binary64 (* (pow kx 6) (+ 1 (* (pow kx 2) (- (* 7/15 (pow kx 2)) 1))))))
#s(approx (pow (pow (sin kx) 2) 3) #s(hole binary64 (* (pow kx 6) (+ 1 (* (pow kx 2) (- (* (pow kx 2) (+ 7/15 (* -128/945 (pow kx 2)))) 1))))))
#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 (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (pow (sin ky) 4)))
#s(approx (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ (* (pow kx 2) (pow (sin ky) 2)) (pow (sin ky) 4))))
#s(approx (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ (* (pow kx 2) (+ (* (pow kx 2) (+ 1 (* -1/3 (pow (sin ky) 2)))) (pow (sin ky) 2))) (pow (sin ky) 4))))
#s(approx (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ (* (pow kx 2) (+ (* (pow kx 2) (+ 1 (+ (* -1/3 (pow (sin ky) 2)) (* (pow kx 2) (- (* 2/45 (pow (sin ky) 2)) 2/3))))) (pow (sin ky) 2))) (pow (sin ky) 4))))
#s(approx (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (pow (sin ky) 4)))
#s(approx (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (* (pow kx 2) (pow (sin ky) 2)) (pow (sin ky) 4))))
#s(approx (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (* (pow kx 2) (+ (* -1/3 (* (pow kx 2) (pow (sin ky) 2))) (pow (sin ky) 2))) (pow (sin ky) 4))))
#s(approx (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (* (pow kx 2) (+ (* (pow kx 2) (+ (* -1/3 (pow (sin ky) 2)) (* 2/45 (* (pow kx 2) (pow (sin ky) 2))))) (pow (sin ky) 2))) (pow (sin ky) 4))))
#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/3 (* (pow kx 2) (pow (sin ky) 2))) (pow (sin ky) 2)))))
#s(approx (* (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (* (pow kx 2) (+ (* (pow kx 2) (+ (* -1/3 (pow (sin ky) 2)) (* 2/45 (* (pow kx 2) (pow (sin ky) 2))))) (pow (sin ky) 2)))))
#s(approx (* (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (* (pow kx 2) (+ (* (pow kx 2) (+ (* -1/3 (pow (sin ky) 2)) (* (pow kx 2) (+ (* -1/315 (* (pow kx 2) (pow (sin ky) 2))) (* 2/45 (pow (sin ky) 2)))))) (pow (sin ky) 2)))))
#s(approx (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (* -1 (pow (sin ky) 2))))
#s(approx (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (* -1 (pow kx 2)) (* -1 (pow (sin ky) 2)))))
#s(approx (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (* -1 (pow (sin ky) 2)) (* (pow kx 2) (- (* (pow kx 2) (- 1/3 (/ 1 (pow (sin ky) 2)))) 1)))))
#s(approx (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (* -1 (pow (sin ky) 2)) (* (pow kx 2) (- (* (pow kx 2) (- (+ 1/3 (* (pow kx 2) (- (* 1/3 (/ 1 (pow (sin ky) 2))) (+ 2/45 (* -1 (/ (- 1/3 (/ 1 (pow (sin ky) 2))) (pow (sin ky) 2))))))) (/ 1 (pow (sin ky) 2)))) 1)))))
#s(approx (- (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (* -1 (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 (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (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 (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
#s(approx (* (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2) (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2)) (sin ky)) #s(hole binary64 (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
#s(approx (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2) (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2)) #s(hole binary64 (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))
#s(approx (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2) #s(hole binary64 (pow (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))) 1/4)))
#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 (* (pow (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) -1) 1/2) (sin ky)) #s(hole binary64 (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
#s(approx (pow (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) -1) 1/2) #s(hole binary64 (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))
#s(approx (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) -1) #s(hole binary64 (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
#s(approx (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) #s(hole binary64 (+ (pow (sin kx) 2) (pow (sin ky) 2))))
#s(approx (* (/ (sin ky) (sqrt (- (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))) (sin th)) #s(hole binary64 (* (* (sin ky) (sin th)) (sqrt (/ 1 (- (/ (* (pow (sin kx) 4) (+ (* (pow (sin kx) 2) (pow (sin ky) 2)) (+ (pow (sin kx) 4) (pow (sin ky) 4)))) (- (pow (sin kx) 6) (pow (sin ky) 6))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))))))
#s(approx (/ (sin ky) (sqrt (- (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (* (sin ky) (sqrt (/ 1 (- (/ (* (pow (sin kx) 4) (+ (* (pow (sin kx) 2) (pow (sin ky) 2)) (+ (pow (sin kx) 4) (pow (sin ky) 4)))) (- (pow (sin kx) 6) (pow (sin ky) 6))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))))))
#s(approx (sqrt (- (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (sqrt (- (/ (* (pow (sin kx) 4) (+ (* (pow (sin kx) 2) (pow (sin ky) 2)) (+ (pow (sin kx) 4) (pow (sin ky) 4)))) (- (pow (sin kx) 6) (pow (sin ky) 6))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))))
#s(approx (- (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (- (/ (* (pow (sin kx) 4) (+ (* (pow (sin kx) 2) (pow (sin ky) 2)) (+ (pow (sin kx) 4) (pow (sin ky) 4)))) (- (pow (sin kx) 6) (pow (sin ky) 6))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))))))
#s(approx (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (/ (* (pow (sin kx) 4) (+ (* (pow (sin kx) 2) (pow (sin ky) 2)) (+ (pow (sin kx) 4) (pow (sin ky) 4)))) (- (pow (sin kx) 6) (pow (sin ky) 6)))))
#s(approx (pow (sin kx) 4) #s(hole binary64 (pow (sin kx) 4)))
#s(approx (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (/ (- (pow (sin kx) 6) (pow (sin ky) 6)) (+ (* (pow (sin kx) 2) (pow (sin ky) 2)) (+ (pow (sin kx) 4) (pow (sin ky) 4))))))
#s(approx (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) #s(hole binary64 (- (pow (sin kx) 6) (pow (sin ky) 6))))
#s(approx (pow (pow (sin kx) 2) 3) #s(hole binary64 (pow (sin kx) 6)))
#s(approx (pow (sin kx) 2) #s(hole binary64 (pow (sin kx) 2)))
#s(approx (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ (* (pow (sin kx) 2) (pow (sin ky) 2)) (+ (pow (sin kx) 4) (pow (sin ky) 4)))))
#s(approx (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (* (pow (sin kx) 2) (pow (sin ky) 2)) (pow (sin ky) 4))))
#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 ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (/ (pow (sin ky) 4) (- (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 (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (/ (* ky (sin th)) (sin kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (* ky (+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx))))) (/ (sin th) (sin kx))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (* ky (+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (* (pow ky 2) (+ (* 1/120 (/ (sin th) (sin kx))) (+ (* 1/12 (/ (sin th) (pow (sin kx) 3))) (* 1/2 (* (sin kx) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))))))))) (/ (sin th) (sin kx))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (* ky (+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (* (pow ky 2) (+ (* 1/120 (/ (sin th) (sin kx))) (+ (* 1/12 (/ (sin th) (pow (sin kx) 3))) (+ (* 1/2 (* (sin kx) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))) (* (pow ky 2) (+ (* -1/2 (* (sin kx) (* (sin th) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))) (pow (sin kx) 2))) (+ (* 2/45 (/ 1 (pow (sin kx) 4))) (+ (* 2/3 (/ 1 (pow (sin kx) 6))) (/ 1 (pow (sin kx) 8)))))))) (+ (* -1/12 (* (sin kx) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))) (+ (* -1/240 (/ (sin th) (pow (sin kx) 3))) (* -1/5040 (/ (sin th) (sin kx)))))))))))))) (/ (sin th) (sin kx))))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (/ ky (sin kx))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (* ky (+ (* -1 (* (pow ky 2) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx))))))
#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 (sin kx))) (+ (* 1/2 (* (sin kx) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))))) (* 1/12 (/ 1 (pow (sin kx) 3)))))) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx))))))
#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 (sin kx))) (+ (* 1/12 (/ 1 (pow (sin kx) 3))) (+ (* 1/2 (* (sin kx) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))))) (* (pow ky 2) (- (+ (* -1/2 (* (sin kx) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))) (pow (sin kx) 2))) (+ (* 2/45 (/ 1 (pow (sin kx) 4))) (+ (* 2/3 (/ 1 (pow (sin kx) 6))) (/ 1 (pow (sin kx) 8))))))) (* -1/12 (* (sin kx) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))) (+ (* 1/5040 (/ 1 (sin kx))) (* 1/240 (/ 1 (pow (sin kx) 3)))))))))) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx))))))
#s(approx (* (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2) (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2)) (sin ky)) #s(hole binary64 (/ ky (sin kx))))
#s(approx (* (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2) (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2)) (sin ky)) #s(hole binary64 (* ky (+ (* -1 (* (pow ky 2) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx))))))
#s(approx (* (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2) (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2)) (sin ky)) #s(hole binary64 (* ky (+ (* (pow ky 2) (- (* (pow ky 2) (+ (* 1/120 (/ 1 (sin kx))) (+ (* 1/2 (* (sin kx) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))))) (* 1/12 (/ 1 (pow (sin kx) 3)))))) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx))))))
#s(approx (* (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2) (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2)) (sin ky)) #s(hole binary64 (* ky (+ (* (pow ky 2) (- (* (pow ky 2) (+ (* 1/120 (/ 1 (sin kx))) (+ (* 1/12 (/ 1 (pow (sin kx) 3))) (+ (* 1/2 (* (sin kx) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))))) (* (pow ky 2) (- (+ (* -1/2 (* (sin kx) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))) (pow (sin kx) 2))) (+ (* 2/45 (/ 1 (pow (sin kx) 4))) (+ (* 2/3 (/ 1 (pow (sin kx) 6))) (/ 1 (pow (sin kx) 8))))))) (* -1/12 (* (sin kx) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))) (+ (* 1/5040 (/ 1 (sin kx))) (* 1/240 (/ 1 (pow (sin kx) 3)))))))))) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx))))))
#s(approx (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2) (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2)) #s(hole binary64 (/ 1 (sin kx))))
#s(approx (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2) (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2)) #s(hole binary64 (+ (* -1/2 (/ (pow ky 2) (pow (sin kx) 3))) (/ 1 (sin kx)))))
#s(approx (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2) (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2)) #s(hole binary64 (+ (* (pow ky 2) (- (* 1/2 (* (pow ky 2) (* (sin kx) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))) (* 1/2 (/ 1 (pow (sin kx) 3))))) (/ 1 (sin kx)))))
#s(approx (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2) (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2)) #s(hole binary64 (+ (* (pow ky 2) (- (* (pow ky 2) (+ (* -1/2 (* (pow ky 2) (* (sin kx) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))) (pow (sin kx) 2))) (+ (* 2/45 (/ 1 (pow (sin kx) 4))) (+ (* 2/3 (/ 1 (pow (sin kx) 6))) (/ 1 (pow (sin kx) 8)))))))) (* 1/2 (* (sin kx) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))))))) (* 1/2 (/ 1 (pow (sin kx) 3))))) (/ 1 (sin kx)))))
#s(approx (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2) #s(hole binary64 (* (pow 1 1/4) (sqrt (/ 1 (sin kx))))))
#s(approx (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2) #s(hole binary64 (+ (* -1/4 (* (pow 1 1/4) (* (pow ky 2) (sqrt (/ 1 (pow (sin kx) 5)))))) (* (pow 1 1/4) (sqrt (/ 1 (sin kx)))))))
#s(approx (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2) #s(hole binary64 (+ (* (pow 1 1/4) (sqrt (/ 1 (sin kx)))) (* (pow ky 2) (+ (* -1/4 (* (pow 1 1/4) (sqrt (/ 1 (pow (sin kx) 5))))) (* (pow 1 1/4) (* (* (pow ky 2) (+ (* 1/96 (- (* 24 (* (pow (sin kx) 2) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (/ 1 (pow (sin kx) 6))))) (* 12 (/ 1 (pow (sin kx) 4))))) (* 1/32 (/ 1 (pow (sin kx) 4))))) (sqrt (/ 1 (sin kx))))))))))
#s(approx (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2) #s(hole binary64 (+ (* (pow 1 1/4) (sqrt (/ 1 (sin kx)))) (* (pow ky 2) (+ (* -1/4 (* (pow 1 1/4) (sqrt (/ 1 (pow (sin kx) 5))))) (* (pow ky 2) (+ (* (pow 1 1/4) (* (sqrt (/ 1 (sin kx))) (+ (* 1/96 (- (* 24 (* (pow (sin kx) 2) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (/ 1 (pow (sin kx) 6))))) (* 12 (/ 1 (pow (sin kx) 4))))) (* 1/32 (/ 1 (pow (sin kx) 4)))))) (* (pow 1 1/4) (* (* (pow ky 2) (- (+ (* -1/384 (/ (- (* 24 (* (pow (sin kx) 2) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (/ 1 (pow (sin kx) 6))))) (* 12 (/ 1 (pow (sin kx) 4)))) (pow (sin kx) 2))) (* 1/2880 (- (+ (* -720 (* (pow (sin kx) 2) (+ (* 2/3 (/ 1 (pow (sin kx) 6))) (+ (* 2/45 (/ 1 (pow (sin kx) 4))) (/ 1 (pow (sin kx) 8)))))) (* 720 (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (/ 1 (pow (sin kx) 6))))) (* 240 (/ 1 (pow (sin kx) 6)))))) (* 1/384 (/ 1 (pow (sin kx) 6))))) (sqrt (/ 1 (sin kx))))))))))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) #s(hole binary64 (sin kx)))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) #s(hole binary64 (+ (sin kx) (* 1/2 (/ (pow ky 2) (sin kx))))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) #s(hole binary64 (+ (sin kx) (* (pow ky 2) (+ (* -1/2 (/ (* (pow ky 2) (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2))))) (sin kx))) (* 1/2 (/ 1 (sin kx))))))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) #s(hole binary64 (+ (sin kx) (* (pow ky 2) (+ (* (pow ky 2) (+ (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (sin kx))) (* 1/2 (/ (* (pow ky 2) (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))))) (sin kx))))) (* 1/2 (/ 1 (sin kx))))))))
#s(approx (sin ky) #s(hole binary64 ky))
#s(approx (sin ky) #s(hole binary64 (* ky (+ 1 (* -1/6 (pow ky 2))))))
#s(approx (sin ky) #s(hole binary64 (* ky (+ 1 (* (pow ky 2) (- (* 1/120 (pow ky 2)) 1/6))))))
#s(approx (sin ky) #s(hole binary64 (* ky (+ 1 (* (pow ky 2) (- (* (pow ky 2) (+ 1/120 (* -1/5040 (pow ky 2)))) 1/6))))))
#s(approx ky #s(hole binary64 ky))
#s(approx (* (pow (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) -1) 1/2) (sin ky)) #s(hole binary64 (/ ky (sin kx))))
#s(approx (* (pow (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) -1) 1/2) (sin ky)) #s(hole binary64 (* ky (+ (* -1 (* (pow ky 2) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx))))))
#s(approx (* (pow (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) -1) 1/2) (sin ky)) #s(hole binary64 (* ky (+ (* (pow ky 2) (- (* (pow ky 2) (+ (* 1/120 (/ 1 (sin kx))) (+ (* 1/2 (* (sin kx) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))))) (* 1/12 (/ 1 (pow (sin kx) 3)))))) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx))))))
#s(approx (* (pow (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) -1) 1/2) (sin ky)) #s(hole binary64 (* ky (+ (* (pow ky 2) (- (* (pow ky 2) (+ (* 1/120 (/ 1 (sin kx))) (+ (* 1/12 (/ 1 (pow (sin kx) 3))) (+ (* 1/2 (* (sin kx) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))))) (* (pow ky 2) (- (+ (* -1/2 (* (sin kx) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))) (pow (sin kx) 2))) (+ (* 2/45 (/ 1 (pow (sin kx) 4))) (+ (* 2/3 (/ 1 (pow (sin kx) 6))) (/ 1 (pow (sin kx) 8))))))) (* -1/12 (* (sin kx) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))) (+ (* 1/5040 (/ 1 (sin kx))) (* 1/240 (/ 1 (pow (sin kx) 3)))))))))) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx))))))
#s(approx (pow (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) -1) 1/2) #s(hole binary64 (/ 1 (sin kx))))
#s(approx (pow (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) -1) 1/2) #s(hole binary64 (+ (* -1/2 (/ (pow ky 2) (pow (sin kx) 3))) (/ 1 (sin kx)))))
#s(approx (pow (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) -1) 1/2) #s(hole binary64 (+ (* (pow ky 2) (- (* 1/2 (* (pow ky 2) (* (sin kx) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))) (* 1/2 (/ 1 (pow (sin kx) 3))))) (/ 1 (sin kx)))))
#s(approx (pow (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) -1) 1/2) #s(hole binary64 (+ (* (pow ky 2) (- (* (pow ky 2) (+ (* -1/2 (* (pow ky 2) (* (sin kx) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))) (pow (sin kx) 2))) (+ (* 2/45 (/ 1 (pow (sin kx) 4))) (+ (* 2/3 (/ 1 (pow (sin kx) 6))) (/ 1 (pow (sin kx) 8)))))))) (* 1/2 (* (sin kx) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))))))) (* 1/2 (/ 1 (pow (sin kx) 3))))) (/ 1 (sin kx)))))
#s(approx (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) -1) #s(hole binary64 (/ 1 (pow (sin kx) 2))))
#s(approx (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) -1) #s(hole binary64 (+ (* -1 (/ (pow ky 2) (pow (sin kx) 4))) (/ 1 (pow (sin kx) 2)))))
#s(approx (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) -1) #s(hole binary64 (+ (* (pow ky 2) (- (* (pow ky 2) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (/ 1 (pow (sin kx) 6)))) (/ 1 (pow (sin kx) 4)))) (/ 1 (pow (sin kx) 2)))))
#s(approx (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) -1) #s(hole binary64 (+ (* (pow ky 2) (- (* (pow ky 2) (+ (* -1 (* (pow ky 2) (+ (* 2/45 (/ 1 (pow (sin kx) 4))) (+ (* 2/3 (/ 1 (pow (sin kx) 6))) (/ 1 (pow (sin kx) 8)))))) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (/ 1 (pow (sin kx) 6))))) (/ 1 (pow (sin kx) 4)))) (/ 1 (pow (sin kx) 2)))))
#s(approx (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) #s(hole binary64 (pow (sin kx) 2)))
#s(approx (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) #s(hole binary64 (+ (pow ky 2) (pow (sin kx) 2))))
#s(approx (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) #s(hole binary64 (+ (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2)))) (pow (sin kx) 2))))
#s(approx (+ (* (sin kx) (sin kx)) (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) (sqrt (- (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))) (sin th)) #s(hole binary64 (/ (* ky (sin th)) (sin kx))))
#s(approx (* (/ (sin ky) (sqrt (- (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))) (sin th)) #s(hole binary64 (* ky (+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx))))) (/ (sin th) (sin kx))))))
#s(approx (* (/ (sin ky) (sqrt (- (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))) (sin th)) #s(hole binary64 (* ky (+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (* (pow ky 2) (+ (* 1/120 (/ (sin th) (sin kx))) (+ (* 1/12 (/ (sin th) (pow (sin kx) 3))) (* 1/2 (* (sin kx) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))))))))) (/ (sin th) (sin kx))))))
#s(approx (* (/ (sin ky) (sqrt (- (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))) (sin th)) #s(hole binary64 (* ky (+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (* (pow ky 2) (+ (* 1/120 (/ (sin th) (sin kx))) (+ (* 1/12 (/ (sin th) (pow (sin kx) 3))) (+ (* 1/2 (* (sin kx) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))) (* (pow ky 2) (+ (* -1/2 (* (sin kx) (* (sin th) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))) (pow (sin kx) 2))) (+ (* 2/45 (/ 1 (pow (sin kx) 4))) (+ (* 2/3 (/ 1 (pow (sin kx) 6))) (/ 1 (pow (sin kx) 8)))))))) (+ (* -1/12 (* (sin kx) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))) (+ (* -1/240 (/ (sin th) (pow (sin kx) 3))) (* -1/5040 (/ (sin th) (sin kx)))))))))))))) (/ (sin th) (sin kx))))))
#s(approx (/ (sin ky) (sqrt (- (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (/ ky (sin kx))))
#s(approx (/ (sin ky) (sqrt (- (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (* ky (+ (* -1 (* (pow ky 2) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx))))))
#s(approx (/ (sin ky) (sqrt (- (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (* ky (+ (* (pow ky 2) (- (* (pow ky 2) (+ (* 1/120 (/ 1 (sin kx))) (+ (* 1/2 (* (sin kx) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))))) (* 1/12 (/ 1 (pow (sin kx) 3)))))) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx))))))
#s(approx (/ (sin ky) (sqrt (- (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (* ky (+ (* (pow ky 2) (- (* (pow ky 2) (+ (* 1/120 (/ 1 (sin kx))) (+ (* 1/12 (/ 1 (pow (sin kx) 3))) (+ (* 1/2 (* (sin kx) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))))) (* (pow ky 2) (- (+ (* -1/2 (* (sin kx) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))) (pow (sin kx) 2))) (+ (* 2/45 (/ 1 (pow (sin kx) 4))) (+ (* 2/3 (/ 1 (pow (sin kx) 6))) (/ 1 (pow (sin kx) 8))))))) (* -1/12 (* (sin kx) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))) (+ (* 1/5040 (/ 1 (sin kx))) (* 1/240 (/ 1 (pow (sin kx) 3)))))))))) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx))))))
#s(approx (sqrt (- (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (sin kx)))
#s(approx (sqrt (- (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (+ (sin kx) (* 1/2 (/ (pow ky 2) (sin kx))))))
#s(approx (sqrt (- (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (+ (sin kx) (* (pow ky 2) (+ (* -1/2 (/ (* (pow ky 2) (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2))))) (sin kx))) (* 1/2 (/ 1 (sin kx))))))))
#s(approx (sqrt (- (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (+ (sin kx) (* (pow ky 2) (+ (* (pow ky 2) (+ (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (sin kx))) (* 1/2 (/ (* (pow ky 2) (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))))) (sin kx))))) (* 1/2 (/ 1 (sin kx))))))))
#s(approx (- (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (pow (sin kx) 2)))
#s(approx (- (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ (pow ky 2) (pow (sin kx) 2))))
#s(approx (- (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (/ (pow (sin ky) 4) (- (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) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (/ (pow (sin ky) 4) (- (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 kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (pow (sin kx) 2)))
#s(approx (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (+ (pow ky 2) (pow (sin kx) 2))))
#s(approx (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (+ (* (pow ky 2) (+ 1 (* (pow ky 2) (- (/ 1 (pow (sin kx) 2)) 1/3)))) (pow (sin kx) 2))))
#s(approx (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (+ (* (pow ky 2) (+ 1 (* (pow ky 2) (- (+ (* (pow ky 2) (- (+ 2/45 (/ 1 (pow (sin kx) 4))) (* 2/3 (/ 1 (pow (sin kx) 2))))) (/ 1 (pow (sin kx) 2))) 1/3)))) (pow (sin kx) 2))))
#s(approx (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (pow (sin kx) 2)))
#s(approx (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (+ (* -1 (pow ky 2)) (pow (sin kx) 2))))
#s(approx (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (+ (* (pow ky 2) (- (* 1/3 (pow ky 2)) 1)) (pow (sin kx) 2))))
#s(approx (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (+ (* (pow ky 2) (- (* (pow ky 2) (+ 1/3 (* (pow ky 2) (- (* 1/3 (/ 1 (pow (sin kx) 2))) (+ 2/45 (+ (* -1 (/ (+ 1 (* -1/3 (pow (sin kx) 2))) (pow (sin kx) 4))) (/ 1 (pow (sin kx) 4)))))))) 1)) (pow (sin kx) 2))))
#s(approx (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) #s(hole binary64 (pow (sin kx) 6)))
#s(approx (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) #s(hole binary64 (+ (* -1 (pow ky 6)) (pow (sin kx) 6))))
#s(approx (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) #s(hole binary64 (+ (* (pow ky 6) (- (pow ky 2) 1)) (pow (sin kx) 6))))
#s(approx (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) #s(hole binary64 (+ (* (pow ky 6) (- (* (pow ky 2) (+ 1 (* -7/15 (pow ky 2)))) 1)) (pow (sin kx) 6))))
#s(approx (pow (pow (sin ky) 2) 3) #s(hole binary64 (pow ky 6)))
#s(approx (pow (pow (sin ky) 2) 3) #s(hole binary64 (* (pow ky 6) (+ 1 (* -1 (pow ky 2))))))
#s(approx (pow (pow (sin ky) 2) 3) #s(hole binary64 (* (pow ky 6) (+ 1 (* (pow ky 2) (- (* 7/15 (pow ky 2)) 1))))))
#s(approx (pow (pow (sin ky) 2) 3) #s(hole binary64 (* (pow ky 6) (+ 1 (* (pow ky 2) (- (* (pow ky 2) (+ 7/15 (* -128/945 (pow ky 2)))) 1))))))
#s(approx (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (pow (sin kx) 4)))
#s(approx (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ (* (pow ky 2) (pow (sin kx) 2)) (pow (sin kx) 4))))
#s(approx (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ (* (pow ky 2) (+ (* (pow ky 2) (+ 1 (* -1/3 (pow (sin kx) 2)))) (pow (sin kx) 2))) (pow (sin kx) 4))))
#s(approx (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ (* (pow ky 2) (+ (* (pow ky 2) (+ 1 (+ (* -1/3 (pow (sin kx) 2)) (* (pow ky 2) (- (* 2/45 (pow (sin kx) 2)) 2/3))))) (pow (sin kx) 2))) (pow (sin kx) 4))))
#s(approx (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (* (pow ky 2) (pow (sin kx) 2))))
#s(approx (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (* (pow ky 2) (+ (* (pow ky 2) (+ 1 (* -1/3 (pow (sin kx) 2)))) (pow (sin kx) 2)))))
#s(approx (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (* (pow ky 2) (+ (* (pow ky 2) (+ 1 (+ (* -1/3 (pow (sin kx) 2)) (* (pow ky 2) (- (* 2/45 (pow (sin kx) 2)) 2/3))))) (pow (sin kx) 2)))))
#s(approx (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (* (pow ky 2) (+ (* (pow ky 2) (+ 1 (+ (* -1/3 (pow (sin kx) 2)) (* (pow ky 2) (- (+ (* 2/45 (pow (sin kx) 2)) (* (pow ky 2) (+ 1/5 (* -1/315 (pow (sin kx) 2))))) 2/3))))) (pow (sin kx) 2)))))
#s(approx (pow (sin ky) 4) #s(hole binary64 (pow ky 4)))
#s(approx (pow (sin ky) 4) #s(hole binary64 (* (pow ky 4) (+ 1 (* -2/3 (pow ky 2))))))
#s(approx (pow (sin ky) 4) #s(hole binary64 (* (pow ky 4) (+ 1 (* (pow ky 2) (- (* 1/5 (pow ky 2)) 2/3))))))
#s(approx (pow (sin ky) 4) #s(hole binary64 (* (pow ky 4) (+ 1 (* (pow ky 2) (- (* (pow ky 2) (+ 1/5 (* -34/945 (pow ky 2)))) 2/3))))))
#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/3 (* (pow ky 2) (pow (sin kx) 2))) (pow (sin kx) 2)))))
#s(approx (* (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (* (pow ky 2) (+ (* (pow ky 2) (+ (* -1/3 (pow (sin kx) 2)) (* 2/45 (* (pow ky 2) (pow (sin kx) 2))))) (pow (sin kx) 2)))))
#s(approx (* (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (* (pow ky 2) (+ (* (pow ky 2) (+ (* -1/3 (pow (sin kx) 2)) (* (pow ky 2) (+ (* -1/315 (* (pow ky 2) (pow (sin kx) 2))) (* 2/45 (pow (sin kx) 2)))))) (pow (sin kx) 2)))))
#s(approx (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (/ (pow ky 4) (pow (sin kx) 2))))
#s(approx (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (* (pow ky 4) (+ (* (pow ky 2) (- (/ 1 (pow (sin kx) 4)) (* 2/3 (/ 1 (pow (sin kx) 2))))) (/ 1 (pow (sin kx) 2))))))
#s(approx (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (* (pow ky 4) (+ (* (pow ky 2) (- (+ (* (pow ky 2) (- (* 1/5 (/ 1 (pow (sin kx) 2))) (+ (* -1 (/ (- (/ 1 (pow (sin kx) 4)) (* 2/3 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))) (* 1/3 (/ 1 (pow (sin kx) 4)))))) (/ 1 (pow (sin kx) 4))) (* 2/3 (/ 1 (pow (sin kx) 2))))) (/ 1 (pow (sin kx) 2))))))
#s(approx (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (* (pow ky 4) (+ (* (pow ky 2) (- (+ (* (pow ky 2) (- (+ (* 1/5 (/ 1 (pow (sin kx) 2))) (* (pow ky 2) (- (* 2/45 (/ 1 (pow (sin kx) 4))) (+ (* -1 (/ (- (* 1/5 (/ 1 (pow (sin kx) 2))) (+ (* -1 (/ (- (/ 1 (pow (sin kx) 4)) (* 2/3 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))) (* 1/3 (/ 1 (pow (sin kx) 4))))) (pow (sin kx) 2))) (+ (* 34/945 (/ 1 (pow (sin kx) 2))) (* 1/3 (/ (- (/ 1 (pow (sin kx) 4)) (* 2/3 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2)))))))) (+ (* -1 (/ (- (/ 1 (pow (sin kx) 4)) (* 2/3 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))) (* 1/3 (/ 1 (pow (sin kx) 4)))))) (/ 1 (pow (sin kx) 4))) (* 2/3 (/ 1 (pow (sin kx) 2))))) (/ 1 (pow (sin kx) 2))))))
#s(approx (- (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (pow (sin kx) 2)))
#s(approx (- (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (* -1 (pow ky 2)) (pow (sin kx) 2))))
#s(approx (- (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (* (pow ky 2) (- (* 1/3 (pow ky 2)) 1)) (pow (sin kx) 2))))
#s(approx (- (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (* (pow ky 2) (- (* (pow ky 2) (+ 1/3 (* -2/45 (pow ky 2)))) 1)) (pow (sin kx) 2))))
#s(approx (sin ky) #s(hole binary64 (sin ky)))
#s(approx (pow (sin ky) 2) #s(hole binary64 (pow (sin ky) 2)))
#s(approx (pow (pow (sin ky) 2) 3) #s(hole binary64 (pow (sin ky) 6)))
#s(approx (pow (sin ky) 4) #s(hole binary64 (pow (sin ky) 4)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (* (* th (sin ky)) (sqrt (/ 1 (+ (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 (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* (sin ky) (sqrt (/ 1 (+ (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 (+ (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* (pow th 2) (+ (* -1/6 (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* 1/120 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ (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 (+ (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* (pow th 2) (+ (* -1/6 (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* (pow th 2) (+ (* -1/5040 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* 1/120 (* (sin ky) (sqrt (/ 1 (+ (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 th #s(hole binary64 th))
#s(approx (* (/ (sin ky) (sqrt (- (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))) (sin th)) #s(hole binary64 (* (* th (sin ky)) (sqrt (/ 1 (- (/ (* (pow (sin kx) 4) (+ (* (pow (sin kx) 2) (pow (sin ky) 2)) (+ (pow (sin kx) 4) (pow (sin ky) 4)))) (- (pow (sin kx) 6) (pow (sin ky) 6))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))))))
#s(approx (* (/ (sin ky) (sqrt (- (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))) (sin th)) #s(hole binary64 (* th (+ (* -1/6 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (- (/ (* (pow (sin kx) 4) (+ (* (pow (sin kx) 2) (pow (sin ky) 2)) (+ (pow (sin kx) 4) (pow (sin ky) 4)))) (- (pow (sin kx) 6) (pow (sin ky) 6))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))))) (* (sin ky) (sqrt (/ 1 (- (/ (* (pow (sin kx) 4) (+ (* (pow (sin kx) 2) (pow (sin ky) 2)) (+ (pow (sin kx) 4) (pow (sin ky) 4)))) (- (pow (sin kx) 6) (pow (sin ky) 6))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))))))))
#s(approx (* (/ (sin ky) (sqrt (- (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))) (sin th)) #s(hole binary64 (* th (+ (* (sin ky) (sqrt (/ 1 (- (/ (* (pow (sin kx) 4) (+ (* (pow (sin kx) 2) (pow (sin ky) 2)) (+ (pow (sin kx) 4) (pow (sin ky) 4)))) (- (pow (sin kx) 6) (pow (sin ky) 6))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))))))) (* (pow th 2) (+ (* -1/6 (* (sin ky) (sqrt (/ 1 (- (/ (* (pow (sin kx) 4) (+ (* (pow (sin kx) 2) (pow (sin ky) 2)) (+ (pow (sin kx) 4) (pow (sin ky) 4)))) (- (pow (sin kx) 6) (pow (sin ky) 6))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))))) (* 1/120 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (- (/ (* (pow (sin kx) 4) (+ (* (pow (sin kx) 2) (pow (sin ky) 2)) (+ (pow (sin kx) 4) (pow (sin ky) 4)))) (- (pow (sin kx) 6) (pow (sin ky) 6))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))))))))))))))
#s(approx (* (/ (sin ky) (sqrt (- (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))) (sin th)) #s(hole binary64 (* th (+ (* (sin ky) (sqrt (/ 1 (- (/ (* (pow (sin kx) 4) (+ (* (pow (sin kx) 2) (pow (sin ky) 2)) (+ (pow (sin kx) 4) (pow (sin ky) 4)))) (- (pow (sin kx) 6) (pow (sin ky) 6))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))))))) (* (pow th 2) (+ (* -1/6 (* (sin ky) (sqrt (/ 1 (- (/ (* (pow (sin kx) 4) (+ (* (pow (sin kx) 2) (pow (sin ky) 2)) (+ (pow (sin kx) 4) (pow (sin ky) 4)))) (- (pow (sin kx) 6) (pow (sin ky) 6))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))))) (* (pow th 2) (+ (* -1/5040 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (- (/ (* (pow (sin kx) 4) (+ (* (pow (sin kx) 2) (pow (sin ky) 2)) (+ (pow (sin kx) 4) (pow (sin ky) 4)))) (- (pow (sin kx) 6) (pow (sin ky) 6))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))))) (* 1/120 (* (sin ky) (sqrt (/ 1 (- (/ (* (pow (sin kx) 4) (+ (* (pow (sin kx) 2) (pow (sin ky) 2)) (+ (pow (sin kx) 4) (pow (sin ky) 4)))) (- (pow (sin kx) 6) (pow (sin ky) 6))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))))))))))))))))
#s(approx (sin th) #s(hole binary64 (sin th)))
Calls

9 calls:

TimeVariablePointExpression
35.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)))) (* (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2) (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2)) (sin ky)) (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2) (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2)) (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (sin kx) kx (sin ky) ky -1/2 (sin th) th (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (* (pow (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) -1) 1/2) (sin ky)) (pow (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) -1) 1/2) (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) -1) (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) (pow (sin ky) 2) 2 -1 1/2 (* (/ (sin ky) (sqrt (- (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))) (sin th)) (/ (sin ky) (sqrt (- (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))) (sqrt (- (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))))) (- (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))) (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (pow (sin kx) 4) 4 (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2))))) (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (pow (pow (sin kx) 2) 3) (pow (sin kx) 2) 3 (pow (pow (sin ky) 2) 3) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2))) (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (- (pow (sin kx) 2) (pow (sin ky) 2)))
29.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)))) (* (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2) (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2)) (sin ky)) (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2) (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2)) (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (sin kx) kx (sin ky) ky -1/2 (sin th) th (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (* (pow (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) -1) 1/2) (sin ky)) (pow (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) -1) 1/2) (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) -1) (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) (pow (sin ky) 2) 2 -1 1/2 (* (/ (sin ky) (sqrt (- (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))) (sin th)) (/ (sin ky) (sqrt (- (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))) (sqrt (- (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))))) (- (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))) (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (pow (sin kx) 4) 4 (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2))))) (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (pow (pow (sin kx) 2) 3) (pow (sin kx) 2) 3 (pow (pow (sin ky) 2) 3) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2))) (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (- (pow (sin kx) 2) (pow (sin ky) 2)))
29.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)))) (* (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2) (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2)) (sin ky)) (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2) (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2)) (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (sin kx) kx (sin ky) ky -1/2 (sin th) th (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (* (pow (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) -1) 1/2) (sin ky)) (pow (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) -1) 1/2) (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) -1) (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) (pow (sin ky) 2) 2 -1 1/2 (* (/ (sin ky) (sqrt (- (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))) (sin th)) (/ (sin ky) (sqrt (- (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))) (sqrt (- (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))))) (- (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))) (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (pow (sin kx) 4) 4 (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2))))) (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (pow (pow (sin kx) 2) 3) (pow (sin kx) 2) 3 (pow (pow (sin ky) 2) 3) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2))) (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (- (pow (sin kx) 2) (pow (sin ky) 2)))
28.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)))) (* (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2) (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2)) (sin ky)) (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2) (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2)) (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (sin kx) kx (sin ky) ky -1/2 (sin th) th (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (* (pow (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) -1) 1/2) (sin ky)) (pow (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) -1) 1/2) (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) -1) (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) (pow (sin ky) 2) 2 -1 1/2 (* (/ (sin ky) (sqrt (- (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))) (sin th)) (/ (sin ky) (sqrt (- (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))) (sqrt (- (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))))) (- (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))) (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (pow (sin kx) 4) 4 (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2))))) (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (pow (pow (sin kx) 2) 3) (pow (sin kx) 2) 3 (pow (pow (sin ky) 2) 3) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2))) (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (- (pow (sin kx) 2) (pow (sin ky) 2)))
10.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)))) (* (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2) (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2)) (sin ky)) (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2) (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2)) (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2) (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (sin kx) kx (sin ky) ky -1/2 (sin th) th (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (* (pow (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) -1) 1/2) (sin ky)) (pow (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) -1) 1/2) (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) -1) (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) (pow (sin ky) 2) 2 -1 1/2 (* (/ (sin ky) (sqrt (- (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))) (sin th)) (/ (sin ky) (sqrt (- (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))) (sqrt (- (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))))) (- (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))) (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (pow (sin kx) 4) 4 (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2))))) (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (pow (pow (sin kx) 2) 3) (pow (sin kx) 2) 3 (pow (pow (sin ky) 2) 3) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2))) (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (- (pow (sin kx) 2) (pow (sin ky) 2)))

rewrite242.0ms (2.4%)

Memory
16.4MiB live, 346.8MiB allocated; 25ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0124414319
0132411180
1786211180
0800810701
Stop Event
iter limit
node limit
iter limit
Counts
296 → 449
Calls
Call 1
Inputs
(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (*.f64 (*.f64 (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1/2 binary64)) (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1/2 binary64))) (sin.f64 ky))) (sin.f64 th))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (*.f64 (*.f64 (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1/2 binary64)) (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1/2 binary64))) (sin.f64 ky)))
(*.f64 (*.f64 (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1/2 binary64)) (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1/2 binary64))) (sin.f64 ky))
(*.f64 (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1/2 binary64)) (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1/2 binary64)))
(pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1/2 binary64))
(hypot.f64 (sin.f64 kx) (sin.f64 ky))
(sin.f64 kx)
kx
(sin.f64 ky)
ky
#s(literal -1/2 binary64)
(sin.f64 th)
th
(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (*.f64 (pow.f64 (pow.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal -1 binary64)) #s(literal 1/2 binary64)) (sin.f64 ky))) (sin.f64 th))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (*.f64 (pow.f64 (pow.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal -1 binary64)) #s(literal 1/2 binary64)) (sin.f64 ky)))
(*.f64 (pow.f64 (pow.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal -1 binary64)) #s(literal 1/2 binary64)) (sin.f64 ky))
(pow.f64 (pow.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal -1 binary64)) #s(literal 1/2 binary64))
(pow.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal -1 binary64))
(fma.f64 (sin.f64 kx) (sin.f64 kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))
(pow.f64 (sin.f64 ky) #s(literal 2 binary64))
#s(literal 2 binary64)
#s(literal -1 binary64)
#s(literal 1/2 binary64)
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (/.f64 (-.f64 (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (pow.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)) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (-.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 (/.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (/.f64 (-.f64 (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (pow.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)) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))))
(sqrt.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (/.f64 (-.f64 (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (pow.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)) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(-.f64 (/.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (/.f64 (-.f64 (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (pow.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)) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (-.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 4 binary64)) (/.f64 (-.f64 (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (pow.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)) (*.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 4 binary64))
#s(literal 4 binary64)
(/.f64 (-.f64 (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (pow.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)) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(-.f64 (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) #s(literal 3 binary64)))
(pow.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(literal 3 binary64))
(pow.f64 (sin.f64 kx) #s(literal 2 binary64))
#s(literal 3 binary64)
(pow.f64 (pow.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)) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
(+.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
(pow.f64 (sin.f64 ky) #s(literal 4 binary64))
(*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))
(/.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (-.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)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (sin th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (+ (sin th) (* (pow kx 2) (+ (* -1/2 (/ (sin th) (pow (sin ky) 2))) (* 1/2 (* (pow kx 2) (* (pow (sin ky) 2) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))))))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (+ (sin th) (* (pow kx 2) (+ (* -1/2 (/ (sin th) (pow (sin ky) 2))) (* (pow kx 2) (+ (* -1/2 (* (pow kx 2) (* (pow (sin ky) 2) (* (sin th) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))) (pow (sin ky) 2))) (+ (* 2/45 (/ 1 (pow (sin ky) 4))) (+ (* 2/3 (/ 1 (pow (sin ky) 6))) (/ 1 (pow (sin ky) 8))))))))) (* 1/2 (* (pow (sin ky) 2) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6))))))))))))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 1))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ 1 (* -1/2 (/ (pow kx 2) (pow (sin ky) 2))))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ 1 (* (pow kx 2) (- (* 1/2 (* (pow kx 2) (* (pow (sin ky) 2) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6))))))) (* 1/2 (/ 1 (pow (sin ky) 2))))))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ 1 (* (pow kx 2) (- (* (pow kx 2) (+ (* -1/2 (* (pow kx 2) (* (pow (sin ky) 2) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))) (pow (sin ky) 2))) (+ (* 2/45 (/ 1 (pow (sin ky) 4))) (+ (* 2/3 (/ 1 (pow (sin ky) 6))) (/ 1 (pow (sin ky) 8)))))))) (* 1/2 (* (pow (sin ky) 2) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))))))) (* 1/2 (/ 1 (pow (sin ky) 2))))))))
#s(approx (* (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2) (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2)) (sin ky)) #s(hole binary64 1))
#s(approx (* (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2) (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2)) (sin ky)) #s(hole binary64 (+ 1 (* -1/2 (/ (pow kx 2) (pow (sin ky) 2))))))
#s(approx (* (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2) (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2)) (sin ky)) #s(hole binary64 (+ 1 (* (pow kx 2) (- (* 1/2 (* (pow kx 2) (* (pow (sin ky) 2) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6))))))) (* 1/2 (/ 1 (pow (sin ky) 2))))))))
#s(approx (* (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2) (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2)) (sin ky)) #s(hole binary64 (+ 1 (* (pow kx 2) (- (* (pow kx 2) (+ (* -1/2 (* (pow kx 2) (* (pow (sin ky) 2) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))) (pow (sin ky) 2))) (+ (* 2/45 (/ 1 (pow (sin ky) 4))) (+ (* 2/3 (/ 1 (pow (sin ky) 6))) (/ 1 (pow (sin ky) 8)))))))) (* 1/2 (* (pow (sin ky) 2) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))))))) (* 1/2 (/ 1 (pow (sin ky) 2))))))))
#s(approx (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2) (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2)) #s(hole binary64 (/ 1 (sin ky))))
#s(approx (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2) (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2)) #s(hole binary64 (+ (* -1/2 (/ (pow kx 2) (pow (sin ky) 3))) (/ 1 (sin ky)))))
#s(approx (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2) (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2)) #s(hole binary64 (+ (* (pow kx 2) (- (* 1/2 (* (pow kx 2) (* (sin ky) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6))))))) (* 1/2 (/ 1 (pow (sin ky) 3))))) (/ 1 (sin ky)))))
#s(approx (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2) (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2)) #s(hole binary64 (+ (* (pow kx 2) (- (* (pow kx 2) (+ (* -1/2 (* (pow kx 2) (* (sin ky) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))) (pow (sin ky) 2))) (+ (* 2/45 (/ 1 (pow (sin ky) 4))) (+ (* 2/3 (/ 1 (pow (sin ky) 6))) (/ 1 (pow (sin ky) 8)))))))) (* 1/2 (* (sin ky) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))))))) (* 1/2 (/ 1 (pow (sin ky) 3))))) (/ 1 (sin ky)))))
#s(approx (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2) #s(hole binary64 (* (pow 1 1/4) (sqrt (/ 1 (sin ky))))))
#s(approx (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2) #s(hole binary64 (+ (* -1/4 (* (pow 1 1/4) (* (pow kx 2) (sqrt (/ 1 (pow (sin ky) 5)))))) (* (pow 1 1/4) (sqrt (/ 1 (sin ky)))))))
#s(approx (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2) #s(hole binary64 (+ (* (pow 1 1/4) (sqrt (/ 1 (sin ky)))) (* (pow kx 2) (+ (* -1/4 (* (pow 1 1/4) (sqrt (/ 1 (pow (sin ky) 5))))) (* (pow 1 1/4) (* (* (pow kx 2) (+ (* 1/96 (- (* 24 (* (pow (sin ky) 2) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (/ 1 (pow (sin ky) 6))))) (* 12 (/ 1 (pow (sin ky) 4))))) (* 1/32 (/ 1 (pow (sin ky) 4))))) (sqrt (/ 1 (sin ky))))))))))
#s(approx (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2) #s(hole binary64 (+ (* (pow 1 1/4) (sqrt (/ 1 (sin ky)))) (* (pow kx 2) (+ (* -1/4 (* (pow 1 1/4) (sqrt (/ 1 (pow (sin ky) 5))))) (* (pow kx 2) (+ (* (pow 1 1/4) (* (sqrt (/ 1 (sin ky))) (+ (* 1/96 (- (* 24 (* (pow (sin ky) 2) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (/ 1 (pow (sin ky) 6))))) (* 12 (/ 1 (pow (sin ky) 4))))) (* 1/32 (/ 1 (pow (sin ky) 4)))))) (* (pow 1 1/4) (* (* (pow kx 2) (- (+ (* -1/384 (/ (- (* 24 (* (pow (sin ky) 2) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (/ 1 (pow (sin ky) 6))))) (* 12 (/ 1 (pow (sin ky) 4)))) (pow (sin ky) 2))) (* 1/2880 (- (+ (* -720 (* (pow (sin ky) 2) (+ (* 2/3 (/ 1 (pow (sin ky) 6))) (+ (* 2/45 (/ 1 (pow (sin ky) 4))) (/ 1 (pow (sin ky) 8)))))) (* 720 (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (/ 1 (pow (sin ky) 6))))) (* 240 (/ 1 (pow (sin ky) 6)))))) (* 1/384 (/ 1 (pow (sin ky) 6))))) (sqrt (/ 1 (sin ky))))))))))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) #s(hole binary64 (sin ky)))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) #s(hole binary64 (+ (sin ky) (* 1/2 (/ (pow kx 2) (sin ky))))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) #s(hole binary64 (+ (sin ky) (* (pow kx 2) (+ (* -1/2 (/ (* (pow kx 2) (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2))))) (sin ky))) (* 1/2 (/ 1 (sin ky))))))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) #s(hole binary64 (+ (sin ky) (* (pow kx 2) (+ (* (pow kx 2) (+ (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (sin ky))) (* 1/2 (/ (* (pow kx 2) (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2))))) (sin ky))))) (* 1/2 (/ 1 (sin ky))))))))
#s(approx (sin kx) #s(hole binary64 kx))
#s(approx (sin kx) #s(hole binary64 (* kx (+ 1 (* -1/6 (pow kx 2))))))
#s(approx (sin kx) #s(hole binary64 (* kx (+ 1 (* (pow kx 2) (- (* 1/120 (pow kx 2)) 1/6))))))
#s(approx (sin kx) #s(hole binary64 (* kx (+ 1 (* (pow kx 2) (- (* (pow kx 2) (+ 1/120 (* -1/5040 (pow kx 2)))) 1/6))))))
#s(approx kx #s(hole binary64 kx))
#s(approx (* (pow (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) -1) 1/2) (sin ky)) #s(hole binary64 1))
#s(approx (* (pow (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) -1) 1/2) (sin ky)) #s(hole binary64 (+ 1 (* -1/2 (/ (pow kx 2) (pow (sin ky) 2))))))
#s(approx (* (pow (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) -1) 1/2) (sin ky)) #s(hole binary64 (+ 1 (* (pow kx 2) (- (* 1/2 (* (pow kx 2) (* (pow (sin ky) 2) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6))))))) (* 1/2 (/ 1 (pow (sin ky) 2))))))))
#s(approx (* (pow (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) -1) 1/2) (sin ky)) #s(hole binary64 (+ 1 (* (pow kx 2) (- (* (pow kx 2) (+ (* -1/2 (* (pow kx 2) (* (pow (sin ky) 2) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))) (pow (sin ky) 2))) (+ (* 2/45 (/ 1 (pow (sin ky) 4))) (+ (* 2/3 (/ 1 (pow (sin ky) 6))) (/ 1 (pow (sin ky) 8)))))))) (* 1/2 (* (pow (sin ky) 2) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))))))) (* 1/2 (/ 1 (pow (sin ky) 2))))))))
#s(approx (pow (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) -1) 1/2) #s(hole binary64 (/ 1 (sin ky))))
#s(approx (pow (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) -1) 1/2) #s(hole binary64 (+ (* -1/2 (/ (pow kx 2) (pow (sin ky) 3))) (/ 1 (sin ky)))))
#s(approx (pow (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) -1) 1/2) #s(hole binary64 (+ (* (pow kx 2) (- (* 1/2 (* (pow kx 2) (* (sin ky) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6))))))) (* 1/2 (/ 1 (pow (sin ky) 3))))) (/ 1 (sin ky)))))
#s(approx (pow (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) -1) 1/2) #s(hole binary64 (+ (* (pow kx 2) (- (* (pow kx 2) (+ (* -1/2 (* (pow kx 2) (* (sin ky) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))) (pow (sin ky) 2))) (+ (* 2/45 (/ 1 (pow (sin ky) 4))) (+ (* 2/3 (/ 1 (pow (sin ky) 6))) (/ 1 (pow (sin ky) 8)))))))) (* 1/2 (* (sin ky) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))))))) (* 1/2 (/ 1 (pow (sin ky) 3))))) (/ 1 (sin ky)))))
#s(approx (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) -1) #s(hole binary64 (/ 1 (pow (sin ky) 2))))
#s(approx (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) -1) #s(hole binary64 (+ (* -1 (/ (pow kx 2) (pow (sin ky) 4))) (/ 1 (pow (sin ky) 2)))))
#s(approx (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) -1) #s(hole binary64 (+ (* (pow kx 2) (- (* (pow kx 2) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (/ 1 (pow (sin ky) 6)))) (/ 1 (pow (sin ky) 4)))) (/ 1 (pow (sin ky) 2)))))
#s(approx (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) -1) #s(hole binary64 (+ (* (pow kx 2) (- (* (pow kx 2) (+ (* -1 (* (pow kx 2) (+ (* 2/45 (/ 1 (pow (sin ky) 4))) (+ (* 2/3 (/ 1 (pow (sin ky) 6))) (/ 1 (pow (sin ky) 8)))))) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (/ 1 (pow (sin ky) 6))))) (/ 1 (pow (sin ky) 4)))) (/ 1 (pow (sin ky) 2)))))
#s(approx (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) #s(hole binary64 (pow (sin ky) 2)))
#s(approx (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) #s(hole binary64 (+ (pow kx 2) (pow (sin ky) 2))))
#s(approx (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) #s(hole binary64 (+ (* (pow kx 2) (+ 1 (* -1/3 (pow kx 2)))) (pow (sin ky) 2))))
#s(approx (+ (* (sin kx) (sin kx)) (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 (* (/ (sin ky) (sqrt (- (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))) (sin th)) #s(hole binary64 (sin th)))
#s(approx (* (/ (sin ky) (sqrt (- (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))) (sin th)) #s(hole binary64 (+ (sin th) (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 2))))))
#s(approx (* (/ (sin ky) (sqrt (- (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))) (sin th)) #s(hole binary64 (+ (sin th) (* (pow kx 2) (+ (* -1/2 (/ (sin th) (pow (sin ky) 2))) (* 1/2 (* (pow kx 2) (* (pow (sin ky) 2) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))))))))))))
#s(approx (* (/ (sin ky) (sqrt (- (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))) (sin th)) #s(hole binary64 (+ (sin th) (* (pow kx 2) (+ (* -1/2 (/ (sin th) (pow (sin ky) 2))) (* (pow kx 2) (+ (* -1/2 (* (pow kx 2) (* (pow (sin ky) 2) (* (sin th) (+ (* -1 (/ (+ (* -2/3 (pow (sin ky) 4)) (pow (sin ky) 2)) (pow (sin ky) 10))) (+ (* -1 (/ (- 1/3 (/ 1 (pow (sin ky) 2))) (pow (sin ky) 6))) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))) (pow (sin ky) 2))) (+ (* 2/45 (/ 1 (pow (sin ky) 4))) (+ (* 1/3 (/ 1 (pow (sin ky) 6))) (/ 1 (pow (sin ky) 8))))))))))) (* 1/2 (* (pow (sin ky) 2) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6))))))))))))))
#s(approx (/ (sin ky) (sqrt (- (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 1))
#s(approx (/ (sin ky) (sqrt (- (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (+ 1 (* -1/2 (/ (pow kx 2) (pow (sin ky) 2))))))
#s(approx (/ (sin ky) (sqrt (- (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (+ 1 (* (pow kx 2) (- (* 1/2 (* (pow kx 2) (* (pow (sin ky) 2) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6))))))) (* 1/2 (/ 1 (pow (sin ky) 2))))))))
#s(approx (/ (sin ky) (sqrt (- (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (+ 1 (* (pow kx 2) (- (* (pow kx 2) (+ (* -1/2 (* (pow kx 2) (* (pow (sin ky) 2) (+ (* -1 (/ (+ (* -2/3 (pow (sin ky) 4)) (pow (sin ky) 2)) (pow (sin ky) 10))) (+ (* -1 (/ (- 1/3 (/ 1 (pow (sin ky) 2))) (pow (sin ky) 6))) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))) (pow (sin ky) 2))) (+ (* 2/45 (/ 1 (pow (sin ky) 4))) (+ (* 1/3 (/ 1 (pow (sin ky) 6))) (/ 1 (pow (sin ky) 8)))))))))) (* 1/2 (* (pow (sin ky) 2) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))))))) (* 1/2 (/ 1 (pow (sin ky) 2))))))))
#s(approx (sqrt (- (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (sin ky)))
#s(approx (sqrt (- (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (+ (sin ky) (* 1/2 (/ (pow kx 2) (sin ky))))))
#s(approx (sqrt (- (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (+ (sin ky) (* (pow kx 2) (+ (* -1/2 (/ (* (pow kx 2) (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2))))) (sin ky))) (* 1/2 (/ 1 (sin ky))))))))
#s(approx (sqrt (- (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (+ (sin ky) (* (pow kx 2) (+ (* (pow kx 2) (+ (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (sin ky))) (* 1/2 (/ (* (pow kx 2) (- (+ 2/45 (+ (* -1 (/ (+ (* -2/3 (pow (sin ky) 4)) (pow (sin ky) 2)) (pow (sin ky) 6))) (* -1 (/ (- 1/3 (/ 1 (pow (sin ky) 2))) (pow (sin ky) 2))))) (+ (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2))) (* 1/3 (/ 1 (pow (sin ky) 2)))))) (sin ky))))) (* 1/2 (/ 1 (sin ky))))))))
#s(approx (- (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (pow (sin ky) 2)))
#s(approx (- (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (- (pow kx 2) (* -1 (pow (sin ky) 2)))))
#s(approx (- (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (- (* (pow kx 2) (+ 1 (* -1/3 (pow kx 2)))) (* -1 (pow (sin ky) 2)))))
#s(approx (- (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (- (* (pow kx 2) (+ 1 (* (pow kx 2) (- (* (pow kx 2) (- (+ 2/45 (+ (* -1 (/ (+ (* -2/3 (pow (sin ky) 4)) (pow (sin ky) 2)) (pow (sin ky) 6))) (* -1 (/ (- 1/3 (/ 1 (pow (sin ky) 2))) (pow (sin ky) 2))))) (* 1/3 (/ 1 (pow (sin ky) 2))))) 1/3)))) (* -1 (pow (sin ky) 2)))))
#s(approx (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (* -1 (/ (pow kx 4) (pow (sin ky) 2)))))
#s(approx (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (* (pow kx 4) (- (* -1 (/ (* (pow kx 2) (+ (* -2/3 (pow (sin ky) 4)) (pow (sin ky) 2))) (pow (sin ky) 6))) (/ 1 (pow (sin ky) 2))))))
#s(approx (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (* (pow kx 4) (- (* (pow kx 2) (+ (* -1 (/ (* (pow kx 2) (+ 1 (+ (* -2/3 (pow (sin ky) 2)) (+ (* -1/3 (pow (sin ky) 2)) (* 1/5 (pow (sin ky) 4)))))) (pow (sin ky) 6))) (* -1 (/ (+ (* -2/3 (pow (sin ky) 4)) (pow (sin ky) 2)) (pow (sin ky) 6))))) (/ 1 (pow (sin ky) 2))))))
#s(approx (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (* (pow kx 4) (- (* (pow kx 2) (+ (* -1 (/ (+ (* -2/3 (pow (sin ky) 4)) (pow (sin ky) 2)) (pow (sin ky) 6))) (* (pow kx 2) (+ (* -1 (/ (+ 1 (+ (* -2/3 (pow (sin ky) 2)) (+ (* -1/3 (pow (sin ky) 2)) (* 1/5 (pow (sin ky) 4))))) (pow (sin ky) 6))) (* (pow kx 2) (- (* -1 (/ (- (+ (* -2/3 (+ 1 (* -1/3 (pow (sin ky) 2)))) (+ (* -34/945 (pow (sin ky) 4)) (+ (* 2/45 (pow (sin ky) 2)) (* 1/5 (pow (sin ky) 2))))) 2/3) (pow (sin ky) 6))) (/ 1 (pow (sin ky) 8)))))))) (/ 1 (pow (sin ky) 2))))))
#s(approx (pow (sin kx) 4) #s(hole binary64 (pow kx 4)))
#s(approx (pow (sin kx) 4) #s(hole binary64 (* (pow kx 4) (+ 1 (* -2/3 (pow kx 2))))))
#s(approx (pow (sin kx) 4) #s(hole binary64 (* (pow kx 4) (+ 1 (* (pow kx 2) (- (* 1/5 (pow kx 2)) 2/3))))))
#s(approx (pow (sin kx) 4) #s(hole binary64 (* (pow kx 4) (+ 1 (* (pow kx 2) (- (* (pow kx 2) (+ 1/5 (* -34/945 (pow kx 2)))) 2/3))))))
#s(approx (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (* -1 (pow (sin ky) 2))))
#s(approx (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (+ (* -1 (pow (sin ky) 2)) (pow kx 2))))
#s(approx (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (+ (* -1 (pow (sin ky) 2)) (* (pow kx 2) (+ 1 (* -1 (* (pow kx 2) (+ (* -1 (/ (+ 1 (* -1/3 (pow (sin ky) 2))) (pow (sin ky) 2))) (/ 1 (pow (sin ky) 2))))))))))
#s(approx (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (+ (* -1 (pow (sin ky) 2)) (* (pow kx 2) (+ 1 (* (pow kx 2) (- (* (pow kx 2) (- (* 1/3 (/ 1 (pow (sin ky) 2))) (+ (* -1 (/ (+ (* -1 (/ (+ 1 (* -1/3 (pow (sin ky) 2))) (pow (sin ky) 2))) (/ 1 (pow (sin ky) 2))) (pow (sin ky) 2))) (* -1 (/ (- (* 2/45 (pow (sin ky) 2)) 2/3) (pow (sin ky) 2)))))) (+ (* -1 (/ (+ 1 (* -1/3 (pow (sin ky) 2))) (pow (sin ky) 2))) (/ 1 (pow (sin ky) 2))))))))))
#s(approx (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) #s(hole binary64 (* -1 (pow (sin ky) 6))))
#s(approx (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) #s(hole binary64 (- (pow kx 6) (pow (sin ky) 6))))
#s(approx (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) #s(hole binary64 (- (* (pow kx 6) (+ 1 (* -1 (pow kx 2)))) (pow (sin ky) 6))))
#s(approx (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) #s(hole binary64 (- (* (pow kx 6) (+ 1 (* (pow kx 2) (- (* 7/15 (pow kx 2)) 1)))) (pow (sin ky) 6))))
#s(approx (pow (pow (sin kx) 2) 3) #s(hole binary64 (pow kx 6)))
#s(approx (pow (pow (sin kx) 2) 3) #s(hole binary64 (* (pow kx 6) (+ 1 (* -1 (pow kx 2))))))
#s(approx (pow (pow (sin kx) 2) 3) #s(hole binary64 (* (pow kx 6) (+ 1 (* (pow kx 2) (- (* 7/15 (pow kx 2)) 1))))))
#s(approx (pow (pow (sin kx) 2) 3) #s(hole binary64 (* (pow kx 6) (+ 1 (* (pow kx 2) (- (* (pow kx 2) (+ 7/15 (* -128/945 (pow kx 2)))) 1))))))
#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 (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (pow (sin ky) 4)))
#s(approx (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ (* (pow kx 2) (pow (sin ky) 2)) (pow (sin ky) 4))))
#s(approx (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ (* (pow kx 2) (+ (* (pow kx 2) (+ 1 (* -1/3 (pow (sin ky) 2)))) (pow (sin ky) 2))) (pow (sin ky) 4))))
#s(approx (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ (* (pow kx 2) (+ (* (pow kx 2) (+ 1 (+ (* -1/3 (pow (sin ky) 2)) (* (pow kx 2) (- (* 2/45 (pow (sin ky) 2)) 2/3))))) (pow (sin ky) 2))) (pow (sin ky) 4))))
#s(approx (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (pow (sin ky) 4)))
#s(approx (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (* (pow kx 2) (pow (sin ky) 2)) (pow (sin ky) 4))))
#s(approx (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (* (pow kx 2) (+ (* -1/3 (* (pow kx 2) (pow (sin ky) 2))) (pow (sin ky) 2))) (pow (sin ky) 4))))
#s(approx (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (* (pow kx 2) (+ (* (pow kx 2) (+ (* -1/3 (pow (sin ky) 2)) (* 2/45 (* (pow kx 2) (pow (sin ky) 2))))) (pow (sin ky) 2))) (pow (sin ky) 4))))
#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/3 (* (pow kx 2) (pow (sin ky) 2))) (pow (sin ky) 2)))))
#s(approx (* (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (* (pow kx 2) (+ (* (pow kx 2) (+ (* -1/3 (pow (sin ky) 2)) (* 2/45 (* (pow kx 2) (pow (sin ky) 2))))) (pow (sin ky) 2)))))
#s(approx (* (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (* (pow kx 2) (+ (* (pow kx 2) (+ (* -1/3 (pow (sin ky) 2)) (* (pow kx 2) (+ (* -1/315 (* (pow kx 2) (pow (sin ky) 2))) (* 2/45 (pow (sin ky) 2)))))) (pow (sin ky) 2)))))
#s(approx (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (* -1 (pow (sin ky) 2))))
#s(approx (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (* -1 (pow kx 2)) (* -1 (pow (sin ky) 2)))))
#s(approx (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (* -1 (pow (sin ky) 2)) (* (pow kx 2) (- (* (pow kx 2) (- 1/3 (/ 1 (pow (sin ky) 2)))) 1)))))
#s(approx (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (* -1 (pow (sin ky) 2)) (* (pow kx 2) (- (* (pow kx 2) (- (+ 1/3 (* (pow kx 2) (- (* 1/3 (/ 1 (pow (sin ky) 2))) (+ 2/45 (* -1 (/ (- 1/3 (/ 1 (pow (sin ky) 2))) (pow (sin ky) 2))))))) (/ 1 (pow (sin ky) 2)))) 1)))))
#s(approx (- (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (* -1 (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 (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (* (* (sin ky) (sin th)) (sqrt (/ 1 (+ (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 (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
#s(approx (* (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2) (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2)) (sin ky)) #s(hole binary64 (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
#s(approx (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2) (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2)) #s(hole binary64 (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))
#s(approx (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2) #s(hole binary64 (pow (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))) 1/4)))
#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 (* (pow (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) -1) 1/2) (sin ky)) #s(hole binary64 (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
#s(approx (pow (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) -1) 1/2) #s(hole binary64 (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))
#s(approx (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) -1) #s(hole binary64 (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
#s(approx (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) #s(hole binary64 (+ (pow (sin kx) 2) (pow (sin ky) 2))))
#s(approx (* (/ (sin ky) (sqrt (- (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))) (sin th)) #s(hole binary64 (* (* (sin ky) (sin th)) (sqrt (/ 1 (- (/ (* (pow (sin kx) 4) (+ (* (pow (sin kx) 2) (pow (sin ky) 2)) (+ (pow (sin kx) 4) (pow (sin ky) 4)))) (- (pow (sin kx) 6) (pow (sin ky) 6))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))))))
#s(approx (/ (sin ky) (sqrt (- (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (* (sin ky) (sqrt (/ 1 (- (/ (* (pow (sin kx) 4) (+ (* (pow (sin kx) 2) (pow (sin ky) 2)) (+ (pow (sin kx) 4) (pow (sin ky) 4)))) (- (pow (sin kx) 6) (pow (sin ky) 6))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))))))
#s(approx (sqrt (- (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (sqrt (- (/ (* (pow (sin kx) 4) (+ (* (pow (sin kx) 2) (pow (sin ky) 2)) (+ (pow (sin kx) 4) (pow (sin ky) 4)))) (- (pow (sin kx) 6) (pow (sin ky) 6))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))))
#s(approx (- (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (- (/ (* (pow (sin kx) 4) (+ (* (pow (sin kx) 2) (pow (sin ky) 2)) (+ (pow (sin kx) 4) (pow (sin ky) 4)))) (- (pow (sin kx) 6) (pow (sin ky) 6))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))))))
#s(approx (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (/ (* (pow (sin kx) 4) (+ (* (pow (sin kx) 2) (pow (sin ky) 2)) (+ (pow (sin kx) 4) (pow (sin ky) 4)))) (- (pow (sin kx) 6) (pow (sin ky) 6)))))
#s(approx (pow (sin kx) 4) #s(hole binary64 (pow (sin kx) 4)))
#s(approx (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (/ (- (pow (sin kx) 6) (pow (sin ky) 6)) (+ (* (pow (sin kx) 2) (pow (sin ky) 2)) (+ (pow (sin kx) 4) (pow (sin ky) 4))))))
#s(approx (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) #s(hole binary64 (- (pow (sin kx) 6) (pow (sin ky) 6))))
#s(approx (pow (pow (sin kx) 2) 3) #s(hole binary64 (pow (sin kx) 6)))
#s(approx (pow (sin kx) 2) #s(hole binary64 (pow (sin kx) 2)))
#s(approx (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ (* (pow (sin kx) 2) (pow (sin ky) 2)) (+ (pow (sin kx) 4) (pow (sin ky) 4)))))
#s(approx (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (* (pow (sin kx) 2) (pow (sin ky) 2)) (pow (sin ky) 4))))
#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 ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (/ (pow (sin ky) 4) (- (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 (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (/ (* ky (sin th)) (sin kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (* ky (+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx))))) (/ (sin th) (sin kx))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (* ky (+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (* (pow ky 2) (+ (* 1/120 (/ (sin th) (sin kx))) (+ (* 1/12 (/ (sin th) (pow (sin kx) 3))) (* 1/2 (* (sin kx) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))))))))) (/ (sin th) (sin kx))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (* ky (+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (* (pow ky 2) (+ (* 1/120 (/ (sin th) (sin kx))) (+ (* 1/12 (/ (sin th) (pow (sin kx) 3))) (+ (* 1/2 (* (sin kx) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))) (* (pow ky 2) (+ (* -1/2 (* (sin kx) (* (sin th) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))) (pow (sin kx) 2))) (+ (* 2/45 (/ 1 (pow (sin kx) 4))) (+ (* 2/3 (/ 1 (pow (sin kx) 6))) (/ 1 (pow (sin kx) 8)))))))) (+ (* -1/12 (* (sin kx) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))) (+ (* -1/240 (/ (sin th) (pow (sin kx) 3))) (* -1/5040 (/ (sin th) (sin kx)))))))))))))) (/ (sin th) (sin kx))))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (/ ky (sin kx))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (* ky (+ (* -1 (* (pow ky 2) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx))))))
#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 (sin kx))) (+ (* 1/2 (* (sin kx) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))))) (* 1/12 (/ 1 (pow (sin kx) 3)))))) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx))))))
#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 (sin kx))) (+ (* 1/12 (/ 1 (pow (sin kx) 3))) (+ (* 1/2 (* (sin kx) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))))) (* (pow ky 2) (- (+ (* -1/2 (* (sin kx) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))) (pow (sin kx) 2))) (+ (* 2/45 (/ 1 (pow (sin kx) 4))) (+ (* 2/3 (/ 1 (pow (sin kx) 6))) (/ 1 (pow (sin kx) 8))))))) (* -1/12 (* (sin kx) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))) (+ (* 1/5040 (/ 1 (sin kx))) (* 1/240 (/ 1 (pow (sin kx) 3)))))))))) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx))))))
#s(approx (* (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2) (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2)) (sin ky)) #s(hole binary64 (/ ky (sin kx))))
#s(approx (* (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2) (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2)) (sin ky)) #s(hole binary64 (* ky (+ (* -1 (* (pow ky 2) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx))))))
#s(approx (* (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2) (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2)) (sin ky)) #s(hole binary64 (* ky (+ (* (pow ky 2) (- (* (pow ky 2) (+ (* 1/120 (/ 1 (sin kx))) (+ (* 1/2 (* (sin kx) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))))) (* 1/12 (/ 1 (pow (sin kx) 3)))))) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx))))))
#s(approx (* (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2) (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2)) (sin ky)) #s(hole binary64 (* ky (+ (* (pow ky 2) (- (* (pow ky 2) (+ (* 1/120 (/ 1 (sin kx))) (+ (* 1/12 (/ 1 (pow (sin kx) 3))) (+ (* 1/2 (* (sin kx) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))))) (* (pow ky 2) (- (+ (* -1/2 (* (sin kx) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))) (pow (sin kx) 2))) (+ (* 2/45 (/ 1 (pow (sin kx) 4))) (+ (* 2/3 (/ 1 (pow (sin kx) 6))) (/ 1 (pow (sin kx) 8))))))) (* -1/12 (* (sin kx) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))) (+ (* 1/5040 (/ 1 (sin kx))) (* 1/240 (/ 1 (pow (sin kx) 3)))))))))) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx))))))
#s(approx (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2) (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2)) #s(hole binary64 (/ 1 (sin kx))))
#s(approx (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2) (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2)) #s(hole binary64 (+ (* -1/2 (/ (pow ky 2) (pow (sin kx) 3))) (/ 1 (sin kx)))))
#s(approx (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2) (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2)) #s(hole binary64 (+ (* (pow ky 2) (- (* 1/2 (* (pow ky 2) (* (sin kx) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))) (* 1/2 (/ 1 (pow (sin kx) 3))))) (/ 1 (sin kx)))))
#s(approx (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2) (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2)) #s(hole binary64 (+ (* (pow ky 2) (- (* (pow ky 2) (+ (* -1/2 (* (pow ky 2) (* (sin kx) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))) (pow (sin kx) 2))) (+ (* 2/45 (/ 1 (pow (sin kx) 4))) (+ (* 2/3 (/ 1 (pow (sin kx) 6))) (/ 1 (pow (sin kx) 8)))))))) (* 1/2 (* (sin kx) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))))))) (* 1/2 (/ 1 (pow (sin kx) 3))))) (/ 1 (sin kx)))))
#s(approx (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2) #s(hole binary64 (* (pow 1 1/4) (sqrt (/ 1 (sin kx))))))
#s(approx (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2) #s(hole binary64 (+ (* -1/4 (* (pow 1 1/4) (* (pow ky 2) (sqrt (/ 1 (pow (sin kx) 5)))))) (* (pow 1 1/4) (sqrt (/ 1 (sin kx)))))))
#s(approx (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2) #s(hole binary64 (+ (* (pow 1 1/4) (sqrt (/ 1 (sin kx)))) (* (pow ky 2) (+ (* -1/4 (* (pow 1 1/4) (sqrt (/ 1 (pow (sin kx) 5))))) (* (pow 1 1/4) (* (* (pow ky 2) (+ (* 1/96 (- (* 24 (* (pow (sin kx) 2) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (/ 1 (pow (sin kx) 6))))) (* 12 (/ 1 (pow (sin kx) 4))))) (* 1/32 (/ 1 (pow (sin kx) 4))))) (sqrt (/ 1 (sin kx))))))))))
#s(approx (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2) #s(hole binary64 (+ (* (pow 1 1/4) (sqrt (/ 1 (sin kx)))) (* (pow ky 2) (+ (* -1/4 (* (pow 1 1/4) (sqrt (/ 1 (pow (sin kx) 5))))) (* (pow ky 2) (+ (* (pow 1 1/4) (* (sqrt (/ 1 (sin kx))) (+ (* 1/96 (- (* 24 (* (pow (sin kx) 2) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (/ 1 (pow (sin kx) 6))))) (* 12 (/ 1 (pow (sin kx) 4))))) (* 1/32 (/ 1 (pow (sin kx) 4)))))) (* (pow 1 1/4) (* (* (pow ky 2) (- (+ (* -1/384 (/ (- (* 24 (* (pow (sin kx) 2) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (/ 1 (pow (sin kx) 6))))) (* 12 (/ 1 (pow (sin kx) 4)))) (pow (sin kx) 2))) (* 1/2880 (- (+ (* -720 (* (pow (sin kx) 2) (+ (* 2/3 (/ 1 (pow (sin kx) 6))) (+ (* 2/45 (/ 1 (pow (sin kx) 4))) (/ 1 (pow (sin kx) 8)))))) (* 720 (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (/ 1 (pow (sin kx) 6))))) (* 240 (/ 1 (pow (sin kx) 6)))))) (* 1/384 (/ 1 (pow (sin kx) 6))))) (sqrt (/ 1 (sin kx))))))))))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) #s(hole binary64 (sin kx)))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) #s(hole binary64 (+ (sin kx) (* 1/2 (/ (pow ky 2) (sin kx))))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) #s(hole binary64 (+ (sin kx) (* (pow ky 2) (+ (* -1/2 (/ (* (pow ky 2) (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2))))) (sin kx))) (* 1/2 (/ 1 (sin kx))))))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) #s(hole binary64 (+ (sin kx) (* (pow ky 2) (+ (* (pow ky 2) (+ (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (sin kx))) (* 1/2 (/ (* (pow ky 2) (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))))) (sin kx))))) (* 1/2 (/ 1 (sin kx))))))))
#s(approx (sin ky) #s(hole binary64 ky))
#s(approx (sin ky) #s(hole binary64 (* ky (+ 1 (* -1/6 (pow ky 2))))))
#s(approx (sin ky) #s(hole binary64 (* ky (+ 1 (* (pow ky 2) (- (* 1/120 (pow ky 2)) 1/6))))))
#s(approx (sin ky) #s(hole binary64 (* ky (+ 1 (* (pow ky 2) (- (* (pow ky 2) (+ 1/120 (* -1/5040 (pow ky 2)))) 1/6))))))
#s(approx ky #s(hole binary64 ky))
#s(approx (* (pow (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) -1) 1/2) (sin ky)) #s(hole binary64 (/ ky (sin kx))))
#s(approx (* (pow (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) -1) 1/2) (sin ky)) #s(hole binary64 (* ky (+ (* -1 (* (pow ky 2) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx))))))
#s(approx (* (pow (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) -1) 1/2) (sin ky)) #s(hole binary64 (* ky (+ (* (pow ky 2) (- (* (pow ky 2) (+ (* 1/120 (/ 1 (sin kx))) (+ (* 1/2 (* (sin kx) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))))) (* 1/12 (/ 1 (pow (sin kx) 3)))))) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx))))))
#s(approx (* (pow (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) -1) 1/2) (sin ky)) #s(hole binary64 (* ky (+ (* (pow ky 2) (- (* (pow ky 2) (+ (* 1/120 (/ 1 (sin kx))) (+ (* 1/12 (/ 1 (pow (sin kx) 3))) (+ (* 1/2 (* (sin kx) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))))) (* (pow ky 2) (- (+ (* -1/2 (* (sin kx) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))) (pow (sin kx) 2))) (+ (* 2/45 (/ 1 (pow (sin kx) 4))) (+ (* 2/3 (/ 1 (pow (sin kx) 6))) (/ 1 (pow (sin kx) 8))))))) (* -1/12 (* (sin kx) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))) (+ (* 1/5040 (/ 1 (sin kx))) (* 1/240 (/ 1 (pow (sin kx) 3)))))))))) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx))))))
#s(approx (pow (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) -1) 1/2) #s(hole binary64 (/ 1 (sin kx))))
#s(approx (pow (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) -1) 1/2) #s(hole binary64 (+ (* -1/2 (/ (pow ky 2) (pow (sin kx) 3))) (/ 1 (sin kx)))))
#s(approx (pow (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) -1) 1/2) #s(hole binary64 (+ (* (pow ky 2) (- (* 1/2 (* (pow ky 2) (* (sin kx) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))) (* 1/2 (/ 1 (pow (sin kx) 3))))) (/ 1 (sin kx)))))
#s(approx (pow (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) -1) 1/2) #s(hole binary64 (+ (* (pow ky 2) (- (* (pow ky 2) (+ (* -1/2 (* (pow ky 2) (* (sin kx) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))) (pow (sin kx) 2))) (+ (* 2/45 (/ 1 (pow (sin kx) 4))) (+ (* 2/3 (/ 1 (pow (sin kx) 6))) (/ 1 (pow (sin kx) 8)))))))) (* 1/2 (* (sin kx) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))))))) (* 1/2 (/ 1 (pow (sin kx) 3))))) (/ 1 (sin kx)))))
#s(approx (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) -1) #s(hole binary64 (/ 1 (pow (sin kx) 2))))
#s(approx (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) -1) #s(hole binary64 (+ (* -1 (/ (pow ky 2) (pow (sin kx) 4))) (/ 1 (pow (sin kx) 2)))))
#s(approx (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) -1) #s(hole binary64 (+ (* (pow ky 2) (- (* (pow ky 2) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (/ 1 (pow (sin kx) 6)))) (/ 1 (pow (sin kx) 4)))) (/ 1 (pow (sin kx) 2)))))
#s(approx (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) -1) #s(hole binary64 (+ (* (pow ky 2) (- (* (pow ky 2) (+ (* -1 (* (pow ky 2) (+ (* 2/45 (/ 1 (pow (sin kx) 4))) (+ (* 2/3 (/ 1 (pow (sin kx) 6))) (/ 1 (pow (sin kx) 8)))))) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (/ 1 (pow (sin kx) 6))))) (/ 1 (pow (sin kx) 4)))) (/ 1 (pow (sin kx) 2)))))
#s(approx (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) #s(hole binary64 (pow (sin kx) 2)))
#s(approx (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) #s(hole binary64 (+ (pow ky 2) (pow (sin kx) 2))))
#s(approx (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) #s(hole binary64 (+ (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2)))) (pow (sin kx) 2))))
#s(approx (+ (* (sin kx) (sin kx)) (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) (sqrt (- (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))) (sin th)) #s(hole binary64 (/ (* ky (sin th)) (sin kx))))
#s(approx (* (/ (sin ky) (sqrt (- (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))) (sin th)) #s(hole binary64 (* ky (+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (* -1/6 (/ (sin th) (sin kx))))) (/ (sin th) (sin kx))))))
#s(approx (* (/ (sin ky) (sqrt (- (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))) (sin th)) #s(hole binary64 (* ky (+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (* (pow ky 2) (+ (* 1/120 (/ (sin th) (sin kx))) (+ (* 1/12 (/ (sin th) (pow (sin kx) 3))) (* 1/2 (* (sin kx) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))))))))) (/ (sin th) (sin kx))))))
#s(approx (* (/ (sin ky) (sqrt (- (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))) (sin th)) #s(hole binary64 (* ky (+ (* (pow ky 2) (+ (* -1/2 (/ (sin th) (pow (sin kx) 3))) (+ (* -1/6 (/ (sin th) (sin kx))) (* (pow ky 2) (+ (* 1/120 (/ (sin th) (sin kx))) (+ (* 1/12 (/ (sin th) (pow (sin kx) 3))) (+ (* 1/2 (* (sin kx) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))) (* (pow ky 2) (+ (* -1/2 (* (sin kx) (* (sin th) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))) (pow (sin kx) 2))) (+ (* 2/45 (/ 1 (pow (sin kx) 4))) (+ (* 2/3 (/ 1 (pow (sin kx) 6))) (/ 1 (pow (sin kx) 8)))))))) (+ (* -1/12 (* (sin kx) (* (sin th) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))) (+ (* -1/240 (/ (sin th) (pow (sin kx) 3))) (* -1/5040 (/ (sin th) (sin kx)))))))))))))) (/ (sin th) (sin kx))))))
#s(approx (/ (sin ky) (sqrt (- (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (/ ky (sin kx))))
#s(approx (/ (sin ky) (sqrt (- (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (* ky (+ (* -1 (* (pow ky 2) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx))))))
#s(approx (/ (sin ky) (sqrt (- (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (* ky (+ (* (pow ky 2) (- (* (pow ky 2) (+ (* 1/120 (/ 1 (sin kx))) (+ (* 1/2 (* (sin kx) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))))) (* 1/12 (/ 1 (pow (sin kx) 3)))))) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx))))))
#s(approx (/ (sin ky) (sqrt (- (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (* ky (+ (* (pow ky 2) (- (* (pow ky 2) (+ (* 1/120 (/ 1 (sin kx))) (+ (* 1/12 (/ 1 (pow (sin kx) 3))) (+ (* 1/2 (* (sin kx) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))))) (* (pow ky 2) (- (+ (* -1/2 (* (sin kx) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))) (pow (sin kx) 2))) (+ (* 2/45 (/ 1 (pow (sin kx) 4))) (+ (* 2/3 (/ 1 (pow (sin kx) 6))) (/ 1 (pow (sin kx) 8))))))) (* -1/12 (* (sin kx) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))) (+ (* 1/5040 (/ 1 (sin kx))) (* 1/240 (/ 1 (pow (sin kx) 3)))))))))) (+ (* 1/6 (/ 1 (sin kx))) (* 1/2 (/ 1 (pow (sin kx) 3)))))) (/ 1 (sin kx))))))
#s(approx (sqrt (- (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (sin kx)))
#s(approx (sqrt (- (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (+ (sin kx) (* 1/2 (/ (pow ky 2) (sin kx))))))
#s(approx (sqrt (- (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (+ (sin kx) (* (pow ky 2) (+ (* -1/2 (/ (* (pow ky 2) (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2))))) (sin kx))) (* 1/2 (/ 1 (sin kx))))))))
#s(approx (sqrt (- (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (+ (sin kx) (* (pow ky 2) (+ (* (pow ky 2) (+ (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (sin kx))) (* 1/2 (/ (* (pow ky 2) (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))))) (sin kx))))) (* 1/2 (/ 1 (sin kx))))))))
#s(approx (- (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (pow (sin kx) 2)))
#s(approx (- (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ (pow ky 2) (pow (sin kx) 2))))
#s(approx (- (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (/ (pow (sin ky) 4) (- (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) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (/ (pow (sin ky) 4) (- (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 kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (pow (sin kx) 2)))
#s(approx (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (+ (pow ky 2) (pow (sin kx) 2))))
#s(approx (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (+ (* (pow ky 2) (+ 1 (* (pow ky 2) (- (/ 1 (pow (sin kx) 2)) 1/3)))) (pow (sin kx) 2))))
#s(approx (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (+ (* (pow ky 2) (+ 1 (* (pow ky 2) (- (+ (* (pow ky 2) (- (+ 2/45 (/ 1 (pow (sin kx) 4))) (* 2/3 (/ 1 (pow (sin kx) 2))))) (/ 1 (pow (sin kx) 2))) 1/3)))) (pow (sin kx) 2))))
#s(approx (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (pow (sin kx) 2)))
#s(approx (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (+ (* -1 (pow ky 2)) (pow (sin kx) 2))))
#s(approx (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (+ (* (pow ky 2) (- (* 1/3 (pow ky 2)) 1)) (pow (sin kx) 2))))
#s(approx (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (+ (* (pow ky 2) (- (* (pow ky 2) (+ 1/3 (* (pow ky 2) (- (* 1/3 (/ 1 (pow (sin kx) 2))) (+ 2/45 (+ (* -1 (/ (+ 1 (* -1/3 (pow (sin kx) 2))) (pow (sin kx) 4))) (/ 1 (pow (sin kx) 4)))))))) 1)) (pow (sin kx) 2))))
#s(approx (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) #s(hole binary64 (pow (sin kx) 6)))
#s(approx (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) #s(hole binary64 (+ (* -1 (pow ky 6)) (pow (sin kx) 6))))
#s(approx (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) #s(hole binary64 (+ (* (pow ky 6) (- (pow ky 2) 1)) (pow (sin kx) 6))))
#s(approx (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) #s(hole binary64 (+ (* (pow ky 6) (- (* (pow ky 2) (+ 1 (* -7/15 (pow ky 2)))) 1)) (pow (sin kx) 6))))
#s(approx (pow (pow (sin ky) 2) 3) #s(hole binary64 (pow ky 6)))
#s(approx (pow (pow (sin ky) 2) 3) #s(hole binary64 (* (pow ky 6) (+ 1 (* -1 (pow ky 2))))))
#s(approx (pow (pow (sin ky) 2) 3) #s(hole binary64 (* (pow ky 6) (+ 1 (* (pow ky 2) (- (* 7/15 (pow ky 2)) 1))))))
#s(approx (pow (pow (sin ky) 2) 3) #s(hole binary64 (* (pow ky 6) (+ 1 (* (pow ky 2) (- (* (pow ky 2) (+ 7/15 (* -128/945 (pow ky 2)))) 1))))))
#s(approx (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (pow (sin kx) 4)))
#s(approx (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ (* (pow ky 2) (pow (sin kx) 2)) (pow (sin kx) 4))))
#s(approx (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ (* (pow ky 2) (+ (* (pow ky 2) (+ 1 (* -1/3 (pow (sin kx) 2)))) (pow (sin kx) 2))) (pow (sin kx) 4))))
#s(approx (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ (* (pow ky 2) (+ (* (pow ky 2) (+ 1 (+ (* -1/3 (pow (sin kx) 2)) (* (pow ky 2) (- (* 2/45 (pow (sin kx) 2)) 2/3))))) (pow (sin kx) 2))) (pow (sin kx) 4))))
#s(approx (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (* (pow ky 2) (pow (sin kx) 2))))
#s(approx (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (* (pow ky 2) (+ (* (pow ky 2) (+ 1 (* -1/3 (pow (sin kx) 2)))) (pow (sin kx) 2)))))
#s(approx (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (* (pow ky 2) (+ (* (pow ky 2) (+ 1 (+ (* -1/3 (pow (sin kx) 2)) (* (pow ky 2) (- (* 2/45 (pow (sin kx) 2)) 2/3))))) (pow (sin kx) 2)))))
#s(approx (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (* (pow ky 2) (+ (* (pow ky 2) (+ 1 (+ (* -1/3 (pow (sin kx) 2)) (* (pow ky 2) (- (+ (* 2/45 (pow (sin kx) 2)) (* (pow ky 2) (+ 1/5 (* -1/315 (pow (sin kx) 2))))) 2/3))))) (pow (sin kx) 2)))))
#s(approx (pow (sin ky) 4) #s(hole binary64 (pow ky 4)))
#s(approx (pow (sin ky) 4) #s(hole binary64 (* (pow ky 4) (+ 1 (* -2/3 (pow ky 2))))))
#s(approx (pow (sin ky) 4) #s(hole binary64 (* (pow ky 4) (+ 1 (* (pow ky 2) (- (* 1/5 (pow ky 2)) 2/3))))))
#s(approx (pow (sin ky) 4) #s(hole binary64 (* (pow ky 4) (+ 1 (* (pow ky 2) (- (* (pow ky 2) (+ 1/5 (* -34/945 (pow ky 2)))) 2/3))))))
#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/3 (* (pow ky 2) (pow (sin kx) 2))) (pow (sin kx) 2)))))
#s(approx (* (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (* (pow ky 2) (+ (* (pow ky 2) (+ (* -1/3 (pow (sin kx) 2)) (* 2/45 (* (pow ky 2) (pow (sin kx) 2))))) (pow (sin kx) 2)))))
#s(approx (* (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (* (pow ky 2) (+ (* (pow ky 2) (+ (* -1/3 (pow (sin kx) 2)) (* (pow ky 2) (+ (* -1/315 (* (pow ky 2) (pow (sin kx) 2))) (* 2/45 (pow (sin kx) 2)))))) (pow (sin kx) 2)))))
#s(approx (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (/ (pow ky 4) (pow (sin kx) 2))))
#s(approx (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (* (pow ky 4) (+ (* (pow ky 2) (- (/ 1 (pow (sin kx) 4)) (* 2/3 (/ 1 (pow (sin kx) 2))))) (/ 1 (pow (sin kx) 2))))))
#s(approx (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (* (pow ky 4) (+ (* (pow ky 2) (- (+ (* (pow ky 2) (- (* 1/5 (/ 1 (pow (sin kx) 2))) (+ (* -1 (/ (- (/ 1 (pow (sin kx) 4)) (* 2/3 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))) (* 1/3 (/ 1 (pow (sin kx) 4)))))) (/ 1 (pow (sin kx) 4))) (* 2/3 (/ 1 (pow (sin kx) 2))))) (/ 1 (pow (sin kx) 2))))))
#s(approx (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (* (pow ky 4) (+ (* (pow ky 2) (- (+ (* (pow ky 2) (- (+ (* 1/5 (/ 1 (pow (sin kx) 2))) (* (pow ky 2) (- (* 2/45 (/ 1 (pow (sin kx) 4))) (+ (* -1 (/ (- (* 1/5 (/ 1 (pow (sin kx) 2))) (+ (* -1 (/ (- (/ 1 (pow (sin kx) 4)) (* 2/3 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))) (* 1/3 (/ 1 (pow (sin kx) 4))))) (pow (sin kx) 2))) (+ (* 34/945 (/ 1 (pow (sin kx) 2))) (* 1/3 (/ (- (/ 1 (pow (sin kx) 4)) (* 2/3 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2)))))))) (+ (* -1 (/ (- (/ 1 (pow (sin kx) 4)) (* 2/3 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))) (* 1/3 (/ 1 (pow (sin kx) 4)))))) (/ 1 (pow (sin kx) 4))) (* 2/3 (/ 1 (pow (sin kx) 2))))) (/ 1 (pow (sin kx) 2))))))
#s(approx (- (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (pow (sin kx) 2)))
#s(approx (- (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (* -1 (pow ky 2)) (pow (sin kx) 2))))
#s(approx (- (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (* (pow ky 2) (- (* 1/3 (pow ky 2)) 1)) (pow (sin kx) 2))))
#s(approx (- (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (* (pow ky 2) (- (* (pow ky 2) (+ 1/3 (* -2/45 (pow ky 2)))) 1)) (pow (sin kx) 2))))
#s(approx (sin ky) #s(hole binary64 (sin ky)))
#s(approx (pow (sin ky) 2) #s(hole binary64 (pow (sin ky) 2)))
#s(approx (pow (pow (sin ky) 2) 3) #s(hole binary64 (pow (sin ky) 6)))
#s(approx (pow (sin ky) 4) #s(hole binary64 (pow (sin ky) 4)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (* (* th (sin ky)) (sqrt (/ 1 (+ (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 (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* (sin ky) (sqrt (/ 1 (+ (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 (+ (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* (pow th 2) (+ (* -1/6 (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* 1/120 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ (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 (+ (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* (pow th 2) (+ (* -1/6 (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* (pow th 2) (+ (* -1/5040 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* 1/120 (* (sin ky) (sqrt (/ 1 (+ (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 th #s(hole binary64 th))
#s(approx (* (/ (sin ky) (sqrt (- (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))) (sin th)) #s(hole binary64 (* (* th (sin ky)) (sqrt (/ 1 (- (/ (* (pow (sin kx) 4) (+ (* (pow (sin kx) 2) (pow (sin ky) 2)) (+ (pow (sin kx) 4) (pow (sin ky) 4)))) (- (pow (sin kx) 6) (pow (sin ky) 6))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))))))
#s(approx (* (/ (sin ky) (sqrt (- (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))) (sin th)) #s(hole binary64 (* th (+ (* -1/6 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (- (/ (* (pow (sin kx) 4) (+ (* (pow (sin kx) 2) (pow (sin ky) 2)) (+ (pow (sin kx) 4) (pow (sin ky) 4)))) (- (pow (sin kx) 6) (pow (sin ky) 6))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))))) (* (sin ky) (sqrt (/ 1 (- (/ (* (pow (sin kx) 4) (+ (* (pow (sin kx) 2) (pow (sin ky) 2)) (+ (pow (sin kx) 4) (pow (sin ky) 4)))) (- (pow (sin kx) 6) (pow (sin ky) 6))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))))))))
#s(approx (* (/ (sin ky) (sqrt (- (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))) (sin th)) #s(hole binary64 (* th (+ (* (sin ky) (sqrt (/ 1 (- (/ (* (pow (sin kx) 4) (+ (* (pow (sin kx) 2) (pow (sin ky) 2)) (+ (pow (sin kx) 4) (pow (sin ky) 4)))) (- (pow (sin kx) 6) (pow (sin ky) 6))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))))))) (* (pow th 2) (+ (* -1/6 (* (sin ky) (sqrt (/ 1 (- (/ (* (pow (sin kx) 4) (+ (* (pow (sin kx) 2) (pow (sin ky) 2)) (+ (pow (sin kx) 4) (pow (sin ky) 4)))) (- (pow (sin kx) 6) (pow (sin ky) 6))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))))) (* 1/120 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (- (/ (* (pow (sin kx) 4) (+ (* (pow (sin kx) 2) (pow (sin ky) 2)) (+ (pow (sin kx) 4) (pow (sin ky) 4)))) (- (pow (sin kx) 6) (pow (sin ky) 6))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))))))))))))))
#s(approx (* (/ (sin ky) (sqrt (- (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))) (sin th)) #s(hole binary64 (* th (+ (* (sin ky) (sqrt (/ 1 (- (/ (* (pow (sin kx) 4) (+ (* (pow (sin kx) 2) (pow (sin ky) 2)) (+ (pow (sin kx) 4) (pow (sin ky) 4)))) (- (pow (sin kx) 6) (pow (sin ky) 6))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))))))) (* (pow th 2) (+ (* -1/6 (* (sin ky) (sqrt (/ 1 (- (/ (* (pow (sin kx) 4) (+ (* (pow (sin kx) 2) (pow (sin ky) 2)) (+ (pow (sin kx) 4) (pow (sin ky) 4)))) (- (pow (sin kx) 6) (pow (sin ky) 6))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))))) (* (pow th 2) (+ (* -1/5040 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (- (/ (* (pow (sin kx) 4) (+ (* (pow (sin kx) 2) (pow (sin ky) 2)) (+ (pow (sin kx) 4) (pow (sin ky) 4)))) (- (pow (sin kx) 6) (pow (sin ky) 6))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))))) (* 1/120 (* (sin ky) (sqrt (/ 1 (- (/ (* (pow (sin kx) 4) (+ (* (pow (sin kx) 2) (pow (sin ky) 2)) (+ (pow (sin kx) 4) (pow (sin ky) 4)))) (- (pow (sin kx) 6) (pow (sin ky) 6))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))))))))))))))))
#s(approx (sin th) #s(hole binary64 (sin th)))
Outputs
(*.f64 (sin.f64 th) #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (*.f64 (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)) (sin.f64 ky))))
(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (*.f64 (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)) (sin.f64 ky))) (sin.f64 th))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (*.f64 (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)) (sin.f64 ky)))
(*.f64 (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)) (sin.f64 ky))
(*.f64 (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1/2 binary64)) (*.f64 (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1/2 binary64)) (sin.f64 ky)))
(*.f64 (sin.f64 ky) (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)))
(*.f64 (neg.f64 (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1/2 binary64))) (neg.f64 (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1/2 binary64))))
(*.f64 (fabs.f64 (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1/2 binary64))) (fabs.f64 (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1/2 binary64))))
(*.f64 (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1/2 binary64)) (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1/2 binary64)))
(pow.f64 (*.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) #s(literal -1/2 binary64))
(pow.f64 (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1/2 binary64)) #s(literal 2 binary64))
(pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64))
(*.f64 (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1/4 binary64)) (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1/4 binary64)))
(pow.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal -1/4 binary64))
(pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1/2 binary64))
(exp.f64 (*.f64 (log.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky))) #s(literal -1/2 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky))) #s(literal -1/2 binary64))) (sinh.f64 (*.f64 (log.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky))) #s(literal -1/2 binary64))))
(pow.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 1/2 binary64))
(sqrt.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
(hypot.f64 (pow.f64 (sin.f64 ky) #s(literal 1 binary64)) (pow.f64 (sin.f64 kx) #s(literal 1 binary64)))
(hypot.f64 (pow.f64 (sin.f64 ky) #s(literal 1 binary64)) (neg.f64 (sin.f64 kx)))
(hypot.f64 (pow.f64 (sin.f64 ky) #s(literal 1 binary64)) (fabs.f64 (sin.f64 kx)))
(hypot.f64 (pow.f64 (sin.f64 ky) #s(literal 1 binary64)) (sin.f64 kx))
(hypot.f64 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) (pow.f64 (sin.f64 ky) #s(literal 1 binary64)))
(hypot.f64 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) (neg.f64 (sin.f64 ky)))
(hypot.f64 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) (fabs.f64 (sin.f64 ky)))
(hypot.f64 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) (sin.f64 ky))
(hypot.f64 (neg.f64 (sin.f64 ky)) (pow.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 (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)) (fabs.f64 (sin.f64 ky)))
(hypot.f64 (neg.f64 (sin.f64 kx)) (sin.f64 ky))
(hypot.f64 (fabs.f64 (sin.f64 ky)) (pow.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 (fabs.f64 (sin.f64 kx)) (pow.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)) (fabs.f64 (sin.f64 ky)))
(hypot.f64 (fabs.f64 (sin.f64 kx)) (sin.f64 ky))
(hypot.f64 (sin.f64 kx) (pow.f64 (sin.f64 ky) #s(literal 1 binary64)))
(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) (pow.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))
(sin.f64 kx)
kx
(sin.f64 ky)
ky
#s(literal -1/2 binary64)
(sin.f64 th)
th
(*.f64 (sin.f64 th) #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (*.f64 (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (sin.f64 ky))))
(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (*.f64 (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (sin.f64 ky))) (sin.f64 th))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (*.f64 (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (sin.f64 ky)))
(*.f64 (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (sin.f64 ky))
(*.f64 (sin.f64 ky) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))
(*.f64 (pow.f64 (pow.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal -1 binary64)) #s(literal 1/4 binary64)) (pow.f64 (pow.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal -1 binary64)) #s(literal 1/4 binary64)))
(pow.f64 (pow.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal -1 binary64)) #s(literal 1/2 binary64))
(pow.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal -1/2 binary64))
(/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))
(sqrt.f64 (pow.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal -1 binary64)))
(exp.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal -1 binary64))) #s(literal 1/2 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal -1 binary64))) #s(literal 1/2 binary64))) (sinh.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal -1 binary64))) #s(literal 1/2 binary64))))
(*.f64 (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))
(pow.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal -1 binary64))
(/.f64 #s(literal 1 binary64) (fma.f64 (sin.f64 kx) (sin.f64 kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
(/.f64 #s(literal -1 binary64) (neg.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
(exp.f64 (*.f64 (log.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #s(literal -1 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #s(literal -1 binary64))) (sinh.f64 (*.f64 (log.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #s(literal -1 binary64))))
(/.f64 (-.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 (sin.f64 ky) #s(literal 4 binary64))) (-.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
(/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 6 binary64)) (pow.f64 (sin.f64 ky) #s(literal 6 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 (pow.f64 (sin.f64 ky) #s(literal 1 binary64)) (pow.f64 (sin.f64 ky) #s(literal 1 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))
(fma.f64 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))
(fma.f64 (neg.f64 (sin.f64 ky)) (neg.f64 (sin.f64 ky)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))
(fma.f64 (neg.f64 (sin.f64 kx)) (neg.f64 (sin.f64 kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))
(fma.f64 (fabs.f64 (sin.f64 ky)) (fabs.f64 (sin.f64 ky)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))
(fma.f64 (fabs.f64 (sin.f64 kx)) (fabs.f64 (sin.f64 kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))
(fma.f64 (sin.f64 kx) (sin.f64 kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))
(fma.f64 (sin.f64 ky) (sin.f64 ky) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))
(-.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 (neg.f64 (sin.f64 ky)) (sin.f64 ky)))
(+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))
(+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))
(*.f64 (pow.f64 (sin.f64 ky) #s(literal 1 binary64)) (pow.f64 (sin.f64 ky) #s(literal 1 binary64)))
(*.f64 (neg.f64 (sin.f64 ky)) (neg.f64 (sin.f64 ky)))
(*.f64 (fabs.f64 (sin.f64 ky)) (fabs.f64 (sin.f64 ky)))
(*.f64 (sin.f64 ky) (sin.f64 ky))
(pow.f64 (sin.f64 ky) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 ky ky)) (cos.f64 (+.f64 ky ky))) #s(literal 2 binary64))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))
(exp.f64 (*.f64 (log.f64 (sin.f64 ky)) #s(literal 2 binary64)))
(+.f64 (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(literal 2 binary64)
#s(literal -1 binary64)
#s(literal 1/2 binary64)
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (-.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 th) (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))
(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))))
(/.f64 (neg.f64 (sin.f64 ky)) (neg.f64 (sqrt.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))
(/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))))
(pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal 1/2 binary64))
(sqrt.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(/.f64 (-.f64 (*.f64 (/.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (-.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 4 binary64)) (-.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (*.f64 (/.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (/.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #s(literal 3 binary64))) (fma.f64 (/.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (-.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 4 binary64)) (-.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (fma.f64 (/.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (*.f64 (/.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))
(/.f64 (-.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (*.f64 (-.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 (sin.f64 ky) #s(literal 4 binary64)))) (*.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)))))
(-.f64 (/.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
(*.f64 (/.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 kx) #s(literal 6 binary64)) (pow.f64 (sin.f64 ky) #s(literal 6 binary64)))) (+.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 (sin.f64 ky) #s(literal 4 binary64))) (pow.f64 (*.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal 2 binary64))))
(/.f64 (neg.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64))) (neg.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 4 binary64)) (-.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 kx) #s(literal 2 binary64)))
(pow.f64 (sin.f64 kx) #s(literal 4 binary64))
(exp.f64 (*.f64 (log.f64 (sin.f64 kx)) #s(literal 4 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 (sin.f64 kx)) #s(literal 4 binary64))) (sinh.f64 (*.f64 (log.f64 (sin.f64 kx)) #s(literal 4 binary64))))
#s(literal 4 binary64)
(/.f64 (-.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 (sin.f64 ky) #s(literal 4 binary64))) (fma.f64 (sin.f64 kx) (sin.f64 kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (sin.f64 kx) #s(literal 6 binary64)) (pow.f64 (sin.f64 ky) #s(literal 6 binary64)))) (neg.f64 (+.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (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 6 binary64)) (pow.f64 (sin.f64 ky) #s(literal 6 binary64))) (+.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (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 6 binary64)) (+.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 (sin.f64 ky) #s(literal 4 binary64))) (pow.f64 (*.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 6 binary64)) (+.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 (sin.f64 ky) #s(literal 4 binary64))) (pow.f64 (*.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal 2 binary64)))))
(-.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))
(*.f64 (+.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 (sin.f64 ky) #s(literal 4 binary64))) (pow.f64 (*.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal 2 binary64))) (-.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 6 binary64)) (pow.f64 (sin.f64 kx) #s(literal 6 binary64))) (*.f64 (pow.f64 (sin.f64 ky) #s(literal 6 binary64)) (pow.f64 (sin.f64 ky) #s(literal 6 binary64)))) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 6 binary64)) (pow.f64 (sin.f64 ky) #s(literal 6 binary64))))
(/.f64 (-.f64 (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 6 binary64)) #s(literal 3 binary64)) (pow.f64 (pow.f64 (sin.f64 ky) #s(literal 6 binary64)) #s(literal 3 binary64))) (fma.f64 (pow.f64 (sin.f64 kx) #s(literal 6 binary64)) (pow.f64 (sin.f64 kx) #s(literal 6 binary64)) (fma.f64 (pow.f64 (sin.f64 ky) #s(literal 6 binary64)) (pow.f64 (sin.f64 ky) #s(literal 6 binary64)) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 6 binary64)) (pow.f64 (sin.f64 ky) #s(literal 6 binary64))))))
(-.f64 (pow.f64 (sin.f64 kx) #s(literal 6 binary64)) (pow.f64 (sin.f64 ky) #s(literal 6 binary64)))
(*.f64 (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(literal 3/2 binary64)))
(*.f64 (pow.f64 (sin.f64 kx) #s(literal 3 binary64)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))
(*.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))
(*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 binary64)))
(pow.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(literal 3 binary64))
(pow.f64 (sin.f64 kx) #s(literal 6 binary64))
(exp.f64 (*.f64 (log.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64)))
(exp.f64 (*.f64 (log.f64 (sin.f64 kx)) #s(literal 6 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64))) (sinh.f64 (*.f64 (log.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 3 binary64))))
(+.f64 (cosh.f64 (*.f64 (log.f64 (sin.f64 kx)) #s(literal 6 binary64))) (sinh.f64 (*.f64 (log.f64 (sin.f64 kx)) #s(literal 6 binary64))))
(*.f64 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) (pow.f64 (sin.f64 kx) #s(literal 1 binary64)))
(*.f64 (neg.f64 (sin.f64 kx)) (neg.f64 (sin.f64 kx)))
(*.f64 (fabs.f64 (sin.f64 kx)) (fabs.f64 (sin.f64 kx)))
(*.f64 (sin.f64 kx) (sin.f64 kx))
(pow.f64 (sin.f64 kx) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx))) #s(literal 2 binary64))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))
(exp.f64 (*.f64 (log.f64 (sin.f64 kx)) #s(literal 2 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 (sin.f64 kx)) #s(literal 2 binary64))) (sinh.f64 (*.f64 (log.f64 (sin.f64 kx)) #s(literal 2 binary64))))
#s(literal 3 binary64)
(*.f64 (pow.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) #s(literal 3/2 binary64)))
(*.f64 (pow.f64 (sin.f64 ky) #s(literal 3 binary64)) (pow.f64 (sin.f64 ky) #s(literal 3 binary64)))
(*.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))
(*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 4 binary64)))
(pow.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) #s(literal 3 binary64))
(pow.f64 (sin.f64 ky) #s(literal 6 binary64))
(exp.f64 (*.f64 (log.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))
(exp.f64 (*.f64 (log.f64 (sin.f64 ky)) #s(literal 6 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64))) (sinh.f64 (*.f64 (log.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64))))
(+.f64 (cosh.f64 (*.f64 (log.f64 (sin.f64 ky)) #s(literal 6 binary64))) (sinh.f64 (*.f64 (log.f64 (sin.f64 ky)) #s(literal 6 binary64))))
(/.f64 (-.f64 (pow.f64 (sin.f64 kx) #s(literal 8 binary64)) (*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 4 binary64))) (+.f64 (pow.f64 (*.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 4 binary64))))) (-.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 4 binary64)))))
(/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal 2 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 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 (sin.f64 ky) #s(literal 4 binary64))))) (-.f64 (pow.f64 (*.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 (sin.f64 ky) #s(literal 4 binary64)))))
(/.f64 (+.f64 (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) #s(literal 3 binary64)) (pow.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 4 binary64))) #s(literal 3 binary64))) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 8 binary64)) (-.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 4 binary64))) (+.f64 (pow.f64 (*.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 4 binary64)))) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 4 binary64)))))))
(/.f64 (+.f64 (pow.f64 (pow.f64 (*.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 (sin.f64 ky) #s(literal 4 binary64))) #s(literal 3 binary64))) (fma.f64 (pow.f64 (*.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal 2 binary64)) (-.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 (sin.f64 ky) #s(literal 4 binary64))) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 (sin.f64 ky) #s(literal 4 binary64)))) (*.f64 (pow.f64 (*.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 (sin.f64 ky) #s(literal 4 binary64)))))))
(fma.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 (sin.f64 ky) #s(literal 4 binary64))))
(fma.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 4 binary64)) (pow.f64 (sin.f64 ky) #s(literal 4 binary64))))
(fma.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 4 binary64))))
(+.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 binary64))) (pow.f64 (sin.f64 ky) #s(literal 4 binary64)))
(+.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 (sin.f64 ky) #s(literal 4 binary64))) (pow.f64 (*.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal 2 binary64)))
(+.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 4 binary64))) (pow.f64 (sin.f64 kx) #s(literal 4 binary64)))
(+.f64 (pow.f64 (*.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 (sin.f64 ky) #s(literal 4 binary64))))
(+.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 4 binary64))))
(/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal 2 binary64))) (pow.f64 (sin.f64 ky) #s(literal 8 binary64))) (-.f64 (pow.f64 (*.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 4 binary64))))
(/.f64 (-.f64 (pow.f64 (sin.f64 ky) #s(literal 8 binary64)) (*.f64 (pow.f64 (*.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal 2 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 (pow.f64 (*.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) #s(literal 3 binary64))) (fma.f64 (pow.f64 (*.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal 2 binary64)) (-.f64 (pow.f64 (sin.f64 ky) #s(literal 8 binary64)) (*.f64 (pow.f64 (*.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 4 binary64))))))
(/.f64 (+.f64 (pow.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) #s(literal 3 binary64)) (pow.f64 (pow.f64 (*.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal 2 binary64)) #s(literal 3 binary64))) (+.f64 (pow.f64 (sin.f64 ky) #s(literal 8 binary64)) (-.f64 (*.f64 (pow.f64 (*.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal 2 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 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal 2 binary64)))
(fma.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 4 binary64)))
(fma.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 4 binary64)))
(-.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (*.f64 (neg.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
(+.f64 (pow.f64 (*.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #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 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))
(pow.f64 (sin.f64 ky) #s(literal 4 binary64))
(exp.f64 (*.f64 (log.f64 (sin.f64 ky)) #s(literal 4 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 (sin.f64 ky)) #s(literal 4 binary64))) (sinh.f64 (*.f64 (log.f64 (sin.f64 ky)) #s(literal 4 binary64))))
(*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))
(*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))
(pow.f64 (*.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal 2 binary64))
(/.f64 (neg.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64))) (neg.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 ky) #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (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))) (fma.f64 (sin.f64 kx) (sin.f64 kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (sin.f64 kx) #s(literal 6 binary64)) (pow.f64 (sin.f64 ky) #s(literal 6 binary64)))) (neg.f64 (+.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (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 6 binary64)) (pow.f64 (sin.f64 ky) #s(literal 6 binary64))) (+.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (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 6 binary64)) (+.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 (sin.f64 ky) #s(literal 4 binary64))) (pow.f64 (*.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 6 binary64)) (+.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 (sin.f64 ky) #s(literal 4 binary64))) (pow.f64 (*.f64 (sin.f64 kx) (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)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (/.f64 (*.f64 (*.f64 kx kx) (sin.f64 th)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal -1/2 binary64) (sin.f64 th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (fma.f64 (*.f64 (pow.f64 (*.f64 kx (sin.f64 ky)) #s(literal 2 binary64)) (*.f64 (fma.f64 (pow.f64 (sin.f64 ky) #s(literal -6 binary64)) #s(literal 3/4 binary64) (*.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 1/3 binary64))) (sin.f64 th))) #s(literal 1/2 binary64) (/.f64 (*.f64 #s(literal -1/2 binary64) (sin.f64 th)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (*.f64 kx kx) (sin.f64 th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 (fma.f64 (pow.f64 (sin.f64 ky) #s(literal -6 binary64)) #s(literal 3/4 binary64) (*.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 1/3 binary64))) (sin.f64 th)) (*.f64 (*.f64 (pow.f64 (*.f64 kx (sin.f64 ky)) #s(literal 2 binary64)) (*.f64 (fma.f64 (/.f64 (fma.f64 (pow.f64 (sin.f64 ky) #s(literal -6 binary64)) #s(literal 3/4 binary64) (*.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 1/3 binary64))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal -1/2 binary64) (fma.f64 #s(literal 2/45 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) (fma.f64 #s(literal 2/3 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 binary64)) (pow.f64 (sin.f64 ky) #s(literal -8 binary64))))) (sin.f64 th))) #s(literal -1/2 binary64))) (*.f64 kx kx) (/.f64 (*.f64 #s(literal -1/2 binary64) (sin.f64 th)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (*.f64 kx kx) (sin.f64 th)))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(literal 1 binary64))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 (/.f64 (*.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1 binary64)))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (pow.f64 (*.f64 kx (sin.f64 ky)) #s(literal 2 binary64)) (fma.f64 (pow.f64 (sin.f64 ky) #s(literal -6 binary64)) #s(literal 3/4 binary64) (*.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 1/3 binary64)))) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)))) (*.f64 kx kx) #s(literal 1 binary64)))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (fma.f64 (pow.f64 (sin.f64 ky) #s(literal -6 binary64)) #s(literal 3/4 binary64) (*.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 1/3 binary64))) (*.f64 (*.f64 (pow.f64 (*.f64 kx (sin.f64 ky)) #s(literal 2 binary64)) (fma.f64 (/.f64 (fma.f64 (pow.f64 (sin.f64 ky) #s(literal -6 binary64)) #s(literal 3/4 binary64) (*.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 1/3 binary64))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal -1/2 binary64) (fma.f64 #s(literal 2/45 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) (fma.f64 #s(literal 2/3 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 binary64)) (pow.f64 (sin.f64 ky) #s(literal -8 binary64)))))) #s(literal -1/2 binary64))) (*.f64 kx kx) (*.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)))) (*.f64 kx kx) #s(literal 1 binary64)))
#s(approx (* (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2) (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2)) (sin ky)) #s(literal 1 binary64))
#s(approx (* (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2) (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2)) (sin ky)) (fma.f64 (/.f64 (*.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1 binary64)))
#s(approx (* (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2) (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2)) (sin ky)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (pow.f64 (*.f64 kx (sin.f64 ky)) #s(literal 2 binary64)) (fma.f64 (pow.f64 (sin.f64 ky) #s(literal -6 binary64)) #s(literal 3/4 binary64) (*.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 1/3 binary64)))) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)))) (*.f64 kx kx) #s(literal 1 binary64)))
#s(approx (* (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2) (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2)) (sin ky)) (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (fma.f64 (pow.f64 (sin.f64 ky) #s(literal -6 binary64)) #s(literal 3/4 binary64) (*.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 1/3 binary64))) (*.f64 (*.f64 (pow.f64 (*.f64 kx (sin.f64 ky)) #s(literal 2 binary64)) (fma.f64 (/.f64 (fma.f64 (pow.f64 (sin.f64 ky) #s(literal -6 binary64)) #s(literal 3/4 binary64) (*.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 1/3 binary64))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal -1/2 binary64) (fma.f64 #s(literal 2/45 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) (fma.f64 #s(literal 2/3 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 binary64)) (pow.f64 (sin.f64 ky) #s(literal -8 binary64)))))) #s(literal -1/2 binary64))) (*.f64 kx kx) (*.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)))) (*.f64 kx kx) #s(literal 1 binary64)))
#s(approx (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2) (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2)) (pow.f64 (sin.f64 ky) #s(literal -1 binary64)))
#s(approx (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2) (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2)) (fma.f64 (/.f64 (*.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal 3 binary64))) #s(literal -1/2 binary64) (pow.f64 (sin.f64 ky) #s(literal -1 binary64))))
#s(approx (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2) (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (*.f64 (fma.f64 (pow.f64 (sin.f64 ky) #s(literal -6 binary64)) #s(literal 3/4 binary64) (*.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 1/3 binary64))) (sin.f64 ky)) (*.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal -3 binary64)))) (*.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal -1 binary64))))
#s(approx (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2) (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2)) (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (sin.f64 ky)) (fma.f64 (pow.f64 (sin.f64 ky) #s(literal -6 binary64)) #s(literal 3/4 binary64) (*.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 1/3 binary64))) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 kx kx)) (*.f64 (fma.f64 (/.f64 (fma.f64 (pow.f64 (sin.f64 ky) #s(literal -6 binary64)) #s(literal 3/4 binary64) (*.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 1/3 binary64))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal -1/2 binary64) (fma.f64 #s(literal 2/45 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) (fma.f64 #s(literal 2/3 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 binary64)) (pow.f64 (sin.f64 ky) #s(literal -8 binary64))))) (sin.f64 ky)))) (*.f64 kx kx) (*.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 ky) #s(literal -3 binary64)))) (*.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal -1 binary64))))
#s(approx (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2) (*.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal -1 binary64))) #s(literal 1 binary64)))
#s(approx (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2) (fma.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal -5 binary64))) (*.f64 kx kx)) (*.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal -1 binary64))) #s(literal 1 binary64))))
#s(approx (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2) (fma.f64 (fma.f64 (*.f64 (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 24 binary64) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (fma.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 1/3 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 binary64))) (*.f64 #s(literal -12 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)))) #s(literal 1/96 binary64) (*.f64 #s(literal 1/32 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)))) (*.f64 kx kx)) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal -1 binary64)))) #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal -5 binary64))))) (*.f64 kx kx) (*.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal -1 binary64))) #s(literal 1 binary64))))
#s(approx (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2) (fma.f64 (fma.f64 (*.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 24 binary64) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (fma.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 1/3 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 binary64))) (*.f64 #s(literal -12 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)))) #s(literal 1/96 binary64) (*.f64 #s(literal 1/32 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)))) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal -1 binary64))) (*.f64 (*.f64 (-.f64 (fma.f64 (-.f64 (fma.f64 (*.f64 #s(literal -720 binary64) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (fma.f64 #s(literal 2/3 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 binary64)) (fma.f64 #s(literal 2/45 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) (pow.f64 (sin.f64 ky) #s(literal -8 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 1/3 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 binary64))))) (*.f64 #s(literal 240 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 binary64)))) #s(literal 1/2880 binary64) (*.f64 (/.f64 (fma.f64 (*.f64 #s(literal 24 binary64) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (fma.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 1/3 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 binary64))) (*.f64 #s(literal -12 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal -1/384 binary64))) (*.f64 #s(literal 1/384 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 binary64)))) (*.f64 kx kx)) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal -1 binary64)))))) (*.f64 kx kx) (*.f64 #s(literal -1/4 binary64) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal -5 binary64))))) (*.f64 kx kx) (*.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal -1 binary64))) #s(literal 1 binary64))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (sin.f64 ky))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (fma.f64 (/.f64 (*.f64 kx kx) (sin.f64 ky)) #s(literal 1/2 binary64) (sin.f64 ky)))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (fma.f64 (fma.f64 (/.f64 (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)) #s(literal 1/3 binary64)) (*.f64 kx kx)) (sin.f64 ky)) #s(literal -1/2 binary64) (/.f64 #s(literal 1/2 binary64) (sin.f64 ky))) (*.f64 kx kx) (sin.f64 ky)))
#s(approx (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 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)) #s(literal 1/3 binary64))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (sin.f64 ky))) #s(literal 1/2 binary64) (/.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)) #s(literal 1/3 binary64))) (sin.f64 ky))) (*.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 #s(literal 1/120 binary64) (*.f64 kx kx)) #s(literal 1/6 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) kx))
#s(approx (sin kx) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 kx kx) #s(literal 1/120 binary64)) (*.f64 kx kx)) #s(literal 1/6 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) kx))
#s(approx kx kx)
#s(approx (* (pow (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) -1) 1/2) (sin ky)) #s(literal 1 binary64))
#s(approx (* (pow (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) -1) 1/2) (sin ky)) (fma.f64 (/.f64 (*.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1 binary64)))
#s(approx (* (pow (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) -1) 1/2) (sin ky)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (pow.f64 (*.f64 kx (sin.f64 ky)) #s(literal 2 binary64)) (fma.f64 (pow.f64 (sin.f64 ky) #s(literal -6 binary64)) #s(literal 3/4 binary64) (*.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 1/3 binary64)))) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)))) (*.f64 kx kx) #s(literal 1 binary64)))
#s(approx (* (pow (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) -1) 1/2) (sin ky)) (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (fma.f64 (pow.f64 (sin.f64 ky) #s(literal -6 binary64)) #s(literal 3/4 binary64) (*.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 1/3 binary64))) (*.f64 (*.f64 (pow.f64 (*.f64 kx (sin.f64 ky)) #s(literal 2 binary64)) (fma.f64 (/.f64 (fma.f64 (pow.f64 (sin.f64 ky) #s(literal -6 binary64)) #s(literal 3/4 binary64) (*.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 1/3 binary64))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal -1/2 binary64) (fma.f64 #s(literal 2/45 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) (fma.f64 #s(literal 2/3 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 binary64)) (pow.f64 (sin.f64 ky) #s(literal -8 binary64)))))) #s(literal -1/2 binary64))) (*.f64 kx kx) (*.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)))) (*.f64 kx kx) #s(literal 1 binary64)))
#s(approx (pow (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) -1) 1/2) (pow.f64 (sin.f64 ky) #s(literal -1 binary64)))
#s(approx (pow (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) -1) 1/2) (fma.f64 (/.f64 (*.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal 3 binary64))) #s(literal -1/2 binary64) (pow.f64 (sin.f64 ky) #s(literal -1 binary64))))
#s(approx (pow (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) -1) 1/2) (fma.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (*.f64 (fma.f64 (pow.f64 (sin.f64 ky) #s(literal -6 binary64)) #s(literal 3/4 binary64) (*.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 1/3 binary64))) (sin.f64 ky)) (*.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal -3 binary64)))) (*.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal -1 binary64))))
#s(approx (pow (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) -1) 1/2) (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (sin.f64 ky)) (fma.f64 (pow.f64 (sin.f64 ky) #s(literal -6 binary64)) #s(literal 3/4 binary64) (*.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 1/3 binary64))) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 kx kx)) (*.f64 (fma.f64 (/.f64 (fma.f64 (pow.f64 (sin.f64 ky) #s(literal -6 binary64)) #s(literal 3/4 binary64) (*.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 1/3 binary64))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal -1/2 binary64) (fma.f64 #s(literal 2/45 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) (fma.f64 #s(literal 2/3 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 binary64)) (pow.f64 (sin.f64 ky) #s(literal -8 binary64))))) (sin.f64 ky)))) (*.f64 kx kx) (*.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 ky) #s(literal -3 binary64)))) (*.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal -1 binary64))))
#s(approx (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) -1) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)))
#s(approx (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) -1) (fma.f64 (/.f64 (*.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal 4 binary64))) #s(literal -1 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64))))
#s(approx (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) -1) (fma.f64 (-.f64 (*.f64 (fma.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 1/3 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 binary64))) (*.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal -4 binary64))) (*.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal -2 binary64))))
#s(approx (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) -1) (fma.f64 (-.f64 (*.f64 (fma.f64 (neg.f64 (*.f64 kx kx)) (fma.f64 #s(literal 2/45 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) (fma.f64 #s(literal 2/3 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 binary64)) (pow.f64 (sin.f64 ky) #s(literal -8 binary64)))) (fma.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 1/3 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 binary64)))) (*.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal -4 binary64))) (*.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal -2 binary64))))
#s(approx (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))
#s(approx (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) (fma.f64 kx kx (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
#s(approx (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) (fma.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
#s(approx (+ (* (sin kx) (sin kx)) (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) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
#s(approx (* (/ (sin ky) (sqrt (- (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))) (sin th)) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (- (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))) (sin th)) (fma.f64 (/.f64 (*.f64 (*.f64 kx kx) (sin.f64 th)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal -1/2 binary64) (sin.f64 th)))
#s(approx (* (/ (sin ky) (sqrt (- (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))) (sin th)) (fma.f64 (fma.f64 (*.f64 (pow.f64 (*.f64 kx (sin.f64 ky)) #s(literal 2 binary64)) (*.f64 (fma.f64 (pow.f64 (sin.f64 ky) #s(literal -6 binary64)) #s(literal 3/4 binary64) (*.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 1/3 binary64))) (sin.f64 th))) #s(literal 1/2 binary64) (/.f64 (*.f64 #s(literal -1/2 binary64) (sin.f64 th)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (*.f64 kx kx) (sin.f64 th)))
#s(approx (* (/ (sin ky) (sqrt (- (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))) (sin th)) (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 (fma.f64 (pow.f64 (sin.f64 ky) #s(literal -6 binary64)) #s(literal 3/4 binary64) (*.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 1/3 binary64))) (sin.f64 th)) (*.f64 (*.f64 (pow.f64 (*.f64 kx (sin.f64 ky)) #s(literal 2 binary64)) (*.f64 (fma.f64 (/.f64 (fma.f64 #s(literal -2/3 binary64) (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 (sin.f64 ky) #s(literal 10 binary64))) #s(literal -1 binary64) (fma.f64 (/.f64 (-.f64 #s(literal 1/3 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64))) (pow.f64 (sin.f64 ky) #s(literal 6 binary64))) #s(literal -1 binary64) (fma.f64 (/.f64 (fma.f64 (pow.f64 (sin.f64 ky) #s(literal -6 binary64)) #s(literal 3/4 binary64) (*.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 1/3 binary64))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal -1/2 binary64) (fma.f64 #s(literal 2/45 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) (fma.f64 (pow.f64 (sin.f64 ky) #s(literal -6 binary64)) #s(literal 1/3 binary64) (pow.f64 (sin.f64 ky) #s(literal -8 binary64))))))) (sin.f64 th))) #s(literal -1/2 binary64))) (*.f64 kx kx) (/.f64 (*.f64 #s(literal -1/2 binary64) (sin.f64 th)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (*.f64 kx kx) (sin.f64 th)))
#s(approx (/ (sin ky) (sqrt (- (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(literal 1 binary64))
#s(approx (/ (sin ky) (sqrt (- (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))) (fma.f64 (/.f64 (*.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1 binary64)))
#s(approx (/ (sin ky) (sqrt (- (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (pow.f64 (*.f64 kx (sin.f64 ky)) #s(literal 2 binary64)) (fma.f64 (pow.f64 (sin.f64 ky) #s(literal -6 binary64)) #s(literal 3/4 binary64) (*.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 1/3 binary64)))) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)))) (*.f64 kx kx) #s(literal 1 binary64)))
#s(approx (/ (sin ky) (sqrt (- (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))) (fma.f64 (fma.f64 (fma.f64 (*.f64 (pow.f64 (*.f64 kx (sin.f64 ky)) #s(literal 2 binary64)) (fma.f64 (/.f64 (fma.f64 #s(literal -2/3 binary64) (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 (sin.f64 ky) #s(literal 10 binary64))) #s(literal -1 binary64) (fma.f64 (/.f64 (-.f64 #s(literal 1/3 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64))) (pow.f64 (sin.f64 ky) #s(literal 6 binary64))) #s(literal -1 binary64) (fma.f64 (/.f64 (fma.f64 (pow.f64 (sin.f64 ky) #s(literal -6 binary64)) #s(literal 3/4 binary64) (*.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 1/3 binary64))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal -1/2 binary64) (fma.f64 #s(literal 2/45 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) (fma.f64 (pow.f64 (sin.f64 ky) #s(literal -6 binary64)) #s(literal 1/3 binary64) (pow.f64 (sin.f64 ky) #s(literal -8 binary64)))))))) #s(literal -1/2 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (fma.f64 (pow.f64 (sin.f64 ky) #s(literal -6 binary64)) #s(literal 3/4 binary64) (*.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 1/3 binary64))))) (*.f64 kx kx) (*.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)))) (*.f64 kx kx) #s(literal 1 binary64)))
#s(approx (sqrt (- (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))))) (sin.f64 ky))
#s(approx (sqrt (- (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))))) (fma.f64 (/.f64 (*.f64 kx kx) (sin.f64 ky)) #s(literal 1/2 binary64) (sin.f64 ky)))
#s(approx (sqrt (- (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))))) (fma.f64 (fma.f64 (/.f64 (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)) #s(literal 1/3 binary64)) (*.f64 kx kx)) (sin.f64 ky)) #s(literal -1/2 binary64) (/.f64 #s(literal 1/2 binary64) (sin.f64 ky))) (*.f64 kx kx) (sin.f64 ky)))
#s(approx (sqrt (- (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))))) (fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 kx kx) (/.f64 (-.f64 (fma.f64 #s(literal -1 binary64) (+.f64 (/.f64 (fma.f64 #s(literal -2/3 binary64) (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 (sin.f64 ky) #s(literal 6 binary64))) (/.f64 (-.f64 #s(literal 1/3 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #s(literal 2/45 binary64)) (fma.f64 (/.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)) #s(literal 1/3 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 ky) #s(literal -2 binary64)) #s(literal 1/3 binary64)))) (sin.f64 ky))) #s(literal 1/2 binary64) (/.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)) #s(literal 1/3 binary64))) (sin.f64 ky))) (*.f64 kx kx) (/.f64 #s(literal 1/2 binary64) (sin.f64 ky))) (*.f64 kx kx) (sin.f64 ky)))
#s(approx (- (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))
#s(approx (- (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 kx kx (*.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
#s(approx (- (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (/ (pow (sin ky) 4) (- (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 binary64) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
#s(approx (- (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 (fma.f64 (-.f64 (*.f64 (-.f64 (fma.f64 #s(literal -1 binary64) (+.f64 (/.f64 (fma.f64 #s(literal -2/3 binary64) (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 (sin.f64 ky) #s(literal 6 binary64))) (/.f64 (-.f64 #s(literal 1/3 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #s(literal 2/45 binary64)) (*.f64 (pow.f64 (sin.f64 ky) #s(literal -2 binary64)) #s(literal 1/3 binary64))) (*.f64 kx kx)) #s(literal 1/3 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx) (*.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
#s(approx (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (neg.f64 (/.f64 (pow.f64 kx #s(literal 4 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
#s(approx (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (*.f64 (-.f64 (neg.f64 (*.f64 (*.f64 kx kx) (/.f64 (fma.f64 #s(literal -2/3 binary64) (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 (sin.f64 ky) #s(literal 6 binary64))))) (pow.f64 (sin.f64 ky) #s(literal -2 binary64))) (pow.f64 kx #s(literal 4 binary64))))
#s(approx (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (*.f64 (-.f64 (*.f64 (*.f64 #s(literal -1 binary64) (fma.f64 (*.f64 kx kx) (/.f64 (+.f64 (fma.f64 #s(literal -2/3 binary64) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (fma.f64 #s(literal 1/5 binary64) (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (*.f64 #s(literal -1/3 binary64) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal 1 binary64)) (pow.f64 (sin.f64 ky) #s(literal 6 binary64))) (/.f64 (fma.f64 #s(literal -2/3 binary64) (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 (sin.f64 ky) #s(literal 6 binary64))))) (*.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal -2 binary64))) (pow.f64 kx #s(literal 4 binary64))))
#s(approx (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (*.f64 (-.f64 (*.f64 (fma.f64 (fma.f64 (-.f64 (neg.f64 (/.f64 (-.f64 (fma.f64 (fma.f64 #s(literal -1/3 binary64) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) #s(literal 1 binary64)) #s(literal -2/3 binary64) (fma.f64 #s(literal -34/945 binary64) (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) #s(literal 11/45 binary64)))) #s(literal 2/3 binary64)) (pow.f64 (sin.f64 ky) #s(literal 6 binary64)))) (pow.f64 (sin.f64 ky) #s(literal -8 binary64))) (*.f64 kx kx) (neg.f64 (/.f64 (+.f64 (fma.f64 #s(literal -2/3 binary64) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (fma.f64 #s(literal 1/5 binary64) (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (*.f64 #s(literal -1/3 binary64) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal 1 binary64)) (pow.f64 (sin.f64 ky) #s(literal 6 binary64))))) (*.f64 kx kx) (neg.f64 (/.f64 (fma.f64 #s(literal -2/3 binary64) (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 (sin.f64 ky) #s(literal 6 binary64))))) (*.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal -2 binary64))) (pow.f64 kx #s(literal 4 binary64))))
#s(approx (pow (sin kx) 4) (pow.f64 kx #s(literal 4 binary64)))
#s(approx (pow (sin kx) 4) (*.f64 (fma.f64 #s(literal -2/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (pow.f64 kx #s(literal 4 binary64))))
#s(approx (pow (sin kx) 4) (*.f64 (fma.f64 (-.f64 (*.f64 #s(literal 1/5 binary64) (*.f64 kx kx)) #s(literal 2/3 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) (pow.f64 kx #s(literal 4 binary64))))
#s(approx (pow (sin kx) 4) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -34/945 binary64) (*.f64 kx kx) #s(literal 1/5 binary64)) (*.f64 kx kx)) #s(literal 2/3 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) (pow.f64 kx #s(literal 4 binary64))))
#s(approx (- (pow (sin kx) 2) (pow (sin ky) 2)) (neg.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
#s(approx (- (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 kx kx (neg.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
#s(approx (- (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 (fma.f64 (neg.f64 (*.f64 kx kx)) (fma.f64 (/.f64 (fma.f64 #s(literal -1/3 binary64) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) #s(literal 1 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal -1 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64))) #s(literal 1 binary64)) (*.f64 kx kx) (neg.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
#s(approx (- (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 (fma.f64 (-.f64 (*.f64 (-.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal -2 binary64)) #s(literal 1/3 binary64)) (fma.f64 (/.f64 (-.f64 (*.f64 #s(literal 2/45 binary64) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2/3 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (/.f64 (fma.f64 #s(literal -1/3 binary64) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) #s(literal 1 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal -1 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (*.f64 kx kx)) (fma.f64 (/.f64 (fma.f64 #s(literal -1/3 binary64) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) #s(literal 1 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal -1 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)))) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx) (neg.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
#s(approx (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (neg.f64 (pow.f64 (sin.f64 ky) #s(literal 6 binary64))))
#s(approx (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (-.f64 (pow.f64 kx #s(literal 6 binary64)) (pow.f64 (sin.f64 ky) #s(literal 6 binary64))))
#s(approx (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (-.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1 binary64) #s(literal 1 binary64)) (pow.f64 kx #s(literal 6 binary64))) (pow.f64 (sin.f64 ky) #s(literal 6 binary64))))
#s(approx (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (-.f64 (*.f64 (fma.f64 (-.f64 (*.f64 #s(literal 7/15 binary64) (*.f64 kx kx)) #s(literal 1 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) (pow.f64 kx #s(literal 6 binary64))) (pow.f64 (sin.f64 ky) #s(literal 6 binary64))))
#s(approx (pow (pow (sin kx) 2) 3) (pow.f64 kx #s(literal 6 binary64)))
#s(approx (pow (pow (sin kx) 2) 3) (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1 binary64) #s(literal 1 binary64)) (pow.f64 kx #s(literal 6 binary64))))
#s(approx (pow (pow (sin kx) 2) 3) (*.f64 (fma.f64 (-.f64 (*.f64 #s(literal 7/15 binary64) (*.f64 kx kx)) #s(literal 1 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) (pow.f64 kx #s(literal 6 binary64))))
#s(approx (pow (pow (sin kx) 2) 3) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -128/945 binary64) (*.f64 kx kx) #s(literal 7/15 binary64)) (*.f64 kx kx)) #s(literal 1 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) (pow.f64 kx #s(literal 6 binary64))))
#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 (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))) (pow.f64 (sin.f64 ky) #s(literal 4 binary64)))
#s(approx (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 (pow.f64 (*.f64 kx (sin.f64 ky)) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 4 binary64))))
#s(approx (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/3 binary64) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal 4 binary64))))
#s(approx (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 (fma.f64 (+.f64 (fma.f64 #s(literal -1/3 binary64) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (-.f64 (*.f64 #s(literal 2/45 binary64) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2/3 binary64)) (*.f64 kx kx))) (*.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal 4 binary64))))
#s(approx (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2))) (pow.f64 (sin.f64 ky) #s(literal 4 binary64)))
#s(approx (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2))) (+.f64 (pow.f64 (*.f64 kx (sin.f64 ky)) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 4 binary64))))
#s(approx (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2))) (fma.f64 (fma.f64 (pow.f64 (*.f64 kx (sin.f64 ky)) #s(literal 2 binary64)) #s(literal -1/3 binary64) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal 4 binary64))))
#s(approx (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2))) (fma.f64 (fma.f64 (fma.f64 (pow.f64 (*.f64 kx (sin.f64 ky)) #s(literal 2 binary64)) #s(literal 2/45 binary64) (*.f64 #s(literal -1/3 binary64) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (*.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal 4 binary64))))
#s(approx (* (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (*.f64 kx (sin.f64 ky)) #s(literal 2 binary64)))
#s(approx (* (pow (sin kx) 2) (pow (sin ky) 2)) (*.f64 (fma.f64 (pow.f64 (*.f64 kx (sin.f64 ky)) #s(literal 2 binary64)) #s(literal -1/3 binary64) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 kx kx)))
#s(approx (* (pow (sin kx) 2) (pow (sin ky) 2)) (*.f64 (fma.f64 (fma.f64 (pow.f64 (*.f64 kx (sin.f64 ky)) #s(literal 2 binary64)) #s(literal 2/45 binary64) (*.f64 #s(literal -1/3 binary64) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (*.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 kx kx)))
#s(approx (* (pow (sin kx) 2) (pow (sin ky) 2)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (pow.f64 (*.f64 kx (sin.f64 ky)) #s(literal 2 binary64)) #s(literal -1/315 binary64) (*.f64 #s(literal 2/45 binary64) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (*.f64 kx kx) (*.f64 #s(literal -1/3 binary64) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (*.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 kx kx)))
#s(approx (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (neg.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
#s(approx (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (*.f64 #s(literal -1 binary64) (fma.f64 kx kx (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
#s(approx (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (fma.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/3 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64))) (*.f64 kx kx)) #s(literal 1 binary64)) (*.f64 kx kx) (neg.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
#s(approx (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (fma.f64 (-.f64 (*.f64 (-.f64 (fma.f64 (-.f64 (-.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal -2 binary64)) #s(literal 1/3 binary64)) #s(literal 2/45 binary64)) (neg.f64 (/.f64 (-.f64 #s(literal 1/3 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (*.f64 kx kx) #s(literal 1/3 binary64)) (pow.f64 (sin.f64 ky) #s(literal -2 binary64))) (*.f64 kx kx)) #s(literal 1 binary64)) (*.f64 kx kx) (neg.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
#s(approx (- (pow (sin kx) 2) (pow (sin ky) 2)) (neg.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
#s(approx (- (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 (*.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
#s(approx (- (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
#s(approx (- (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 (*.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)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (*.f64 (sin.f64 th) (sin.f64 ky))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (*.f64 (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (sin.f64 ky)))
#s(approx (* (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2) (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2)) (sin ky)) (*.f64 (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (sin.f64 ky)))
#s(approx (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2) (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2)) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))
#s(approx (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2) (pow.f64 (pow.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal -1 binary64)) #s(literal 1/4 binary64)))
#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 (* (pow (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) -1) 1/2) (sin ky)) (*.f64 (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (sin.f64 ky)))
#s(approx (pow (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) -1) 1/2) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))
#s(approx (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) -1) (pow.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal -1 binary64)))
#s(approx (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) (fma.f64 (sin.f64 kx) (sin.f64 kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
#s(approx (* (/ (sin ky) (sqrt (- (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))) (sin th)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (/.f64 (*.f64 (+.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 (sin.f64 ky) #s(literal 4 binary64))) (pow.f64 (*.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal 2 binary64))) (pow.f64 (sin.f64 kx) #s(literal 4 binary64))) (-.f64 (pow.f64 (sin.f64 kx) #s(literal 6 binary64)) (pow.f64 (sin.f64 ky) #s(literal 6 binary64)))) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) (*.f64 (sin.f64 th) (sin.f64 ky))))
#s(approx (/ (sin ky) (sqrt (- (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (/.f64 (*.f64 (+.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 (sin.f64 ky) #s(literal 4 binary64))) (pow.f64 (*.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal 2 binary64))) (pow.f64 (sin.f64 kx) #s(literal 4 binary64))) (-.f64 (pow.f64 (sin.f64 kx) #s(literal 6 binary64)) (pow.f64 (sin.f64 ky) #s(literal 6 binary64)))) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) (sin.f64 ky)))
#s(approx (sqrt (- (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))))) (sqrt.f64 (-.f64 (/.f64 (*.f64 (+.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 (sin.f64 ky) #s(literal 4 binary64))) (pow.f64 (*.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal 2 binary64))) (pow.f64 (sin.f64 kx) #s(literal 4 binary64))) (-.f64 (pow.f64 (sin.f64 kx) #s(literal 6 binary64)) (pow.f64 (sin.f64 ky) #s(literal 6 binary64)))) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))))
#s(approx (- (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))) (-.f64 (/.f64 (*.f64 (+.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 (sin.f64 ky) #s(literal 4 binary64))) (pow.f64 (*.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal 2 binary64))) (pow.f64 (sin.f64 kx) #s(literal 4 binary64))) (-.f64 (pow.f64 (sin.f64 kx) #s(literal 6 binary64)) (pow.f64 (sin.f64 ky) #s(literal 6 binary64)))) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
#s(approx (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (/.f64 (*.f64 (+.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 (sin.f64 ky) #s(literal 4 binary64))) (pow.f64 (*.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal 2 binary64))) (pow.f64 (sin.f64 kx) #s(literal 4 binary64))) (-.f64 (pow.f64 (sin.f64 kx) #s(literal 6 binary64)) (pow.f64 (sin.f64 ky) #s(literal 6 binary64)))))
#s(approx (pow (sin kx) 4) (pow.f64 (sin.f64 kx) #s(literal 4 binary64)))
#s(approx (- (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
#s(approx (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (-.f64 (pow.f64 (sin.f64 kx) #s(literal 6 binary64)) (pow.f64 (sin.f64 ky) #s(literal 6 binary64))))
#s(approx (pow (pow (sin kx) 2) 3) (pow.f64 (sin.f64 kx) #s(literal 6 binary64)))
#s(approx (pow (sin kx) 2) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))
#s(approx (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 (sin.f64 ky) #s(literal 4 binary64))) (pow.f64 (*.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal 2 binary64))))
#s(approx (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2))) (+.f64 (pow.f64 (*.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 4 binary64))))
#s(approx (* (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (*.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal 2 binary64)))
#s(approx (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
#s(approx (- (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (sin.f64 kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (fma.f64 (fma.f64 (/.f64 (sin.f64 th) (sin.f64 kx)) #s(literal -1/6 binary64) (/.f64 (*.f64 #s(literal -1/2 binary64) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))) (*.f64 ky ky) (/.f64 (sin.f64 th) (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) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) #s(literal -1/2 binary64) (fma.f64 (fma.f64 (/.f64 (sin.f64 th) (sin.f64 kx)) #s(literal 1/120 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) (sin.f64 kx)) (*.f64 (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -6 binary64)) #s(literal 3/4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64))) (sin.f64 th)) (/.f64 (*.f64 #s(literal 1/12 binary64) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))))) (*.f64 ky ky) (/.f64 (*.f64 #s(literal -1/6 binary64) (sin.f64 th)) (sin.f64 kx)))) (*.f64 ky ky) (/.f64 (sin.f64 th) (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) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) #s(literal -1/2 binary64) (fma.f64 (fma.f64 (/.f64 (sin.f64 th) (sin.f64 kx)) #s(literal 1/120 binary64) (fma.f64 #s(literal 1/12 binary64) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (sin.f64 kx)) (*.f64 (fma.f64 (/.f64 (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -6 binary64)) #s(literal 3/4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64) (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 2/45 binary64) (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -6 binary64)) #s(literal 2/3 binary64) (pow.f64 (sin.f64 kx) #s(literal -8 binary64))))) (sin.f64 th)) (fma.f64 (*.f64 #s(literal -1/12 binary64) (sin.f64 kx)) (*.f64 (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -6 binary64)) #s(literal 3/4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64))) (sin.f64 th)) (fma.f64 #s(literal -1/240 binary64) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (/.f64 (*.f64 #s(literal -1/5040 binary64) (sin.f64 th)) (sin.f64 kx))))) (*.f64 ky ky) (*.f64 (*.f64 #s(literal 1/2 binary64) (sin.f64 kx)) (*.f64 (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -6 binary64)) #s(literal 3/4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64))) (sin.f64 th)))))) (*.f64 ky ky) (/.f64 (*.f64 #s(literal -1/6 binary64) (sin.f64 th)) (sin.f64 kx)))) (*.f64 ky ky) (/.f64 (sin.f64 th) (sin.f64 kx))) ky))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (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 (sin.f64 kx) #s(literal -3 binary64)) #s(literal 1/2 binary64) (/.f64 #s(literal 1/6 binary64) (sin.f64 kx))) (pow.f64 (sin.f64 kx) #s(literal -1 binary64))) ky))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (*.f64 (fma.f64 (-.f64 (*.f64 (+.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (sin.f64 kx)) (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -6 binary64)) #s(literal 3/4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64))) (*.f64 (pow.f64 (sin.f64 kx) #s(literal -3 binary64)) #s(literal 1/12 binary64))) (/.f64 #s(literal 1/120 binary64) (sin.f64 kx))) (*.f64 ky ky)) (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -3 binary64)) #s(literal 1/2 binary64) (/.f64 #s(literal 1/6 binary64) (sin.f64 kx)))) (*.f64 ky ky) (pow.f64 (sin.f64 kx) #s(literal -1 binary64))) ky))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (*.f64 (fma.f64 (-.f64 (*.f64 (+.f64 (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -3 binary64)) #s(literal 1/12 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) (sin.f64 kx)) (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -6 binary64)) #s(literal 3/4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64))) (*.f64 (-.f64 (fma.f64 (*.f64 #s(literal -1/12 binary64) (sin.f64 kx)) (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -6 binary64)) #s(literal 3/4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64))) (*.f64 (*.f64 #s(literal -1/2 binary64) (sin.f64 kx)) (fma.f64 (/.f64 (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -6 binary64)) #s(literal 3/4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64) (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 2/45 binary64) (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -6 binary64)) #s(literal 2/3 binary64) (pow.f64 (sin.f64 kx) #s(literal -8 binary64))))))) (fma.f64 #s(literal 1/240 binary64) (pow.f64 (sin.f64 kx) #s(literal -3 binary64)) (/.f64 #s(literal 1/5040 binary64) (sin.f64 kx)))) (*.f64 ky ky)))) (/.f64 #s(literal 1/120 binary64) (sin.f64 kx))) (*.f64 ky ky)) (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -3 binary64)) #s(literal 1/2 binary64) (/.f64 #s(literal 1/6 binary64) (sin.f64 kx)))) (*.f64 ky ky) (pow.f64 (sin.f64 kx) #s(literal -1 binary64))) ky))
#s(approx (* (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2) (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2)) (sin ky)) (/.f64 ky (sin.f64 kx)))
#s(approx (* (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2) (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2)) (sin ky)) (*.f64 (fma.f64 (neg.f64 (*.f64 ky ky)) (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -3 binary64)) #s(literal 1/2 binary64) (/.f64 #s(literal 1/6 binary64) (sin.f64 kx))) (pow.f64 (sin.f64 kx) #s(literal -1 binary64))) ky))
#s(approx (* (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2) (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2)) (sin ky)) (*.f64 (fma.f64 (-.f64 (*.f64 (+.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (sin.f64 kx)) (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -6 binary64)) #s(literal 3/4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64))) (*.f64 (pow.f64 (sin.f64 kx) #s(literal -3 binary64)) #s(literal 1/12 binary64))) (/.f64 #s(literal 1/120 binary64) (sin.f64 kx))) (*.f64 ky ky)) (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -3 binary64)) #s(literal 1/2 binary64) (/.f64 #s(literal 1/6 binary64) (sin.f64 kx)))) (*.f64 ky ky) (pow.f64 (sin.f64 kx) #s(literal -1 binary64))) ky))
#s(approx (* (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2) (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2)) (sin ky)) (*.f64 (fma.f64 (-.f64 (*.f64 (+.f64 (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -3 binary64)) #s(literal 1/12 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) (sin.f64 kx)) (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -6 binary64)) #s(literal 3/4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64))) (*.f64 (-.f64 (fma.f64 (*.f64 #s(literal -1/12 binary64) (sin.f64 kx)) (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -6 binary64)) #s(literal 3/4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64))) (*.f64 (*.f64 #s(literal -1/2 binary64) (sin.f64 kx)) (fma.f64 (/.f64 (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -6 binary64)) #s(literal 3/4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64) (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 2/45 binary64) (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -6 binary64)) #s(literal 2/3 binary64) (pow.f64 (sin.f64 kx) #s(literal -8 binary64))))))) (fma.f64 #s(literal 1/240 binary64) (pow.f64 (sin.f64 kx) #s(literal -3 binary64)) (/.f64 #s(literal 1/5040 binary64) (sin.f64 kx)))) (*.f64 ky ky)))) (/.f64 #s(literal 1/120 binary64) (sin.f64 kx))) (*.f64 ky ky)) (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -3 binary64)) #s(literal 1/2 binary64) (/.f64 #s(literal 1/6 binary64) (sin.f64 kx)))) (*.f64 ky ky) (pow.f64 (sin.f64 kx) #s(literal -1 binary64))) ky))
#s(approx (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2) (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2)) (pow.f64 (sin.f64 kx) #s(literal -1 binary64)))
#s(approx (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2) (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2)) (fma.f64 (/.f64 (*.f64 ky ky) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) #s(literal -1/2 binary64) (pow.f64 (sin.f64 kx) #s(literal -1 binary64))))
#s(approx (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2) (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (*.f64 (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -6 binary64)) #s(literal 3/4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64))) (sin.f64 kx)) (*.f64 ky ky)) (pow.f64 (sin.f64 kx) #s(literal -3 binary64)))) (*.f64 ky ky) (pow.f64 (sin.f64 kx) #s(literal -1 binary64))))
#s(approx (* (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2) (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2)) (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 ky ky)) (*.f64 (fma.f64 (/.f64 (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -6 binary64)) #s(literal 3/4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64) (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 2/45 binary64) (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -6 binary64)) #s(literal 2/3 binary64) (pow.f64 (sin.f64 kx) #s(literal -8 binary64))))) (sin.f64 kx)) (*.f64 (*.f64 #s(literal 1/2 binary64) (sin.f64 kx)) (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -6 binary64)) #s(literal 3/4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64))))) (*.f64 ky ky) (*.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 kx) #s(literal -3 binary64)))) (*.f64 ky ky) (pow.f64 (sin.f64 kx) #s(literal -1 binary64))))
#s(approx (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2) (*.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal -1 binary64))) #s(literal 1 binary64)))
#s(approx (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2) (fma.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal -5 binary64))) (*.f64 ky ky)) (*.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal -1 binary64))) #s(literal 1 binary64))))
#s(approx (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2) (fma.f64 (fma.f64 (*.f64 (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 24 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64) (pow.f64 (sin.f64 kx) #s(literal -6 binary64))) (*.f64 #s(literal -12 binary64) (pow.f64 (sin.f64 kx) #s(literal -4 binary64)))) #s(literal 1/96 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/32 binary64))) (*.f64 ky ky)) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal -1 binary64)))) #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal -5 binary64))))) (*.f64 ky ky) (*.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal -1 binary64))) #s(literal 1 binary64))))
#s(approx (pow (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) -1/2) (fma.f64 (fma.f64 (*.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 24 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64) (pow.f64 (sin.f64 kx) #s(literal -6 binary64))) (*.f64 #s(literal -12 binary64) (pow.f64 (sin.f64 kx) #s(literal -4 binary64)))) #s(literal 1/96 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/32 binary64))) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal -1 binary64))) (*.f64 (*.f64 (-.f64 (fma.f64 (-.f64 (fma.f64 (*.f64 #s(literal -720 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -6 binary64)) #s(literal 2/3 binary64) (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 2/45 binary64) (pow.f64 (sin.f64 kx) #s(literal -8 binary64)))) (*.f64 (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64) (pow.f64 (sin.f64 kx) #s(literal -6 binary64))) #s(literal 720 binary64))) (*.f64 (pow.f64 (sin.f64 kx) #s(literal -6 binary64)) #s(literal 240 binary64))) #s(literal 1/2880 binary64) (*.f64 (/.f64 (fma.f64 (*.f64 #s(literal 24 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64) (pow.f64 (sin.f64 kx) #s(literal -6 binary64))) (*.f64 #s(literal -12 binary64) (pow.f64 (sin.f64 kx) #s(literal -4 binary64)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/384 binary64))) (*.f64 (pow.f64 (sin.f64 kx) #s(literal -6 binary64)) #s(literal 1/384 binary64))) (*.f64 ky ky)) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal -1 binary64)))))) (*.f64 ky ky) (*.f64 #s(literal -1/4 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal -5 binary64))))) (*.f64 ky ky) (*.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal -1 binary64))) #s(literal 1 binary64))))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (sin.f64 kx))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (fma.f64 (/.f64 (*.f64 ky ky) (sin.f64 kx)) #s(literal 1/2 binary64) (sin.f64 kx)))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (fma.f64 (fma.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -2 binary64)) #s(literal 1/4 binary64) #s(literal 1/3 binary64)) (*.f64 ky ky)) (sin.f64 kx)) #s(literal -1/2 binary64) (/.f64 #s(literal 1/2 binary64) (sin.f64 kx))) (*.f64 ky ky) (sin.f64 kx)))
#s(approx (sqrt (+ (* (sin kx) (sin kx)) (* (sin ky) (sin ky)))) (fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 ky ky) (/.f64 (-.f64 #s(literal 2/45 binary64) (/.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -2 binary64)) #s(literal 1/4 binary64) #s(literal 1/3 binary64))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))) (sin.f64 kx))) #s(literal 1/2 binary64) (/.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -2 binary64)) #s(literal 1/4 binary64) #s(literal 1/3 binary64))) (sin.f64 kx))) (*.f64 ky ky) (/.f64 #s(literal 1/2 binary64) (sin.f64 kx))) (*.f64 ky ky) (sin.f64 kx)))
#s(approx (sin ky) ky)
#s(approx (sin ky) (*.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky))
#s(approx (sin ky) (*.f64 (fma.f64 (-.f64 (*.f64 (*.f64 ky ky) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (*.f64 ky ky) #s(literal 1 binary64)) ky))
#s(approx (sin ky) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (*.f64 ky ky)) #s(literal 1/6 binary64)) (*.f64 ky ky) #s(literal 1 binary64)) ky))
#s(approx ky ky)
#s(approx (* (pow (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) -1) 1/2) (sin ky)) (/.f64 ky (sin.f64 kx)))
#s(approx (* (pow (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) -1) 1/2) (sin ky)) (*.f64 (fma.f64 (neg.f64 (*.f64 ky ky)) (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -3 binary64)) #s(literal 1/2 binary64) (/.f64 #s(literal 1/6 binary64) (sin.f64 kx))) (pow.f64 (sin.f64 kx) #s(literal -1 binary64))) ky))
#s(approx (* (pow (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) -1) 1/2) (sin ky)) (*.f64 (fma.f64 (-.f64 (*.f64 (+.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (sin.f64 kx)) (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -6 binary64)) #s(literal 3/4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64))) (*.f64 (pow.f64 (sin.f64 kx) #s(literal -3 binary64)) #s(literal 1/12 binary64))) (/.f64 #s(literal 1/120 binary64) (sin.f64 kx))) (*.f64 ky ky)) (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -3 binary64)) #s(literal 1/2 binary64) (/.f64 #s(literal 1/6 binary64) (sin.f64 kx)))) (*.f64 ky ky) (pow.f64 (sin.f64 kx) #s(literal -1 binary64))) ky))
#s(approx (* (pow (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) -1) 1/2) (sin ky)) (*.f64 (fma.f64 (-.f64 (*.f64 (+.f64 (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -3 binary64)) #s(literal 1/12 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) (sin.f64 kx)) (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -6 binary64)) #s(literal 3/4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64))) (*.f64 (-.f64 (fma.f64 (*.f64 #s(literal -1/12 binary64) (sin.f64 kx)) (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -6 binary64)) #s(literal 3/4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64))) (*.f64 (*.f64 #s(literal -1/2 binary64) (sin.f64 kx)) (fma.f64 (/.f64 (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -6 binary64)) #s(literal 3/4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64) (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 2/45 binary64) (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -6 binary64)) #s(literal 2/3 binary64) (pow.f64 (sin.f64 kx) #s(literal -8 binary64))))))) (fma.f64 #s(literal 1/240 binary64) (pow.f64 (sin.f64 kx) #s(literal -3 binary64)) (/.f64 #s(literal 1/5040 binary64) (sin.f64 kx)))) (*.f64 ky ky)))) (/.f64 #s(literal 1/120 binary64) (sin.f64 kx))) (*.f64 ky ky)) (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -3 binary64)) #s(literal 1/2 binary64) (/.f64 #s(literal 1/6 binary64) (sin.f64 kx)))) (*.f64 ky ky) (pow.f64 (sin.f64 kx) #s(literal -1 binary64))) ky))
#s(approx (pow (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) -1) 1/2) (pow.f64 (sin.f64 kx) #s(literal -1 binary64)))
#s(approx (pow (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) -1) 1/2) (fma.f64 (/.f64 (*.f64 ky ky) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) #s(literal -1/2 binary64) (pow.f64 (sin.f64 kx) #s(literal -1 binary64))))
#s(approx (pow (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) -1) 1/2) (fma.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (*.f64 (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -6 binary64)) #s(literal 3/4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64))) (sin.f64 kx)) (*.f64 ky ky)) (pow.f64 (sin.f64 kx) #s(literal -3 binary64)))) (*.f64 ky ky) (pow.f64 (sin.f64 kx) #s(literal -1 binary64))))
#s(approx (pow (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) -1) 1/2) (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 ky ky)) (*.f64 (fma.f64 (/.f64 (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -6 binary64)) #s(literal 3/4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64) (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 2/45 binary64) (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -6 binary64)) #s(literal 2/3 binary64) (pow.f64 (sin.f64 kx) #s(literal -8 binary64))))) (sin.f64 kx)) (*.f64 (*.f64 #s(literal 1/2 binary64) (sin.f64 kx)) (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -6 binary64)) #s(literal 3/4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64))))) (*.f64 ky ky) (*.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 kx) #s(literal -3 binary64)))) (*.f64 ky ky) (pow.f64 (sin.f64 kx) #s(literal -1 binary64))))
#s(approx (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) -1) (pow.f64 (sin.f64 kx) #s(literal -2 binary64)))
#s(approx (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) -1) (fma.f64 (/.f64 (*.f64 ky ky) (pow.f64 (sin.f64 kx) #s(literal 4 binary64))) #s(literal -1 binary64) (pow.f64 (sin.f64 kx) #s(literal -2 binary64))))
#s(approx (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) -1) (fma.f64 (-.f64 (*.f64 (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64) (pow.f64 (sin.f64 kx) #s(literal -6 binary64))) (*.f64 ky ky)) (pow.f64 (sin.f64 kx) #s(literal -4 binary64))) (*.f64 ky ky) (pow.f64 (sin.f64 kx) #s(literal -2 binary64))))
#s(approx (pow (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) -1) (fma.f64 (-.f64 (*.f64 (fma.f64 (neg.f64 (*.f64 ky ky)) (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 2/45 binary64) (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -6 binary64)) #s(literal 2/3 binary64) (pow.f64 (sin.f64 kx) #s(literal -8 binary64)))) (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64) (pow.f64 (sin.f64 kx) #s(literal -6 binary64)))) (*.f64 ky ky)) (pow.f64 (sin.f64 kx) #s(literal -4 binary64))) (*.f64 ky ky) (pow.f64 (sin.f64 kx) #s(literal -2 binary64))))
#s(approx (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))
#s(approx (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) (fma.f64 ky ky (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))
#s(approx (+ (* (sin kx) (sin kx)) (pow (sin ky) 2)) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))
#s(approx (+ (* (sin kx) (sin kx)) (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) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))
#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) (sqrt (- (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (sin.f64 kx)))
#s(approx (* (/ (sin ky) (sqrt (- (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))) (sin th)) (*.f64 (fma.f64 (fma.f64 (/.f64 (sin.f64 th) (sin.f64 kx)) #s(literal -1/6 binary64) (/.f64 (*.f64 #s(literal -1/2 binary64) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))) (*.f64 ky ky) (/.f64 (sin.f64 th) (sin.f64 kx))) ky))
#s(approx (* (/ (sin ky) (sqrt (- (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))) (sin th)) (*.f64 (fma.f64 (fma.f64 (/.f64 (sin.f64 th) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) #s(literal -1/2 binary64) (fma.f64 (fma.f64 (/.f64 (sin.f64 th) (sin.f64 kx)) #s(literal 1/120 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) (sin.f64 kx)) (*.f64 (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -6 binary64)) #s(literal 3/4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64))) (sin.f64 th)) (/.f64 (*.f64 #s(literal 1/12 binary64) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))))) (*.f64 ky ky) (/.f64 (*.f64 #s(literal -1/6 binary64) (sin.f64 th)) (sin.f64 kx)))) (*.f64 ky ky) (/.f64 (sin.f64 th) (sin.f64 kx))) ky))
#s(approx (* (/ (sin ky) (sqrt (- (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))) (sin th)) (*.f64 (fma.f64 (fma.f64 (/.f64 (sin.f64 th) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) #s(literal -1/2 binary64) (fma.f64 (fma.f64 (/.f64 (sin.f64 th) (sin.f64 kx)) #s(literal 1/120 binary64) (fma.f64 #s(literal 1/12 binary64) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (sin.f64 kx)) (*.f64 (fma.f64 (/.f64 (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -6 binary64)) #s(literal 3/4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64) (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 2/45 binary64) (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -6 binary64)) #s(literal 2/3 binary64) (pow.f64 (sin.f64 kx) #s(literal -8 binary64))))) (sin.f64 th)) (fma.f64 (*.f64 #s(literal -1/12 binary64) (sin.f64 kx)) (*.f64 (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -6 binary64)) #s(literal 3/4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64))) (sin.f64 th)) (fma.f64 #s(literal -1/240 binary64) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (/.f64 (*.f64 #s(literal -1/5040 binary64) (sin.f64 th)) (sin.f64 kx))))) (*.f64 ky ky) (*.f64 (*.f64 #s(literal 1/2 binary64) (sin.f64 kx)) (*.f64 (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -6 binary64)) #s(literal 3/4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64))) (sin.f64 th)))))) (*.f64 ky ky) (/.f64 (*.f64 #s(literal -1/6 binary64) (sin.f64 th)) (sin.f64 kx)))) (*.f64 ky ky) (/.f64 (sin.f64 th) (sin.f64 kx))) ky))
#s(approx (/ (sin ky) (sqrt (- (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))) (/.f64 ky (sin.f64 kx)))
#s(approx (/ (sin ky) (sqrt (- (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))) (*.f64 (fma.f64 (neg.f64 (*.f64 ky ky)) (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -3 binary64)) #s(literal 1/2 binary64) (/.f64 #s(literal 1/6 binary64) (sin.f64 kx))) (pow.f64 (sin.f64 kx) #s(literal -1 binary64))) ky))
#s(approx (/ (sin ky) (sqrt (- (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))) (*.f64 (fma.f64 (-.f64 (*.f64 (+.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (sin.f64 kx)) (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -6 binary64)) #s(literal 3/4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64))) (*.f64 (pow.f64 (sin.f64 kx) #s(literal -3 binary64)) #s(literal 1/12 binary64))) (/.f64 #s(literal 1/120 binary64) (sin.f64 kx))) (*.f64 ky ky)) (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -3 binary64)) #s(literal 1/2 binary64) (/.f64 #s(literal 1/6 binary64) (sin.f64 kx)))) (*.f64 ky ky) (pow.f64 (sin.f64 kx) #s(literal -1 binary64))) ky))
#s(approx (/ (sin ky) (sqrt (- (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))) (*.f64 (fma.f64 (-.f64 (*.f64 (+.f64 (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -3 binary64)) #s(literal 1/12 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) (sin.f64 kx)) (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -6 binary64)) #s(literal 3/4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64))) (*.f64 (-.f64 (fma.f64 (*.f64 #s(literal -1/12 binary64) (sin.f64 kx)) (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -6 binary64)) #s(literal 3/4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64))) (*.f64 (*.f64 #s(literal -1/2 binary64) (sin.f64 kx)) (fma.f64 (/.f64 (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -6 binary64)) #s(literal 3/4 binary64) (*.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64) (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 2/45 binary64) (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -6 binary64)) #s(literal 2/3 binary64) (pow.f64 (sin.f64 kx) #s(literal -8 binary64))))))) (fma.f64 #s(literal 1/240 binary64) (pow.f64 (sin.f64 kx) #s(literal -3 binary64)) (/.f64 #s(literal 1/5040 binary64) (sin.f64 kx)))) (*.f64 ky ky)))) (/.f64 #s(literal 1/120 binary64) (sin.f64 kx))) (*.f64 ky ky)) (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -3 binary64)) #s(literal 1/2 binary64) (/.f64 #s(literal 1/6 binary64) (sin.f64 kx)))) (*.f64 ky ky) (pow.f64 (sin.f64 kx) #s(literal -1 binary64))) ky))
#s(approx (sqrt (- (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))))) (sin.f64 kx))
#s(approx (sqrt (- (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))))) (fma.f64 (/.f64 (*.f64 ky ky) (sin.f64 kx)) #s(literal 1/2 binary64) (sin.f64 kx)))
#s(approx (sqrt (- (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))))) (fma.f64 (fma.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -2 binary64)) #s(literal 1/4 binary64) #s(literal 1/3 binary64)) (*.f64 ky ky)) (sin.f64 kx)) #s(literal -1/2 binary64) (/.f64 #s(literal 1/2 binary64) (sin.f64 kx))) (*.f64 ky ky) (sin.f64 kx)))
#s(approx (sqrt (- (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))))) (fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 ky ky) (/.f64 (-.f64 #s(literal 2/45 binary64) (/.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -2 binary64)) #s(literal 1/4 binary64) #s(literal 1/3 binary64))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))) (sin.f64 kx))) #s(literal 1/2 binary64) (/.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -2 binary64)) #s(literal 1/4 binary64) #s(literal 1/3 binary64))) (sin.f64 kx))) (*.f64 ky ky) (/.f64 #s(literal 1/2 binary64) (sin.f64 kx))) (*.f64 ky ky) (sin.f64 kx)))
#s(approx (- (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))
#s(approx (- (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 ky ky (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))
#s(approx (- (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (/ (pow (sin ky) 4) (- (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) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))
#s(approx (- (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (/ (pow (sin ky) 4) (- (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) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))
#s(approx (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))
#s(approx (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (fma.f64 ky ky (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))
#s(approx (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (fma.f64 (fma.f64 (-.f64 (pow.f64 (sin.f64 kx) #s(literal -2 binary64)) #s(literal 1/3 binary64)) (*.f64 ky ky) #s(literal 1 binary64)) (*.f64 ky ky) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))
#s(approx (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (fma.f64 (fma.f64 (fma.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 2/45 binary64)) (*.f64 (pow.f64 (sin.f64 kx) #s(literal -2 binary64)) #s(literal 2/3 binary64))) (*.f64 ky ky) (-.f64 (pow.f64 (sin.f64 kx) #s(literal -2 binary64)) #s(literal 1/3 binary64))) (*.f64 ky ky) #s(literal 1 binary64)) (*.f64 ky ky) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))
#s(approx (- (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))
#s(approx (- (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 (*.f64 ky ky) #s(literal -1 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))
#s(approx (- (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 (-.f64 (*.f64 (*.f64 ky ky) #s(literal 1/3 binary64)) #s(literal 1 binary64)) (*.f64 ky ky) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))
#s(approx (- (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 (-.f64 (*.f64 (fma.f64 (-.f64 (-.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal -2 binary64)) #s(literal 1/3 binary64)) #s(literal 2/45 binary64)) (fma.f64 (/.f64 (fma.f64 #s(literal -1/3 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(literal 1 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 binary64))) #s(literal -1 binary64) (pow.f64 (sin.f64 kx) #s(literal -4 binary64)))) (*.f64 ky ky) #s(literal 1/3 binary64)) (*.f64 ky ky)) #s(literal 1 binary64)) (*.f64 ky ky) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))
#s(approx (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (pow.f64 (sin.f64 kx) #s(literal 6 binary64)))
#s(approx (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (fma.f64 (pow.f64 ky #s(literal 6 binary64)) #s(literal -1 binary64) (pow.f64 (sin.f64 kx) #s(literal 6 binary64))))
#s(approx (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (fma.f64 (-.f64 (*.f64 ky ky) #s(literal 1 binary64)) (pow.f64 ky #s(literal 6 binary64)) (pow.f64 (sin.f64 kx) #s(literal 6 binary64))))
#s(approx (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -7/15 binary64) (*.f64 ky ky) #s(literal 1 binary64)) (*.f64 ky ky)) #s(literal 1 binary64)) (pow.f64 ky #s(literal 6 binary64)) (pow.f64 (sin.f64 kx) #s(literal 6 binary64))))
#s(approx (pow (pow (sin ky) 2) 3) (pow.f64 ky #s(literal 6 binary64)))
#s(approx (pow (pow (sin ky) 2) 3) (*.f64 (fma.f64 (*.f64 ky ky) #s(literal -1 binary64) #s(literal 1 binary64)) (pow.f64 ky #s(literal 6 binary64))))
#s(approx (pow (pow (sin ky) 2) 3) (*.f64 (fma.f64 (-.f64 (*.f64 (*.f64 ky ky) #s(literal 7/15 binary64)) #s(literal 1 binary64)) (*.f64 ky ky) #s(literal 1 binary64)) (pow.f64 ky #s(literal 6 binary64))))
#s(approx (pow (pow (sin ky) 2) 3) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 ky ky) #s(literal -128/945 binary64) #s(literal 7/15 binary64)) (*.f64 ky ky)) #s(literal 1 binary64)) (*.f64 ky ky) #s(literal 1 binary64)) (pow.f64 ky #s(literal 6 binary64))))
#s(approx (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))) (pow.f64 (sin.f64 kx) #s(literal 4 binary64)))
#s(approx (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 (pow.f64 (*.f64 ky (sin.f64 kx)) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 binary64))))
#s(approx (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/3 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 ky ky) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 ky ky) (pow.f64 (sin.f64 kx) #s(literal 4 binary64))))
#s(approx (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 (fma.f64 (+.f64 (fma.f64 #s(literal -1/3 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (-.f64 (*.f64 #s(literal 2/45 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2/3 binary64)) (*.f64 ky ky))) (*.f64 ky ky) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 ky ky) (pow.f64 (sin.f64 kx) #s(literal 4 binary64))))
#s(approx (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2))) (pow.f64 (*.f64 ky (sin.f64 kx)) #s(literal 2 binary64)))
#s(approx (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2))) (*.f64 (fma.f64 (fma.f64 #s(literal -1/3 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 ky ky) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 ky ky)))
#s(approx (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2))) (*.f64 (fma.f64 (+.f64 (fma.f64 #s(literal -1/3 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (-.f64 (*.f64 #s(literal 2/45 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 2/3 binary64)) (*.f64 ky ky))) (*.f64 ky ky) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 ky ky)))
#s(approx (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2))) (*.f64 (fma.f64 (+.f64 (fma.f64 (-.f64 (fma.f64 (fma.f64 #s(literal -1/315 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(literal 1/5 binary64)) (*.f64 ky ky) (*.f64 #s(literal 2/45 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))) #s(literal 2/3 binary64)) (*.f64 ky ky) (*.f64 #s(literal -1/3 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))) #s(literal 1 binary64)) (*.f64 ky ky) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 ky ky)))
#s(approx (pow (sin ky) 4) (pow.f64 ky #s(literal 4 binary64)))
#s(approx (pow (sin ky) 4) (*.f64 (fma.f64 (*.f64 ky ky) #s(literal -2/3 binary64) #s(literal 1 binary64)) (pow.f64 ky #s(literal 4 binary64))))
#s(approx (pow (sin ky) 4) (*.f64 (fma.f64 (-.f64 (*.f64 (*.f64 ky ky) #s(literal 1/5 binary64)) #s(literal 2/3 binary64)) (*.f64 ky ky) #s(literal 1 binary64)) (pow.f64 ky #s(literal 4 binary64))))
#s(approx (pow (sin ky) 4) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 ky ky) #s(literal -34/945 binary64) #s(literal 1/5 binary64)) (*.f64 ky ky)) #s(literal 2/3 binary64)) (*.f64 ky ky) #s(literal 1 binary64)) (pow.f64 ky #s(literal 4 binary64))))
#s(approx (* (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (*.f64 ky (sin.f64 kx)) #s(literal 2 binary64)))
#s(approx (* (pow (sin kx) 2) (pow (sin ky) 2)) (*.f64 (fma.f64 (pow.f64 (*.f64 ky (sin.f64 kx)) #s(literal 2 binary64)) #s(literal -1/3 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 ky ky)))
#s(approx (* (pow (sin kx) 2) (pow (sin ky) 2)) (*.f64 (fma.f64 (fma.f64 (pow.f64 (*.f64 ky (sin.f64 kx)) #s(literal 2 binary64)) #s(literal 2/45 binary64) (*.f64 #s(literal -1/3 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))) (*.f64 ky ky) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 ky ky)))
#s(approx (* (pow (sin kx) 2) (pow (sin ky) 2)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (pow.f64 (*.f64 ky (sin.f64 kx)) #s(literal 2 binary64)) #s(literal -1/315 binary64) (*.f64 #s(literal 2/45 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))) (*.f64 ky ky) (*.f64 #s(literal -1/3 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))) (*.f64 ky ky) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 ky ky)))
#s(approx (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (/.f64 (pow.f64 ky #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))
#s(approx (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (*.f64 (fma.f64 (-.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) (*.f64 (pow.f64 (sin.f64 kx) #s(literal -2 binary64)) #s(literal 2/3 binary64))) (*.f64 ky ky) (pow.f64 (sin.f64 kx) #s(literal -2 binary64))) (pow.f64 ky #s(literal 4 binary64))))
#s(approx (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (*.f64 (fma.f64 (fma.f64 (-.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal -2 binary64)) #s(literal 1/5 binary64)) (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64) (neg.f64 (/.f64 (-.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) (*.f64 (pow.f64 (sin.f64 kx) #s(literal -2 binary64)) #s(literal 2/3 binary64))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))) (*.f64 ky ky) (-.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) (*.f64 (pow.f64 (sin.f64 kx) #s(literal -2 binary64)) #s(literal 2/3 binary64)))) (*.f64 ky ky) (pow.f64 (sin.f64 kx) #s(literal -2 binary64))) (pow.f64 ky #s(literal 4 binary64))))
#s(approx (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2))) (*.f64 (fma.f64 (fma.f64 (-.f64 (fma.f64 (-.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 2/45 binary64)) (fma.f64 (/.f64 (-.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal -2 binary64)) #s(literal 1/5 binary64)) (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64) (neg.f64 (/.f64 (-.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) (*.f64 (pow.f64 (sin.f64 kx) #s(literal -2 binary64)) #s(literal 2/3 binary64))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1 binary64) (fma.f64 (/.f64 (-.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) (*.f64 (pow.f64 (sin.f64 kx) #s(literal -2 binary64)) #s(literal 2/3 binary64))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 1/3 binary64) (*.f64 #s(literal 34/945 binary64) (pow.f64 (sin.f64 kx) #s(literal -2 binary64)))))) (*.f64 ky ky) (*.f64 (pow.f64 (sin.f64 kx) #s(literal -2 binary64)) #s(literal 1/5 binary64))) (fma.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64) (neg.f64 (/.f64 (-.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) (*.f64 (pow.f64 (sin.f64 kx) #s(literal -2 binary64)) #s(literal 2/3 binary64))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))) (*.f64 ky ky) (-.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) (*.f64 (pow.f64 (sin.f64 kx) #s(literal -2 binary64)) #s(literal 2/3 binary64)))) (*.f64 ky ky) (pow.f64 (sin.f64 kx) #s(literal -2 binary64))) (pow.f64 ky #s(literal 4 binary64))))
#s(approx (- (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))
#s(approx (- (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 (*.f64 ky ky) #s(literal -1 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))
#s(approx (- (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 (-.f64 (*.f64 (*.f64 ky ky) #s(literal 1/3 binary64)) #s(literal 1 binary64)) (*.f64 ky ky) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))
#s(approx (- (pow (sin kx) 2) (pow (sin ky) 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) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))
#s(approx (sin ky) (sin.f64 ky))
#s(approx (pow (sin ky) 2) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))
#s(approx (pow (pow (sin ky) 2) 3) (pow.f64 (sin.f64 ky) #s(literal 6 binary64)))
#s(approx (pow (sin ky) 4) (pow.f64 (sin.f64 ky) #s(literal 4 binary64)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (*.f64 th (sin.f64 ky)) (/.f64 #s(literal 1 binary64) (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 #s(literal -1/6 binary64) (*.f64 (*.f64 th th) (sin.f64 ky))) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (*.f64 (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (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 #s(literal 1/120 binary64) (*.f64 (*.f64 th th) (sin.f64 ky))) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (*.f64 (*.f64 #s(literal -1/6 binary64) (sin.f64 ky)) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))) (*.f64 th th) (*.f64 (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (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 #s(literal -1/5040 binary64) (*.f64 (*.f64 th th) (sin.f64 ky))) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (*.f64 (*.f64 #s(literal 1/120 binary64) (sin.f64 ky)) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))) (*.f64 th th) (*.f64 (*.f64 #s(literal -1/6 binary64) (sin.f64 ky)) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))) (*.f64 th th) (*.f64 (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (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 th th)
#s(approx (* (/ (sin ky) (sqrt (- (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))) (sin th)) (*.f64 (*.f64 th (sin.f64 ky)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (/.f64 (*.f64 (+.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 (sin.f64 ky) #s(literal 4 binary64))) (pow.f64 (*.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal 2 binary64))) (pow.f64 (sin.f64 kx) #s(literal 4 binary64))) (-.f64 (pow.f64 (sin.f64 kx) #s(literal 6 binary64)) (pow.f64 (sin.f64 ky) #s(literal 6 binary64)))) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))))))
#s(approx (* (/ (sin ky) (sqrt (- (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))) (sin th)) (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 th th) (sin.f64 ky))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (/.f64 (*.f64 (+.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 (sin.f64 ky) #s(literal 4 binary64))) (pow.f64 (*.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal 2 binary64))) (pow.f64 (sin.f64 kx) #s(literal 4 binary64))) (-.f64 (pow.f64 (sin.f64 kx) #s(literal 6 binary64)) (pow.f64 (sin.f64 ky) #s(literal 6 binary64)))) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (/.f64 (*.f64 (+.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 (sin.f64 ky) #s(literal 4 binary64))) (pow.f64 (*.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal 2 binary64))) (pow.f64 (sin.f64 kx) #s(literal 4 binary64))) (-.f64 (pow.f64 (sin.f64 kx) #s(literal 6 binary64)) (pow.f64 (sin.f64 ky) #s(literal 6 binary64)))) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) (sin.f64 ky))) th))
#s(approx (* (/ (sin ky) (sqrt (- (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))) (sin th)) (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/120 binary64) (*.f64 (*.f64 th th) (sin.f64 ky))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (/.f64 (*.f64 (+.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 (sin.f64 ky) #s(literal 4 binary64))) (pow.f64 (*.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal 2 binary64))) (pow.f64 (sin.f64 kx) #s(literal 4 binary64))) (-.f64 (pow.f64 (sin.f64 kx) #s(literal 6 binary64)) (pow.f64 (sin.f64 ky) #s(literal 6 binary64)))) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) (*.f64 (*.f64 #s(literal -1/6 binary64) (sin.f64 ky)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (/.f64 (*.f64 (+.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 (sin.f64 ky) #s(literal 4 binary64))) (pow.f64 (*.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal 2 binary64))) (pow.f64 (sin.f64 kx) #s(literal 4 binary64))) (-.f64 (pow.f64 (sin.f64 kx) #s(literal 6 binary64)) (pow.f64 (sin.f64 ky) #s(literal 6 binary64)))) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))) (*.f64 th th) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (/.f64 (*.f64 (+.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 (sin.f64 ky) #s(literal 4 binary64))) (pow.f64 (*.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal 2 binary64))) (pow.f64 (sin.f64 kx) #s(literal 4 binary64))) (-.f64 (pow.f64 (sin.f64 kx) #s(literal 6 binary64)) (pow.f64 (sin.f64 ky) #s(literal 6 binary64)))) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) (sin.f64 ky))) th))
#s(approx (* (/ (sin ky) (sqrt (- (/ (pow (sin kx) 4) (/ (- (pow (pow (sin kx) 2) 3) (pow (pow (sin ky) 2) 3)) (+ (pow (sin kx) 4) (+ (pow (sin ky) 4) (* (pow (sin kx) 2) (pow (sin ky) 2)))))) (/ (pow (sin ky) 4) (- (pow (sin kx) 2) (pow (sin ky) 2)))))) (sin th)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/5040 binary64) (*.f64 (*.f64 th th) (sin.f64 ky))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (/.f64 (*.f64 (+.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 (sin.f64 ky) #s(literal 4 binary64))) (pow.f64 (*.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal 2 binary64))) (pow.f64 (sin.f64 kx) #s(literal 4 binary64))) (-.f64 (pow.f64 (sin.f64 kx) #s(literal 6 binary64)) (pow.f64 (sin.f64 ky) #s(literal 6 binary64)))) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) (*.f64 (*.f64 #s(literal 1/120 binary64) (sin.f64 ky)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (/.f64 (*.f64 (+.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 (sin.f64 ky) #s(literal 4 binary64))) (pow.f64 (*.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal 2 binary64))) (pow.f64 (sin.f64 kx) #s(literal 4 binary64))) (-.f64 (pow.f64 (sin.f64 kx) #s(literal 6 binary64)) (pow.f64 (sin.f64 ky) #s(literal 6 binary64)))) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))) (*.f64 th th) (*.f64 (*.f64 #s(literal -1/6 binary64) (sin.f64 ky)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (/.f64 (*.f64 (+.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 (sin.f64 ky) #s(literal 4 binary64))) (pow.f64 (*.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal 2 binary64))) (pow.f64 (sin.f64 kx) #s(literal 4 binary64))) (-.f64 (pow.f64 (sin.f64 kx) #s(literal 6 binary64)) (pow.f64 (sin.f64 ky) #s(literal 6 binary64)))) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))) (*.f64 th th) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (/.f64 (*.f64 (+.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 (sin.f64 ky) #s(literal 4 binary64))) (pow.f64 (*.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal 2 binary64))) (pow.f64 (sin.f64 kx) #s(literal 4 binary64))) (-.f64 (pow.f64 (sin.f64 kx) #s(literal 6 binary64)) (pow.f64 (sin.f64 ky) #s(literal 6 binary64)))) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) (sin.f64 ky))) th))
#s(approx (sin th) (sin.f64 th))

eval114.0ms (1.1%)

Memory
16.5MiB live, 253.0MiB allocated; 15ms collecting garbage
Compiler

Compiled 46 451 to 4 563 computations (90.2% saved)

prune2.9s (28.1%)

Memory
-37.9MiB live, 3 572.7MiB allocated; 187ms collecting garbage
Pruning

10 alts after pruning (0 fresh and 10 done)

PrunedKeptTotal
New7540754
Fresh000
Picked033
Done077
Total75410764
Accuracy
100.0%
Counts
764 → 10
Alt Table
Click to see full alt table
StatusAccuracyProgram
94.5%
(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))
81.3%
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (/.f64 (-.f64 (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (pow.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)) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) (sin.f64 th))
82.5%
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (/.f64 (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx))) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
92.3%
(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (*.f64 (pow.f64 (pow.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal -1 binary64)) #s(literal 1/2 binary64)) (sin.f64 ky))) (sin.f64 th))
99.6%
(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (*.f64 (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)) (sin.f64 ky))) (sin.f64 th))
97.5%
(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (*.f64 (+.f64 (cosh.f64 (*.f64 (log.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky))) #s(literal -1 binary64))) (sinh.f64 (*.f64 (log.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky))) #s(literal -1 binary64)))) (sin.f64 ky))) (sin.f64 th))
99.2%
(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (*.f64 (*.f64 (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1/2 binary64)) (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1/2 binary64))) (sin.f64 ky))) (sin.f64 th))
23.3%
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (/.f64 (*.f64 (*.f64 kx kx) (sin.f64 th)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal -1/2 binary64) (sin.f64 th)))
89.5%
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (pow.f64 (pow.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 1/2 binary64)) #s(literal -1 binary64)) (*.f64 (sin.f64 th) (sin.f64 ky))))
99.4%
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (*.f64 (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)) (sin.f64 th)) (sin.f64 ky)))
Compiler

Compiled 894 to 355 computations (60.3% saved)

regimes46.0ms (0.4%)

Memory
32.5MiB live, 79.4MiB allocated; 2ms collecting garbage
Counts
18 → 1
Calls
Call 1
Inputs
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (*.f64 (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)) (sin.f64 th)) (sin.f64 ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)) (*.f64 (sin.f64 th) (sin.f64 ky))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (pow.f64 (pow.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 1/2 binary64)) #s(literal -1 binary64)) (*.f64 (sin.f64 th) (sin.f64 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) (sin.f64 kx)) #s(literal -1/6 binary64) (/.f64 (*.f64 #s(literal -1/2 binary64) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))) (*.f64 ky ky) (/.f64 (sin.f64 th) (sin.f64 kx))) ky))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (/.f64 (*.f64 (*.f64 kx kx) (sin.f64 th)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal -1/2 binary64) (sin.f64 th)))
(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (*.f64 (*.f64 (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1/2 binary64)) (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1/2 binary64))) (sin.f64 ky))) (sin.f64 th))
(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (*.f64 (+.f64 (cosh.f64 (*.f64 (log.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky))) #s(literal -1 binary64))) (sinh.f64 (*.f64 (log.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky))) #s(literal -1 binary64)))) (sin.f64 ky))) (sin.f64 th))
(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (*.f64 (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)) (sin.f64 ky))) (sin.f64 th))
(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (*.f64 (pow.f64 (pow.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal -1 binary64)) #s(literal 1/2 binary64)) (sin.f64 ky))) (sin.f64 th))
(*.f64 (/.f64 #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)) (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) (exp.f64 (*.f64 (log.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #s(literal 1/2 binary64)))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (/.f64 (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx 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 (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 (/.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (-.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 (/.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (/.f64 (-.f64 (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (pow.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)) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (-.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) (/.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 (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) (/.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))
(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))
Outputs
(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (*.f64 (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)) (sin.f64 ky))) (sin.f64 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))
5.0ms
ky
5.0ms
kx
5.0ms
th
5.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 42 to 51 computations (-21.4% saved)

regimes54.0ms (0.5%)

Memory
-12.2MiB live, 36.4MiB allocated; 2ms collecting garbage
Accuracy

Total -62.8b remaining (-16429.7%)

Threshold costs -62.8b (-16429.7%)

Counts
7 → 1
Calls
Call 1
Inputs
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (*.f64 (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)) (sin.f64 th)) (sin.f64 ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)) (*.f64 (sin.f64 th) (sin.f64 ky))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (pow.f64 (pow.f64 (fma.f64 (sin.f64 kx) (sin.f64 kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 1/2 binary64)) #s(literal -1 binary64)) (*.f64 (sin.f64 th) (sin.f64 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) (sin.f64 kx)) #s(literal -1/6 binary64) (/.f64 (*.f64 #s(literal -1/2 binary64) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))) (*.f64 ky ky) (/.f64 (sin.f64 th) (sin.f64 kx))) ky))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (fma.f64 (/.f64 (*.f64 (*.f64 kx kx) (sin.f64 th)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal -1/2 binary64) (sin.f64 th)))
(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (*.f64 (*.f64 (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1/2 binary64)) (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1/2 binary64))) (sin.f64 ky))) (sin.f64 th))
(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (*.f64 (+.f64 (cosh.f64 (*.f64 (log.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky))) #s(literal -1 binary64))) (sinh.f64 (*.f64 (log.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky))) #s(literal -1 binary64)))) (sin.f64 ky))) (sin.f64 th))
Outputs
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (*.f64 (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)) (sin.f64 th)) (sin.f64 ky)))
Calls

9 calls:

34.0ms
ky
2.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))
2.0ms
(sin.f64 ky)
2.0ms
kx
2.0ms
(sin.f64 kx)
Results
AccuracySegmentsBranch
99.4%1(sin.f64 th)
99.4%1(sin.f64 kx)
99.4%1(pow.f64 (sin.f64 kx) #s(literal 2 binary64))
99.4%1(sin.f64 ky)
99.4%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.4%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.4%1kx
99.4%1ky
99.4%1th
Compiler

Compiled 42 to 51 computations (-21.4% saved)

simplify47.0ms (0.5%)

Memory
-4.8MiB live, 42.9MiB allocated; 1ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
02557
13357
25657
311757
425457
583957
6501557
Stop Event
node limit
Calls
Call 1
Inputs
(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (*.f64 (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)) (sin.f64 ky))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (*.f64 (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)) (sin.f64 th)) (sin.f64 ky)))
Outputs
(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (*.f64 (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)) (sin.f64 ky))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 (*.f64 (pow.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal -1 binary64)) (sin.f64 th)) (sin.f64 ky)))

derivations81.0ms (0.8%)

Memory
10.0MiB live, 103.2MiB allocated; 3ms collecting garbage
Stop Event
done
Compiler

Compiled 57 to 25 computations (56.1% saved)

preprocess39.0ms (0.4%)

Memory
14.1MiB live, 63.1MiB allocated; 4ms collecting garbage
Remove

(negabs th)

(negabs ky)

(abs kx)

Compiler

Compiled 308 to 196 computations (36.4% saved)

end0.0ms (0%)

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

Profiling

Loading profile data...