Metrics for Toniolo and Linder, Equation (3b), real

start0.0ms (0%)

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

analyze219.0ms (3%)

Memory

22.8MiB live, 255.6MiB allocated; 46ms collecting garbage

Algorithm

1×

Search

Probability	Valid	Unknown	Precondition	Infinite	Domain	Can't	Iter
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)

sample2.0s (27.3%)

Memory

32.4MiB live, 2 208.3MiB allocated; 356ms collecting garbage

Samples

1.6s

8 256×

valid

Precisions

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

ival-sin: 808.0ms (66.3% of total)

ival-pow2: 167.0ms (13.7% of total)

ival-add: 76.0ms (6.2% of total)

ival-mult: 57.0ms (4.7% of total)

ival-sqrt: 54.0ms (4.4% of total)

ival-div: 49.0ms (4% of total)

adjust: 3.0ms (0.2% of total)

ival-assert: 3.0ms (0.2% of total)

Bogosity

explain286.0ms (3.9%)

Memory

-36.5MiB live, 330.4MiB allocated; 94ms collecting garbage

FPErrors

Click to see full error table

Ground Truth	Example	Underpredictions	Example	Subexpression
18	-	3	(-1.0466045081875936e-164 -1.36979880148746e-158 2.8010956411159164e+45)	`(sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))`
0	-	0	-	`(+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))`
0	-	0	-	`(pow.f64 (sin.f64 ky) #s(literal 2 binary64))`
0	-	0	-	`(sin.f64 kx)`
0	-	0	-	`(sin.f64 th)`
0	-	0	-	`(pow.f64 (sin.f64 kx) #s(literal 2 binary64))`
0	-	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)))))`
0	-	0	-	`th`
0	-	0	-	`#s(literal 2 binary64)`
0	-	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))`
0	-	0	-	`(sin.f64 ky)`
0	-	0	-	`ky`
0	-	0	-	`kx`

Explanations

Click to see full explanations table

Operator	Subexpression	Explanation	Count
`sqrt.f64`	`(sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))`	uflow-rescue	15	0
↳	`(pow.f64 (sin.f64 kx) #s(literal 2 binary64))`	underflow	58
↳	`(pow.f64 (sin.f64 ky) #s(literal 2 binary64))`	underflow	61
↳	`(+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))`	underflow	15

Confusion

	Predicted +	Predicted -
+	15	2
-	0	239

Precision

1.0

Recall

0.8823529411764706

Confusion?

	Predicted +	Predicted Maybe	Predicted -
+	15	0	2
-	0	0	239

Precision?

1.0

Recall?

0.8823529411764706

Freqs

test

number	freq
0	241
1	15

Total Confusion?

	Predicted +	Predicted Maybe	Predicted -
+	1	0	0
-	0	0	0

Precision?

1.0

Recall?

1.0

Samples

140.0ms

512×

valid

Compiler

Compiled 152 to 43 computations (71.7% saved)

Precisions

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

ival-sin: 53.0ms (44.5% of total)

ival-pow2: 53.0ms (44.5% of total)

ival-div: 3.0ms (2.5% of total)

ival-mult: 3.0ms (2.5% of total)

ival-sqrt: 3.0ms (2.5% of total)

ival-add: 2.0ms (1.7% 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)

preprocess182.0ms (2.5%)

Memory

13.2MiB live, 206.5MiB allocated; 20ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	46	166
1	92	163
2	224	163
3	435	163
4	959	163
5	3019	163
0	13	16
0	22	16
1	30	16
2	53	16
3	113	16
4	238	16
5	585	16
6	2343	16
7	7580	16
0	8120	16

Stop Event

1×	iter limit
1×	node limit
1×	iter limit
1×	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 (*.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))

Symmetry

(abs kx)

(negabs ky)

(negabs th)

Compiler

Compiled 16 to 13 computations (18.8% saved)

eval0.0ms (0%)

Memory: 0.2MiB live, 0.2MiB allocated; 0ms collecting garbage
Compiler: Compiled 0 to 3 computations (-∞% saved)

prune1.0ms (0%)

Memory

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

Alt Table

Click to see full alt table

Status	Accuracy	Program
▶	93.6%	(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))

Compiler

Compiled 16 to 13 computations (18.8% saved)

series36.0ms (0.5%)

Memory

-25.5MiB live, 67.2MiB allocated; 5ms 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:

Time	Variable		Point	Expression
6.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)
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)
5.0ms	ky	@	0	((* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin ky) ky (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow (sin kx) 2) (sin kx) kx 2 (pow (sin ky) 2) (sin th) th)
4.0ms	kx	@	-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)

rewrite213.0ms (2.9%)

Memory

15.3MiB live, 301.5MiB allocated; 23ms collecting garbage

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	432	2436
0	448	2305
1	2695	2273
0	11452	2273

Stop Event

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

Counts

81 → 124

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) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 th))
(/.f64 (neg.f64 (*.f64 (sin.f64 th) (sin.f64 ky))) (neg.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))))
(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (neg.f64 (sin.f64 ky))) (neg.f64 (neg.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))))
(/.f64 (neg.f64 (sin.f64 ky)) (neg.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))))
(/.f64 (sin.f64 ky) (sqrt.f64 (+.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 1 binary64))
(sin.f64 ky)
(exp.f64 (*.f64 (log.f64 (sin.f64 ky)) #s(literal 1 binary64)))
ky
(pow.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))) #s(literal 1 binary64))
(pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #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 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 6 binary64)) (pow.f64 (sin.f64 ky) #s(literal 6 binary64)))) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (*.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal 2 binary64))))))
(/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64)))
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))
(exp.f64 (*.f64 (log.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #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)))))
(-.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)) (-.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 (.f64 (+.f64 (.f64 (.f64 (pow.f64 (.f64 kx (sin.f64 ky)) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 1/3 binary64)) (.f64 #s(literal -3/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 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)) (+.f64 (.f64 (+.f64 (.f64 (-.f64 (.f64 (.f64 (pow.f64 (.f64 kx (sin.f64 ky)) #s(literal 2 binary64)) (.f64 (+.f64 (+.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal -8 binary64)) (.f64 #s(literal 2/3 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 binary64)))) (.f64 #s(literal 2/45 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)))) (.f64 (/.f64 (-.f64 (.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 1/3 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))) #s(literal -1/2 binary64))) (sin.f64 th))) #s(literal -1/2 binary64)) (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (-.f64 (.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 1/3 binary64)) (.f64 #s(literal -3/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 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) (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 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 1 binary64)))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (pow.f64 (.f64 kx (sin.f64 ky)) #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 1/3 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)))) (*.f64 kx kx)) #s(literal 1 binary64)))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 (.f64 (-.f64 (.f64 (-.f64 (.f64 (.f64 (pow.f64 (.f64 kx (sin.f64 ky)) #s(literal 2 binary64)) (+.f64 (+.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal -8 binary64)) (.f64 #s(literal 2/3 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 binary64)))) (.f64 #s(literal 2/45 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)))) (.f64 (/.f64 (-.f64 (.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 1/3 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))) #s(literal -1/2 binary64)))) #s(literal -1/2 binary64)) (.f64 #s(literal -1/2 binary64) (.f64 (-.f64 (.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 1/3 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))))) (.f64 kx kx)) (.f64 (pow.f64 (sin.f64 ky) #s(literal -2 binary64)) #s(literal 1/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))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 kx kx)) (sin.f64 ky)) (sin.f64 ky)))
#s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+.f64 (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (.f64 (+.f64 (.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)) (.f64 kx kx)) (sin.f64 ky)))
#s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+.f64 (.f64 (+.f64 (.f64 (/.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (-.f64 #s(literal 2/45 binary64) (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.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) (+.f64 (.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)) (+.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 (+.f64 (.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 (+.f64 (.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 (+.f64 (.f64 #s(literal -1/3 binary64) (.f64 kx kx)) #s(literal 1 binary64)) (.f64 kx kx)))
#s(approx (pow (sin kx) 2) (.f64 (+.f64 (.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 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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 (+.f64 (.f64 #s(literal -1/6 binary64) (*.f64 kx kx)) #s(literal 1 binary64)) kx))
#s(approx (sin kx) (.f64 (+.f64 (.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 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (.f64 (sin.f64 th) (sin.f64 ky))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (*.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (sin.f64 ky)))
#s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #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 (+.f64 (.f64 (+.f64 (/.f64 (.f64 #s(literal -1/6 binary64) (sin.f64 th)) (sin.f64 kx)) (/.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 (+.f64 (.f64 (+.f64 (+.f64 (/.f64 (.f64 #s(literal -1/6 binary64) (sin.f64 th)) (sin.f64 kx)) (/.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))) (.f64 (+.f64 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 kx)) (.f64 (-.f64 (.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64)) (.f64 #s(literal -3/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -6 binary64)))) (sin.f64 th))) (/.f64 (.f64 #s(literal 1/12 binary64) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal 1/120 binary64) (sin.f64 th)) (sin.f64 kx))) (.f64 ky ky))) (.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 (+.f64 (.f64 (+.f64 (+.f64 (/.f64 (.f64 #s(literal -1/6 binary64) (sin.f64 th)) (sin.f64 kx)) (/.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))) (.f64 (+.f64 (+.f64 (/.f64 (.f64 #s(literal 1/120 binary64) (sin.f64 th)) (sin.f64 kx)) (/.f64 (.f64 #s(literal 1/12 binary64) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))) (+.f64 (.f64 (+.f64 (+.f64 (+.f64 (/.f64 (.f64 #s(literal -1/5040 binary64) (sin.f64 th)) (sin.f64 kx)) (/.f64 (.f64 #s(literal -1/240 binary64) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))) (.f64 (.f64 #s(literal -1/12 binary64) (sin.f64 kx)) (.f64 (-.f64 (.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64)) (.f64 #s(literal -3/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -6 binary64)))) (sin.f64 th)))) (.f64 (.f64 (.f64 (sin.f64 kx) (sin.f64 th)) (+.f64 (+.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal -8 binary64)) (.f64 (pow.f64 (sin.f64 kx) #s(literal -6 binary64)) #s(literal 2/3 binary64))) (.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 2/45 binary64))) (.f64 (/.f64 (-.f64 (.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 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))) #s(literal -1/2 binary64)))) #s(literal -1/2 binary64))) (.f64 ky ky)) (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 kx)) (.f64 (-.f64 (.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64)) (.f64 #s(literal -3/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -6 binary64)))) (sin.f64 th))))) (.f64 ky ky))) (*.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 (+.f64 (neg.f64 (.f64 (-.f64 (/.f64 #s(literal 1/6 binary64) (sin.f64 kx)) (.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))) ky))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 (+.f64 (.f64 (-.f64 (-.f64 (.f64 (+.f64 (-.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 kx)) (-.f64 (.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 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)))) (/.f64 #s(literal 1/120 binary64) (sin.f64 kx))) (.f64 ky ky)) (/.f64 #s(literal 1/6 binary64) (sin.f64 kx))) (.f64 (pow.f64 (sin.f64 kx) #s(literal -3 binary64)) #s(literal 1/2 binary64))) (*.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 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/120 binary64) (sin.f64 kx)) (.f64 (pow.f64 (sin.f64 kx) #s(literal -3 binary64)) #s(literal 1/12 binary64))) (+.f64 (.f64 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 kx)) (+.f64 (+.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal -8 binary64)) (.f64 (pow.f64 (sin.f64 kx) #s(literal -6 binary64)) #s(literal 2/3 binary64))) (.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 2/45 binary64))) (.f64 (/.f64 (-.f64 (.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 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))) #s(literal -1/2 binary64)))) (-.f64 (.f64 (.f64 #s(literal -1/12 binary64) (sin.f64 kx)) (-.f64 (.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64)) (.f64 #s(literal -3/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -6 binary64))))) (-.f64 (/.f64 #s(literal 1/5040 binary64) (sin.f64 kx)) (.f64 #s(literal -1/240 binary64) (pow.f64 (sin.f64 kx) #s(literal -3 binary64)))))) (.f64 ky ky)) (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 kx)) (-.f64 (.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64)) (.f64 #s(literal -3/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -6 binary64))))))) (.f64 ky ky)) (-.f64 (/.f64 #s(literal 1/6 binary64) (sin.f64 kx)) (.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))) ky))
#s(approx (sin ky) ky)
#s(approx (sin ky) (.f64 (+.f64 (.f64 (*.f64 ky ky) #s(literal -1/6 binary64)) #s(literal 1 binary64)) ky))
#s(approx (sin ky) (.f64 (+.f64 (.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 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 ky ky)) (sin.f64 kx)) (sin.f64 kx)))
#s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+.f64 (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 1/3 binary64)) (.f64 ky ky)))) (sin.f64 kx)) (*.f64 ky ky)) (sin.f64 kx)))
#s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+.f64 (.f64 (+.f64 (.f64 (/.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (-.f64 #s(literal 2/45 binary64) (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 #s(literal 1/4 binary64) (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 #s(literal -1/2 binary64) (+.f64 (/.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 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)) (+.f64 (*.f64 ky ky) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (+.f64 (.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)) (+.f64 (.f64 (+.f64 (.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 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/3 binary64)) #s(literal 1 binary64)) (.f64 ky ky)))
#s(approx (pow (sin ky) 2) (.f64 (+.f64 (.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 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (+.f64 (.f64 (.f64 #s(literal -1/6 binary64) (.f64 (.f64 th th) (sin.f64 ky))) (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (sin.f64 ky))) th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (+.f64 (.f64 (-.f64 (.f64 (.f64 #s(literal -1/6 binary64) (sin.f64 ky)) (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (.f64 #s(literal -1/120 binary64) (.f64 (.f64 (.f64 th th) (sin.f64 ky)) (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64))))) (.f64 th th)) (.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (sin.f64 ky))) th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (+.f64 (.f64 (+.f64 (.f64 (+.f64 (.f64 (.f64 #s(literal 1/120 binary64) (sin.f64 ky)) (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (.f64 (.f64 #s(literal -1/5040 binary64) (.f64 (.f64 th th) (sin.f64 ky))) (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (.f64 th th)) (.f64 (.f64 #s(literal -1/6 binary64) (sin.f64 ky)) (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (.f64 th th)) (.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (sin.f64 ky))) th))
#s(approx (sin th) th)
#s(approx (sin th) (.f64 (+.f64 (.f64 (*.f64 th th) #s(literal -1/6 binary64)) #s(literal 1 binary64)) th))
#s(approx (sin th) (.f64 (+.f64 (.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 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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))

eval20.0ms (0.3%)

Memory: 4.9MiB live, 51.4MiB allocated; 3ms collecting garbage
Compiler: Compiled 4 130 to 858 computations (79.2% saved)

prune51.0ms (0.7%)

Memory

6.4MiB live, 53.5MiB allocated; 2ms collecting garbage

Pruning

24 alts after pruning (24 fresh and 0 done)

	Pruned	Kept	Total
New	111	24	135
Fresh	0	0	0
Picked	1	0	1
Done	0	0	0
Total	112	24	136

Accuracy

99.9%

Counts

136 → 24

Alt Table

Click to see full alt table

Status	Accuracy	Program
	91.6%	(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
	80.5%	(.f64 (/.f64 (sin.f64 ky) (/.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 6 binary64)) (pow.f64 (sin.f64 ky) #s(literal 6 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))
	85.2%	(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 (sin.f64 ky) #s(literal 4 binary64))) (-.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (sin.f64 th))
	45.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))))) #s(approx (sin th) th))
▶	44.8%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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)))))) (sin.f64 th))
	47.0%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.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)))))) (sin.f64 th))
	44.5%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/3 binary64)) #s(literal 1 binary64)) (*.f64 ky ky)))))) (sin.f64 th))
	47.2%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (sin.f64 th))
	85.3%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
	42.0%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 (+.f64 (.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))))) (sin.f64 th))
	52.7%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
▶	39.9%	(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
	41.9%	(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 th))
	34.2%	(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sin.f64 kx))) (sin.f64 th))
	73.5%	(.f64 (/.f64 (exp.f64 (.f64 (log.f64 (sin.f64 ky)) #s(literal 1 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))
	31.4%	(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (sin.f64 kx))) (sin.f64 th))
	26.6%	(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (*.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 1 binary64))) (sin.f64 th))
▶	93.6%	(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (sin.f64 ky))) (sin.f64 th))
	23.5%	(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 (+.f64 (neg.f64 (.f64 (-.f64 (/.f64 #s(literal 1/6 binary64) (sin.f64 kx)) (.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))) ky)) (sin.f64 th))
	29.2%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (sin.f64 kx)))
▶	91.5%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (.f64 (sin.f64 th) (sin.f64 ky))))
	24.0%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (+.f64 (.f64 (+.f64 (/.f64 (.f64 #s(literal -1/6 binary64) (sin.f64 th)) (sin.f64 kx)) (/.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))
	43.4%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (.f64 (sin.f64 ky) th) (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64))))
▶	33.7%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th))

Compiler

Compiled 1 286 to 968 computations (24.7% saved)

series39.0ms (0.5%)

Memory

11.4MiB live, 58.7MiB allocated; 2ms collecting garbage

Counts

40 → 155

Calls

Call 1

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

Calls

9 calls:

Time	Variable		Point	Expression
11.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 (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin ky)) (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (+ (pow (sin ky) 2) (pow (sin kx) 2)) (pow (sin ky) 2) (sin ky) ky 2 (pow (sin kx) 2) (sin kx) kx -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)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+ (pow (sin kx) 2) (pow (sin ky) 2)) (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow (sin ky) 2) (* (+ (* (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* ky ky)) 1) (* ky ky)) (+ (* (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* ky ky)) 1) (* (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* ky ky)) (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) (+ (* (* ky ky) -1/315) 2/45) (* (* ky ky) -1/315) (* ky ky) -1/315 2/45 1/3 1 (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (* (sin th) (sin ky))) (* (sin th) (sin ky)))
5.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 (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin ky)) (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (+ (pow (sin ky) 2) (pow (sin kx) 2)) (pow (sin ky) 2) (sin ky) ky 2 (pow (sin kx) 2) (sin kx) kx -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)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+ (pow (sin kx) 2) (pow (sin ky) 2)) (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow (sin ky) 2) (* (+ (* (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* ky ky)) 1) (* ky ky)) (+ (* (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* ky ky)) 1) (* (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* ky ky)) (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) (+ (* (* ky ky) -1/315) 2/45) (* (* ky ky) -1/315) (* ky ky) -1/315 2/45 1/3 1 (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (* (sin th) (sin ky))) (* (sin th) (sin ky)))
3.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)))) (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin ky)) (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (+ (pow (sin ky) 2) (pow (sin kx) 2)) (pow (sin ky) 2) (sin ky) ky 2 (pow (sin kx) 2) (sin kx) kx -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)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+ (pow (sin kx) 2) (pow (sin ky) 2)) (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow (sin ky) 2) (* (+ (* (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* ky ky)) 1) (* ky ky)) (+ (* (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* ky ky)) 1) (* (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* ky ky)) (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) (+ (* (* ky ky) -1/315) 2/45) (* (* ky ky) -1/315) (* ky ky) -1/315 2/45 1/3 1 (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (* (sin th) (sin ky))) (* (sin th) (sin ky)))
3.0ms	kx	@	inf	((* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin ky)) (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (+ (pow (sin ky) 2) (pow (sin kx) 2)) (pow (sin ky) 2) (sin ky) ky 2 (pow (sin kx) 2) (sin kx) kx -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)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+ (pow (sin kx) 2) (pow (sin ky) 2)) (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow (sin ky) 2) (* (+ (* (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* ky ky)) 1) (* ky ky)) (+ (* (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* ky ky)) 1) (* (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* ky ky)) (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) (+ (* (* ky ky) -1/315) 2/45) (* (* ky ky) -1/315) (* ky ky) -1/315 2/45 1/3 1 (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (* (sin th) (sin ky))) (* (sin th) (sin ky)))
3.0ms	kx	@	-inf	((* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin ky)) (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (+ (pow (sin ky) 2) (pow (sin kx) 2)) (pow (sin ky) 2) (sin ky) ky 2 (pow (sin kx) 2) (sin kx) kx -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)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+ (pow (sin kx) 2) (pow (sin ky) 2)) (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow (sin ky) 2) (* (+ (* (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* ky ky)) 1) (* ky ky)) (+ (* (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* ky ky)) 1) (* (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* ky ky)) (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) (+ (* (* ky ky) -1/315) 2/45) (* (* ky ky) -1/315) (* ky ky) -1/315 2/45 1/3 1 (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (* (sin th) (sin ky))) (* (sin th) (sin ky)))

rewrite256.0ms (3.5%)

Memory

-35.6MiB live, 255.8MiB allocated; 22ms collecting garbage

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	650	6301
0	708	5981
1	3650	5942
0	8139	5942

Stop Event

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

Counts

195 → 311

Calls

Call 1

Inputs
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 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 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (sin.f64 ky)))
(*.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (sin.f64 ky))
(pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64))
(+.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 2 binary64))
(sin.f64 ky)
ky
#s(literal 2 binary64)
(pow.f64 (sin.f64 kx) #s(literal 2 binary64))
(sin.f64 kx)
kx
#s(literal -1/2 binary64)
(sin.f64 th)
th
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
(/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
(sqrt.f64 #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)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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)))))) (sin.f64 th))
(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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))))))
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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)))))
(+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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 (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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)))
(.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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))
(+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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 (-.f64 (.f64 (+.f64 (.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))
(-.f64 (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64)) (.f64 ky ky)) #s(literal 1/3 binary64))
(.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64)) (.f64 ky ky))
(+.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64))
(.f64 (.f64 ky ky) #s(literal -1/315 binary64))
(*.f64 ky ky)
#s(literal -1/315 binary64)
#s(literal 2/45 binary64)
#s(literal 1/3 binary64)
#s(literal 1 binary64)
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (.f64 (sin.f64 th) (sin.f64 ky))))
(.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 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)) #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 (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin ky)) #s(hole binary64 1))
#s(approx (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin ky)) #s(hole binary64 (+ 1 (* -1/2 (/ (pow kx 2) (pow (sin ky) 2))))))
#s(approx (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -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 ky) 2) (pow (sin kx) 2)) -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 ky) 2) (pow (sin kx) 2)) -1/2) #s(hole binary64 (/ 1 (sin ky))))
#s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) #s(hole binary64 (+ (* -1/2 (/ (pow kx 2) (pow (sin ky) 3))) (/ 1 (sin ky)))))
#s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -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 ky) 2) (pow (sin kx) 2)) -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 ky) 2) (pow (sin kx) 2)) #s(hole binary64 (pow (sin ky) 2)))
#s(approx (+ (pow (sin ky) 2) (pow (sin kx) 2)) #s(hole binary64 (+ (pow kx 2) (pow (sin ky) 2))))
#s(approx (+ (pow (sin ky) 2) (pow (sin kx) 2)) #s(hole binary64 (+ (* (pow kx 2) (+ 1 (* -1/3 (pow kx 2)))) (pow (sin ky) 2))))
#s(approx (+ (pow (sin ky) 2) (pow (sin kx) 2)) #s(hole binary64 (+ (* (pow kx 2) (+ 1 (* (pow kx 2) (- (* 2/45 (pow kx 2)) 1/3)))) (pow (sin ky) 2))))
#s(approx (pow (sin kx) 2) #s(hole binary64 (pow kx 2)))
#s(approx (pow (sin kx) 2) #s(hole binary64 (* (pow kx 2) (+ 1 (* -1/3 (pow kx 2))))))
#s(approx (pow (sin kx) 2) #s(hole binary64 (* (pow kx 2) (+ 1 (* (pow kx 2) (- (* 2/45 (pow kx 2)) 1/3))))))
#s(approx (pow (sin kx) 2) #s(hole binary64 (* (pow kx 2) (+ 1 (* (pow kx 2) (- (* (pow kx 2) (+ 2/45 (* -1/315 (pow kx 2)))) 1/3))))))
#s(approx (sin kx) #s(hole binary64 kx))
#s(approx (sin kx) #s(hole binary64 (* kx (+ 1 (* -1/6 (pow kx 2))))))
#s(approx (sin kx) #s(hole binary64 (* kx (+ 1 (* (pow kx 2) (- (* 1/120 (pow kx 2)) 1/6))))))
#s(approx (sin kx) #s(hole binary64 (* kx (+ 1 (* (pow kx 2) (- (* (pow kx 2) (+ 1/120 (* -1/5040 (pow kx 2)))) 1/6))))))
#s(approx kx #s(hole binary64 kx))
#s(approx (sqrt (+ (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 (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (* (sin th) (sin ky))) #s(hole binary64 (sin th)))
#s(approx (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (* (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 ky) 2) (pow (sin kx) 2)) -1/2) (* (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 ky) 2) (pow (sin kx) 2)) -1/2) (* (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 (* (/ (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 (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin ky)) #s(hole binary64 (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
#s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) #s(hole binary64 (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))
#s(approx (+ (pow (sin ky) 2) (pow (sin kx) 2)) #s(hole binary64 (+ (pow (sin kx) 2) (pow (sin ky) 2))))
#s(approx (pow (sin kx) 2) #s(hole binary64 (pow (sin kx) 2)))
#s(approx (sin kx) #s(hole binary64 (sin kx)))
#s(approx (sqrt (+ (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 (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (* (sin th) (sin ky))) #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)))) (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 (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin ky)) #s(hole binary64 (/ ky (sin kx))))
#s(approx (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -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 ky) 2) (pow (sin kx) 2)) -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 ky) 2) (pow (sin kx) 2)) -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 ky) 2) (pow (sin kx) 2)) -1/2) #s(hole binary64 (/ 1 (sin kx))))
#s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) #s(hole binary64 (+ (* -1/2 (/ (pow ky 2) (pow (sin kx) 3))) (/ 1 (sin kx)))))
#s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -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 ky) 2) (pow (sin kx) 2)) -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 ky) 2) (pow (sin kx) 2)) #s(hole binary64 (pow (sin kx) 2)))
#s(approx (+ (pow (sin ky) 2) (pow (sin kx) 2)) #s(hole binary64 (+ (pow ky 2) (pow (sin kx) 2))))
#s(approx (+ (pow (sin ky) 2) (pow (sin kx) 2)) #s(hole binary64 (+ (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2)))) (pow (sin kx) 2))))
#s(approx (+ (pow (sin ky) 2) (pow (sin kx) 2)) #s(hole binary64 (+ (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3)))) (pow (sin kx) 2))))
#s(approx (pow (sin ky) 2) #s(hole binary64 (pow ky 2)))
#s(approx (pow (sin ky) 2) #s(hole binary64 (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2))))))
#s(approx (pow (sin ky) 2) #s(hole binary64 (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3))))))
#s(approx (pow (sin ky) 2) #s(hole binary64 (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* (pow ky 2) (+ 2/45 (* -1/315 (pow ky 2)))) 1/3))))))
#s(approx (sin ky) #s(hole binary64 ky))
#s(approx (sin ky) #s(hole binary64 (* ky (+ 1 (* -1/6 (pow ky 2))))))
#s(approx (sin ky) #s(hole binary64 (* ky (+ 1 (* (pow ky 2) (- (* 1/120 (pow ky 2)) 1/6))))))
#s(approx (sin ky) #s(hole binary64 (* ky (+ 1 (* (pow ky 2) (- (* (pow ky 2) (+ 1/120 (* -1/5040 (pow ky 2)))) 1/6))))))
#s(approx ky #s(hole binary64 ky))
#s(approx (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 (* (+ (* (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* ky ky)) 1) (* ky ky)) #s(hole binary64 (pow ky 2)))
#s(approx (* (+ (* (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* ky ky)) 1) (* ky ky)) #s(hole binary64 (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2))))))
#s(approx (* (+ (* (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* ky ky)) 1) (* ky ky)) #s(hole binary64 (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3))))))
#s(approx (* (+ (* (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* ky ky)) 1) (* ky ky)) #s(hole binary64 (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* (pow ky 2) (+ 2/45 (* -1/315 (pow ky 2)))) 1/3))))))
#s(approx (+ (* (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* ky ky)) 1) #s(hole binary64 1))
#s(approx (+ (* (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* ky ky)) 1) #s(hole binary64 (+ 1 (* -1/3 (pow ky 2)))))
#s(approx (+ (* (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* ky ky)) 1) #s(hole binary64 (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3)))))
#s(approx (+ (* (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* ky ky)) 1) #s(hole binary64 (+ 1 (* (pow ky 2) (- (* (pow ky 2) (+ 2/45 (* -1/315 (pow ky 2)))) 1/3)))))
#s(approx (* (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* ky ky)) #s(hole binary64 (* -1/3 (pow ky 2))))
#s(approx (* (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* ky ky)) #s(hole binary64 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3))))
#s(approx (* (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* ky ky)) #s(hole binary64 (* (pow ky 2) (- (* (pow ky 2) (+ 2/45 (* -1/315 (pow ky 2)))) 1/3))))
#s(approx (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) #s(hole binary64 -1/3))
#s(approx (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) #s(hole binary64 (- (* 2/45 (pow ky 2)) 1/3)))
#s(approx (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) #s(hole binary64 (- (* (pow ky 2) (+ 2/45 (* -1/315 (pow ky 2)))) 1/3)))
#s(approx (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) #s(hole binary64 (* 2/45 (pow ky 2))))
#s(approx (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) #s(hole binary64 (* (pow ky 2) (+ 2/45 (* -1/315 (pow ky 2))))))
#s(approx (+ (* (* ky ky) -1/315) 2/45) #s(hole binary64 2/45))
#s(approx (+ (* (* ky ky) -1/315) 2/45) #s(hole binary64 (+ 2/45 (* -1/315 (pow ky 2)))))
#s(approx (* (* ky ky) -1/315) #s(hole binary64 (* -1/315 (pow ky 2))))
#s(approx (* ky ky) #s(hole binary64 (pow ky 2)))
#s(approx (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (* (sin th) (sin ky))) #s(hole binary64 (/ (* ky (sin th)) (sin kx))))
#s(approx (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (* (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 ky) 2) (pow (sin kx) 2)) -1/2) (* (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 ky) 2) (pow (sin kx) 2)) -1/2) (* (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 (pow (sin ky) 2) #s(hole binary64 (pow (sin ky) 2)))
#s(approx (sin ky) #s(hole binary64 (sin ky)))
#s(approx (* (+ (* (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* ky ky)) 1) (* ky ky)) #s(hole binary64 (* -1/315 (pow ky 8))))
#s(approx (* (+ (* (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* ky ky)) 1) (* ky ky)) #s(hole binary64 (* (pow ky 8) (- (* 2/45 (/ 1 (pow ky 2))) 1/315))))
#s(approx (* (+ (* (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* ky ky)) 1) (* ky ky)) #s(hole binary64 (* (pow ky 8) (- (* 2/45 (/ 1 (pow ky 2))) (+ 1/315 (/ 1/3 (pow ky 4)))))))
#s(approx (* (+ (* (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* ky ky)) 1) (* ky ky)) #s(hole binary64 (* (pow ky 8) (- (+ (* 2/45 (/ 1 (pow ky 2))) (/ 1 (pow ky 6))) (+ 1/315 (/ 1/3 (pow ky 4)))))))
#s(approx (+ (* (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* ky ky)) 1) #s(hole binary64 (* -1/315 (pow ky 6))))
#s(approx (+ (* (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* ky ky)) 1) #s(hole binary64 (* (pow ky 6) (- (* 2/45 (/ 1 (pow ky 2))) 1/315))))
#s(approx (+ (* (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* ky ky)) 1) #s(hole binary64 (* (pow ky 6) (- (* 2/45 (/ 1 (pow ky 2))) (+ 1/315 (/ 1/3 (pow ky 4)))))))
#s(approx (+ (* (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* ky ky)) 1) #s(hole binary64 (* (pow ky 6) (- (+ (* 2/45 (/ 1 (pow ky 2))) (/ 1 (pow ky 6))) (+ 1/315 (/ 1/3 (pow ky 4)))))))
#s(approx (* (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* ky ky)) #s(hole binary64 (* -1/315 (pow ky 6))))
#s(approx (* (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* ky ky)) #s(hole binary64 (* (pow ky 6) (- (* 2/45 (/ 1 (pow ky 2))) 1/315))))
#s(approx (* (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* ky ky)) #s(hole binary64 (* (pow ky 6) (- (* 2/45 (/ 1 (pow ky 2))) (+ 1/315 (/ 1/3 (pow ky 4)))))))
#s(approx (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) #s(hole binary64 (* -1/315 (pow ky 4))))
#s(approx (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) #s(hole binary64 (* (pow ky 4) (- (* 2/45 (/ 1 (pow ky 2))) 1/315))))
#s(approx (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) #s(hole binary64 (* (pow ky 4) (- (* 2/45 (/ 1 (pow ky 2))) (+ 1/315 (/ 1/3 (pow ky 4)))))))
#s(approx (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) #s(hole binary64 (* -1/315 (pow ky 4))))
#s(approx (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) #s(hole binary64 (* (pow ky 4) (- (* 2/45 (/ 1 (pow ky 2))) 1/315))))
#s(approx (+ (* (* ky ky) -1/315) 2/45) #s(hole binary64 (* -1/315 (pow ky 2))))
#s(approx (+ (* (* ky ky) -1/315) 2/45) #s(hole binary64 (* (pow ky 2) (- (* 2/45 (/ 1 (pow ky 2))) 1/315))))
#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 (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 ky) 2) (pow (sin kx) 2)) -1/2) (* (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 ky) 2) (pow (sin kx) 2)) -1/2) (* (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 ky) 2) (pow (sin kx) 2)) -1/2) (* (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 ky) 2) (pow (sin kx) 2)) -1/2) (* (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 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 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (sin.f64 ky))))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 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 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (sin.f64 ky)))
(*.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (sin.f64 ky))
(*.f64 (sin.f64 ky) (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64)))
(*.f64 (neg.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/4 binary64))) (neg.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/4 binary64))))
(*.f64 (fabs.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/4 binary64))) (fabs.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/4 binary64))))
(*.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/4 binary64)))
(pow.f64 (exp.f64 (log.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) #s(literal -1/2 binary64))
(pow.f64 (*.f64 (+.f64 (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 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))) #s(literal -1/4 binary64))
(pow.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1 binary64)) #s(literal 1/2 binary64))
(pow.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64))
(pow.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))) #s(literal -1 binary64))
(pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64))
(/.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (neg.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))))
(/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1 binary64)) #s(literal -1/2 binary64)))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
(sqrt.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1 binary64)))
(exp.f64 (*.f64 (log.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1 binary64))) #s(literal 1/2 binary64)))
(exp.f64 (*.f64 (log.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))) #s(literal -1/2 binary64)))
(+.f64 (cosh.f64 (.f64 (log.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))) #s(literal -1/2 binary64))) (sinh.f64 (.f64 (log.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))) #s(literal -1/2 binary64))))
(/.f64 (-.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 binary64))) (-.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #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 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)) (pow.f64 (*.f64 (sin.f64 ky) (sin.f64 kx)) #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)))))
(+.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 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))))
(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
#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 -1/2 binary64)
(sin.f64 th)
th
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin ky) 2) (pow (sin kx) 2)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
(*.f64 (sin.f64 th) (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin ky) 2) (pow (sin kx) 2)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(/.f64 (*.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 #s(approx (+ (pow (sin ky) 2) (pow (sin kx) 2)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (sin.f64 ky)) (neg.f64 (sqrt.f64 #s(approx (+ (pow (sin ky) 2) (pow (sin kx) 2)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin ky) 2) (pow (sin kx) 2)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
(pow.f64 (sqrt.f64 #s(approx (+ (pow (sin ky) 2) (pow (sin kx) 2)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #s(literal 1 binary64))
(pow.f64 #s(approx (+ (pow (sin ky) 2) (pow (sin kx) 2)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 1/2 binary64))
(/.f64 #s(literal 1 binary64) (pow.f64 #s(approx (+ (pow (sin ky) 2) (pow (sin kx) 2)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal -1/2 binary64)))
(sqrt.f64 #s(approx (+ (pow (sin ky) 2) (pow (sin kx) 2)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
(exp.f64 (*.f64 (log.f64 #s(approx (+ (pow (sin ky) 2) (pow (sin kx) 2)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #s(literal 1/2 binary64)))
#s(approx (+ (pow (sin ky) 2) (pow (sin kx) 2)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64)) 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))))) (sin.f64 th))
(.f64 (sin.f64 th) (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64)) 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))))))
(/.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64)) 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)))))
(/.f64 (neg.f64 (sin.f64 ky)) (neg.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64)) 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))))))
(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64)) 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)))))
(pow.f64 (sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64)) 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(literal 1 binary64))
(pow.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64)) 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(literal 1/2 binary64))
(/.f64 (sqrt.f64 (-.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64)) ky) ky) #s(literal 1/3 binary64)) (.f64 ky ky)) #s(literal 1 binary64)) (.f64 ky ky))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64)) ky) ky) #s(literal 1/3 binary64)) (.f64 ky ky)) #s(literal 1 binary64)) (.f64 ky ky))))))
(/.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 6 binary64)) (pow.f64 #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64)) ky) ky) #s(literal 1/3 binary64)) (.f64 ky ky)) #s(literal 1 binary64)) (.f64 ky ky))) #s(literal 3 binary64)))) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (-.f64 (pow.f64 #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64)) ky) ky) #s(literal 1/3 binary64)) (.f64 ky ky)) #s(literal 1 binary64)) (.f64 ky ky))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64)) ky) ky) #s(literal 1/3 binary64)) (.f64 ky ky)) #s(literal 1 binary64)) (*.f64 ky ky))))))))
(/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64)) 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(literal -1/2 binary64)))
(sqrt.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64)) 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))))
(exp.f64 (.f64 (log.f64 (+.f64 #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64)) 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(literal 1/2 binary64)))
(/.f64 (-.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64)) ky) ky) #s(literal 1/3 binary64)) (.f64 ky ky)) #s(literal 1 binary64)) (.f64 ky ky))) #s(literal 2 binary64))) (-.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64)) ky) ky) #s(literal 1/3 binary64)) (.f64 ky ky)) #s(literal 1 binary64)) (.f64 ky ky)))))
(/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 6 binary64)) (pow.f64 #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64)) ky) ky) #s(literal 1/3 binary64)) (.f64 ky ky)) #s(literal 1 binary64)) (.f64 ky ky))) #s(literal 3 binary64))) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (-.f64 (pow.f64 #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64)) ky) ky) #s(literal 1/3 binary64)) (.f64 ky ky)) #s(literal 1 binary64)) (.f64 ky ky))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64)) ky) ky) #s(literal 1/3 binary64)) (.f64 ky ky)) #s(literal 1 binary64)) (*.f64 ky ky)))))))
(+.f64 #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64)) 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)))
(+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64)) ky) ky) #s(literal 1/3 binary64)) (.f64 ky ky)) #s(literal 1 binary64)) (.f64 ky ky))))
#s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64)) ky) ky) #s(literal 1/3 binary64)) (.f64 ky ky)) #s(literal 1 binary64)) (.f64 ky ky)))
(.f64 (.f64 (+.f64 (.f64 (-.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64)) ky) ky) #s(literal 1/3 binary64)) (.f64 ky ky)) #s(literal 1 binary64)) ky) ky)
(.f64 (+.f64 (.f64 (-.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64)) ky) ky) #s(literal 1/3 binary64)) (.f64 ky ky)) #s(literal 1 binary64)) (.f64 ky ky))
(.f64 (.f64 ky ky) (+.f64 (.f64 (-.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64)) ky) ky) #s(literal 1/3 binary64)) (.f64 ky ky)) #s(literal 1 binary64)))
(+.f64 (.f64 #s(literal 1 binary64) (.f64 ky ky)) (.f64 (.f64 (-.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64)) ky) ky) #s(literal 1/3 binary64)) (.f64 ky ky)) (.f64 ky ky)))
(+.f64 (.f64 (.f64 ky ky) #s(literal 1 binary64)) (.f64 (.f64 ky ky) (.f64 (-.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64)) ky) ky) #s(literal 1/3 binary64)) (.f64 ky ky))))
(/.f64 (-.f64 (pow.f64 (.f64 (-.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64)) ky) ky) #s(literal 1/3 binary64)) (.f64 ky ky)) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (.f64 (-.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64)) ky) ky) #s(literal 1/3 binary64)) (.f64 ky ky)) #s(literal 1 binary64)))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (.f64 (-.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64)) ky) ky) #s(literal 1/3 binary64)) (.f64 ky ky)) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (.f64 (-.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64)) ky) ky) #s(literal 1/3 binary64)) (.f64 ky ky))))
(/.f64 (+.f64 (.f64 (pow.f64 (-.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64)) ky) ky) #s(literal 1/3 binary64)) #s(literal 3 binary64)) (pow.f64 ky #s(literal 6 binary64))) #s(literal 1 binary64)) (+.f64 (pow.f64 (.f64 (-.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64)) ky) ky) #s(literal 1/3 binary64)) (.f64 ky ky)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (-.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64)) ky) ky) #s(literal 1/3 binary64)) (.f64 ky ky)) #s(literal 1 binary64)))))
(/.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (-.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64)) ky) ky) #s(literal 1/3 binary64)) #s(literal 3 binary64)) (pow.f64 ky #s(literal 6 binary64)))) (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (.f64 (-.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64)) ky) ky) #s(literal 1/3 binary64)) (.f64 ky ky)) #s(literal 2 binary64)) (.f64 #s(literal 1 binary64) (.f64 (-.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64)) ky) ky) #s(literal 1/3 binary64)) (.f64 ky ky))))))
(-.f64 #s(literal 1 binary64) (.f64 (neg.f64 (.f64 ky ky)) (-.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64)) ky) ky) #s(literal 1/3 binary64))))
(+.f64 (.f64 (-.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64)) ky) ky) #s(literal 1/3 binary64)) (.f64 ky ky)) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (.f64 (-.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64)) ky) ky) #s(literal 1/3 binary64)) (.f64 ky ky)))
(.f64 (.f64 (-.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64)) ky) ky) #s(literal 1/3 binary64)) ky) ky)
(.f64 (-.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64)) ky) ky) #s(literal 1/3 binary64)) (.f64 ky ky))
(.f64 (.f64 ky ky) (-.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64)) ky) ky) #s(literal 1/3 binary64)))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64)) ky) ky) #s(literal 2 binary64)) #s(literal 1/9 binary64)) (+.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64)) ky) ky) #s(literal 1/3 binary64)))
(/.f64 (-.f64 (.f64 (pow.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64)) #s(literal 3 binary64)) (pow.f64 ky #s(literal 6 binary64))) #s(literal 1/27 binary64)) (+.f64 (pow.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64)) ky) ky) #s(literal 2 binary64)) (+.f64 #s(literal 1/9 binary64) (.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64)) ky) ky) #s(literal 1/3 binary64)))))
(-.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64)) ky) ky) #s(literal 1/3 binary64))
(.f64 (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64)) ky) ky)
(.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64)) (.f64 ky ky))
(.f64 (.f64 ky ky) (+.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64)))
(+.f64 (.f64 (.f64 ky ky) #s(literal 2/45 binary64)) (.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) (.f64 ky ky)))
(+.f64 (.f64 (.f64 ky ky) #s(literal 2/45 binary64)) (.f64 (.f64 ky ky) (.f64 (.f64 ky ky) #s(literal -1/315 binary64))))
(/.f64 (-.f64 #s(literal 4/2025 binary64) (pow.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2 binary64))) (-.f64 #s(literal 2/45 binary64) (.f64 (.f64 ky ky) #s(literal -1/315 binary64))))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2 binary64)) #s(literal 4/2025 binary64)) (-.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64)))
(/.f64 (+.f64 #s(literal 8/91125 binary64) (.f64 #s(literal -1/31255875 binary64) (pow.f64 ky #s(literal 6 binary64)))) (+.f64 #s(literal 4/2025 binary64) (-.f64 (pow.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2 binary64)) (.f64 #s(literal 2/45 binary64) (.f64 (.f64 ky ky) #s(literal -1/315 binary64))))))
(/.f64 (+.f64 (.f64 #s(literal -1/31255875 binary64) (pow.f64 ky #s(literal 6 binary64))) #s(literal 8/91125 binary64)) (+.f64 (pow.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2 binary64)) (-.f64 #s(literal 4/2025 binary64) (.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64)))))
(-.f64 #s(literal 2/45 binary64) (.f64 #s(literal 1/315 binary64) (.f64 ky ky)))
(+.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64))
(+.f64 #s(literal 2/45 binary64) (.f64 (.f64 ky ky) #s(literal -1/315 binary64)))
(.f64 (.f64 ky ky) #s(literal -1/315 binary64))
(.f64 #s(literal -1/315 binary64) (.f64 ky ky))
(.f64 ky (.f64 ky #s(literal -1/315 binary64)))
(*.f64 (neg.f64 (neg.f64 ky)) (neg.f64 (neg.f64 ky)))
(*.f64 (neg.f64 (fabs.f64 ky)) (neg.f64 (fabs.f64 ky)))
(*.f64 (fabs.f64 (fabs.f64 ky)) (fabs.f64 (fabs.f64 ky)))
(*.f64 (exp.f64 (log.f64 ky)) (exp.f64 (log.f64 ky)))
(*.f64 (neg.f64 ky) (neg.f64 ky))
(*.f64 (fabs.f64 ky) (fabs.f64 ky))
(*.f64 ky ky)
(pow.f64 (exp.f64 (log.f64 ky)) #s(literal 2 binary64))
(pow.f64 (neg.f64 ky) #s(literal 2 binary64))
(pow.f64 (fabs.f64 ky) #s(literal 2 binary64))
(pow.f64 (*.f64 ky ky) #s(literal 1 binary64))
(pow.f64 ky #s(literal 2 binary64))
(fabs.f64 (*.f64 ky ky))
(exp.f64 (*.f64 (log.f64 ky) #s(literal 2 binary64)))
(+.f64 (cosh.f64 (.f64 (log.f64 ky) #s(literal 2 binary64))) (sinh.f64 (.f64 (log.f64 ky) #s(literal 2 binary64))))
#s(literal -1/315 binary64)
#s(literal 2/45 binary64)
#s(literal 1/3 binary64)
#s(literal 1 binary64)
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64))))
(.f64 (.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (sin.f64 th)) (sin.f64 ky))
(.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64)))
(.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (.f64 (sin.f64 th) (sin.f64 ky)))
(.f64 (sin.f64 ky) (.f64 (sin.f64 th) (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64))))
(/.f64 (.f64 #s(literal 1 binary64) (-.f64 (cos.f64 (-.f64 th ky)) (cos.f64 (+.f64 th ky)))) (.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))) #s(literal 2 binary64)))
(/.f64 (.f64 #s(literal 1 binary64) (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 ky th)))) (.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))) #s(literal 2 binary64)))
(/.f64 (.f64 (-.f64 (cos.f64 (-.f64 th ky)) (cos.f64 (+.f64 th ky))) #s(literal 1 binary64)) (.f64 #s(literal 2 binary64) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))))
(/.f64 (.f64 (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 ky th))) #s(literal 1 binary64)) (.f64 #s(literal 2 binary64) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))))
(*.f64 (sin.f64 th) (sin.f64 ky))
(*.f64 (sin.f64 ky) (sin.f64 th))
(/.f64 (-.f64 (cos.f64 (-.f64 th ky)) (cos.f64 (+.f64 th ky))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 ky th)) (cos.f64 (+.f64 ky th))) #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)) (-.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 (.f64 (+.f64 (.f64 (.f64 (pow.f64 (.f64 kx (sin.f64 ky)) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 1/3 binary64)) (.f64 #s(literal -3/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 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)) (+.f64 (.f64 (+.f64 (.f64 (-.f64 (.f64 (.f64 (pow.f64 (.f64 kx (sin.f64 ky)) #s(literal 2 binary64)) (.f64 (+.f64 (+.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal -8 binary64)) (.f64 #s(literal 2/3 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 binary64)))) (.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 2/45 binary64))) (.f64 (/.f64 (-.f64 (.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 1/3 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))) #s(literal -1/2 binary64))) (sin.f64 th))) #s(literal -1/2 binary64)) (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (-.f64 (.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 1/3 binary64)) (.f64 #s(literal -3/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 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) (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 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 1 binary64)))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (pow.f64 (.f64 kx (sin.f64 ky)) #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 1/3 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)))) (*.f64 kx kx)) #s(literal 1 binary64)))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 (.f64 (-.f64 (.f64 (-.f64 (.f64 (.f64 (pow.f64 (.f64 kx (sin.f64 ky)) #s(literal 2 binary64)) (+.f64 (+.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal -8 binary64)) (.f64 #s(literal 2/3 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 binary64)))) (.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 2/45 binary64))) (.f64 (/.f64 (-.f64 (.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 1/3 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))) #s(literal -1/2 binary64)))) #s(literal -1/2 binary64)) (.f64 #s(literal -1/2 binary64) (.f64 (-.f64 (.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 1/3 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))))) (.f64 kx kx)) (.f64 (pow.f64 (sin.f64 ky) #s(literal -2 binary64)) #s(literal 1/2 binary64))) (*.f64 kx kx)) #s(literal 1 binary64)))
#s(approx (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin ky)) #s(literal 1 binary64))
#s(approx (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin ky)) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 1 binary64)))
#s(approx (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin ky)) (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (pow.f64 (.f64 kx (sin.f64 ky)) #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 1/3 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)))) (*.f64 kx kx)) #s(literal 1 binary64)))
#s(approx (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin ky)) (+.f64 (.f64 (-.f64 (.f64 (-.f64 (.f64 (.f64 (pow.f64 (.f64 kx (sin.f64 ky)) #s(literal 2 binary64)) (+.f64 (+.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal -8 binary64)) (.f64 #s(literal 2/3 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 binary64)))) (.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 2/45 binary64))) (.f64 (/.f64 (-.f64 (.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 1/3 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))) #s(literal -1/2 binary64)))) #s(literal -1/2 binary64)) (.f64 #s(literal -1/2 binary64) (.f64 (-.f64 (.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 1/3 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))))) (.f64 kx kx)) (.f64 (pow.f64 (sin.f64 ky) #s(literal -2 binary64)) #s(literal 1/2 binary64))) (*.f64 kx kx)) #s(literal 1 binary64)))
#s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (pow.f64 (sin.f64 ky) #s(literal -1 binary64)))
#s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 3 binary64))) (pow.f64 (sin.f64 ky) #s(literal -1 binary64))))
#s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (.f64 (-.f64 (.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 1/3 binary64)) (.f64 #s(literal -3/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 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 ky) 2) (pow (sin kx) 2)) -1/2) (+.f64 (.f64 (-.f64 (.f64 (-.f64 (.f64 (.f64 (.f64 (.f64 kx kx) (sin.f64 ky)) (+.f64 (+.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal -8 binary64)) (.f64 #s(literal 2/3 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 binary64)))) (.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 2/45 binary64))) (.f64 (/.f64 (-.f64 (.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 1/3 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))) #s(literal -1/2 binary64)))) #s(literal -1/2 binary64)) (.f64 #s(literal -1/2 binary64) (.f64 (-.f64 (.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 1/3 binary64)) (.f64 #s(literal -3/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 binary64)))) (sin.f64 ky)))) (.f64 kx kx)) (.f64 (pow.f64 (sin.f64 ky) #s(literal -3 binary64)) #s(literal 1/2 binary64))) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal -1 binary64))))
#s(approx (+ (pow (sin ky) 2) (pow (sin kx) 2)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))
#s(approx (+ (pow (sin ky) 2) (pow (sin kx) 2)) (+.f64 (*.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
#s(approx (+ (pow (sin ky) 2) (pow (sin kx) 2)) (+.f64 (.f64 (+.f64 (.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 ky) 2) (pow (sin kx) 2)) (+.f64 (.f64 (+.f64 (.f64 (-.f64 (.f64 (.f64 kx kx) #s(literal 2/45 binary64)) #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 (+.f64 (.f64 #s(literal -1/3 binary64) (.f64 kx kx)) #s(literal 1 binary64)) (.f64 kx kx)))
#s(approx (pow (sin kx) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (.f64 kx kx) #s(literal 2/45 binary64)) #s(literal 1/3 binary64)) (.f64 kx kx)) #s(literal 1 binary64)) (.f64 kx kx)))
#s(approx (pow (sin kx) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.f64 (.f64 kx kx) #s(literal -1/315 binary64)) #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 (+.f64 (.f64 #s(literal -1/6 binary64) (*.f64 kx kx)) #s(literal 1 binary64)) kx))
#s(approx (sin kx) (.f64 (+.f64 (.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 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.f64 #s(literal -1/5040 binary64) (.f64 kx kx)) #s(literal 1/120 binary64)) (.f64 kx kx)) #s(literal 1/6 binary64)) (*.f64 kx kx)) #s(literal 1 binary64)) kx))
#s(approx kx kx)
#s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sin.f64 ky))
#s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 kx kx)) (sin.f64 ky)) (sin.f64 ky)))
#s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+.f64 (.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sin.f64 ky)) (.f64 (/.f64 (.f64 (+.f64 (.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 kx kx)) (sin.f64 ky)))
#s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+.f64 (.f64 (+.f64 (.f64 (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64))) #s(literal 1/3 binary64))) (sin.f64 ky)) (.f64 #s(literal -1/2 binary64) (.f64 (.f64 kx kx) (/.f64 (-.f64 #s(literal 2/45 binary64) (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.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))))) (.f64 kx kx)) (/.f64 #s(literal 1/2 binary64) (sin.f64 ky))) (*.f64 kx kx)) (sin.f64 ky)))
#s(approx (+ (pow (sin ky) 2) (pow (sin kx) 2)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))
#s(approx (+ (pow (sin ky) 2) (pow (sin kx) 2)) (+.f64 (*.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
#s(approx (+ (pow (sin ky) 2) (pow (sin kx) 2)) (+.f64 (.f64 (+.f64 (.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 ky) 2) (pow (sin kx) 2)) (+.f64 (.f64 (+.f64 (.f64 (-.f64 (.f64 (.f64 kx kx) #s(literal 2/45 binary64)) #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 (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (* (sin th) (sin ky))) (sin.f64 th))
#s(approx (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (* (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 ky) 2) (pow (sin kx) 2)) -1/2) (* (sin th) (sin ky))) (+.f64 (.f64 (+.f64 (.f64 (.f64 (pow.f64 (.f64 kx (sin.f64 ky)) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 1/3 binary64)) (.f64 #s(literal -3/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 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 (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (* (sin th) (sin ky))) (+.f64 (.f64 (+.f64 (.f64 (-.f64 (.f64 (.f64 (pow.f64 (.f64 kx (sin.f64 ky)) #s(literal 2 binary64)) (.f64 (+.f64 (+.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal -8 binary64)) (.f64 #s(literal 2/3 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 binary64)))) (.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 2/45 binary64))) (.f64 (/.f64 (-.f64 (.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 1/3 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))) #s(literal -1/2 binary64))) (sin.f64 th))) #s(literal -1/2 binary64)) (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (-.f64 (.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 1/3 binary64)) (.f64 #s(literal -3/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 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) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (*.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (sin.f64 ky)))
#s(approx (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin ky)) (*.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (sin.f64 ky)))
#s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64)))
#s(approx (+ (pow (sin ky) 2) (pow (sin kx) 2)) (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #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 (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
#s(approx (+ (pow (sin ky) 2) (pow (sin kx) 2)) (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))
#s(approx (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (* (sin th) (sin ky))) (.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/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 (+.f64 (.f64 (+.f64 (/.f64 (.f64 #s(literal -1/6 binary64) (sin.f64 th)) (sin.f64 kx)) (/.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 (+.f64 (.f64 (+.f64 (+.f64 (/.f64 (.f64 #s(literal -1/6 binary64) (sin.f64 th)) (sin.f64 kx)) (/.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))) (.f64 (+.f64 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 kx)) (.f64 (-.f64 (.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64)) (.f64 #s(literal -3/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -6 binary64)))) (sin.f64 th))) (/.f64 (.f64 #s(literal 1/12 binary64) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal 1/120 binary64) (sin.f64 th)) (sin.f64 kx))) (.f64 ky ky))) (.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 (+.f64 (.f64 (+.f64 (+.f64 (/.f64 (.f64 #s(literal -1/6 binary64) (sin.f64 th)) (sin.f64 kx)) (/.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))) (.f64 (+.f64 (+.f64 (/.f64 (.f64 #s(literal 1/120 binary64) (sin.f64 th)) (sin.f64 kx)) (/.f64 (.f64 #s(literal 1/12 binary64) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))) (+.f64 (.f64 (+.f64 (+.f64 (+.f64 (/.f64 (.f64 #s(literal -1/5040 binary64) (sin.f64 th)) (sin.f64 kx)) (/.f64 (.f64 #s(literal -1/240 binary64) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))) (.f64 (.f64 #s(literal -1/12 binary64) (sin.f64 kx)) (.f64 (-.f64 (.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64)) (.f64 #s(literal -3/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -6 binary64)))) (sin.f64 th)))) (.f64 (.f64 (.f64 (sin.f64 kx) (sin.f64 th)) (+.f64 (+.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal -8 binary64)) (.f64 (pow.f64 (sin.f64 kx) #s(literal -6 binary64)) #s(literal 2/3 binary64))) (.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 2/45 binary64))) (.f64 (/.f64 (-.f64 (.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 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))) #s(literal -1/2 binary64)))) #s(literal -1/2 binary64))) (.f64 ky ky)) (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 kx)) (.f64 (-.f64 (.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64)) (.f64 #s(literal -3/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -6 binary64)))) (sin.f64 th))))) (.f64 ky ky))) (*.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 (+.f64 (neg.f64 (.f64 (-.f64 (/.f64 #s(literal 1/6 binary64) (sin.f64 kx)) (.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))) ky))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 (+.f64 (.f64 (-.f64 (-.f64 (.f64 (+.f64 (-.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 kx)) (-.f64 (.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 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)))) (/.f64 #s(literal 1/120 binary64) (sin.f64 kx))) (.f64 ky ky)) (/.f64 #s(literal 1/6 binary64) (sin.f64 kx))) (.f64 (pow.f64 (sin.f64 kx) #s(literal -3 binary64)) #s(literal 1/2 binary64))) (*.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 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/120 binary64) (sin.f64 kx)) (.f64 (pow.f64 (sin.f64 kx) #s(literal -3 binary64)) #s(literal 1/12 binary64))) (+.f64 (.f64 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 kx)) (+.f64 (+.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal -8 binary64)) (.f64 (pow.f64 (sin.f64 kx) #s(literal -6 binary64)) #s(literal 2/3 binary64))) (.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 2/45 binary64))) (.f64 (/.f64 (-.f64 (.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 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))) #s(literal -1/2 binary64)))) (-.f64 (.f64 (.f64 #s(literal -1/12 binary64) (sin.f64 kx)) (-.f64 (.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64)) (.f64 #s(literal -3/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -6 binary64))))) (-.f64 (/.f64 #s(literal 1/5040 binary64) (sin.f64 kx)) (.f64 #s(literal -1/240 binary64) (pow.f64 (sin.f64 kx) #s(literal -3 binary64)))))) (.f64 ky ky)) (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 kx)) (-.f64 (.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64)) (.f64 #s(literal -3/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -6 binary64))))))) (.f64 ky ky)) (-.f64 (/.f64 #s(literal 1/6 binary64) (sin.f64 kx)) (.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))) ky))
#s(approx (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin ky)) (/.f64 ky (sin.f64 kx)))
#s(approx (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin ky)) (.f64 (+.f64 (neg.f64 (.f64 (-.f64 (/.f64 #s(literal 1/6 binary64) (sin.f64 kx)) (.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))) ky))
#s(approx (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin ky)) (.f64 (+.f64 (.f64 (-.f64 (-.f64 (.f64 (+.f64 (-.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 kx)) (-.f64 (.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 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)))) (/.f64 #s(literal 1/120 binary64) (sin.f64 kx))) (.f64 ky ky)) (/.f64 #s(literal 1/6 binary64) (sin.f64 kx))) (.f64 (pow.f64 (sin.f64 kx) #s(literal -3 binary64)) #s(literal 1/2 binary64))) (*.f64 ky ky)) (pow.f64 (sin.f64 kx) #s(literal -1 binary64))) ky))
#s(approx (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin ky)) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/120 binary64) (sin.f64 kx)) (.f64 (pow.f64 (sin.f64 kx) #s(literal -3 binary64)) #s(literal 1/12 binary64))) (+.f64 (.f64 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 kx)) (+.f64 (+.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal -8 binary64)) (.f64 (pow.f64 (sin.f64 kx) #s(literal -6 binary64)) #s(literal 2/3 binary64))) (.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 2/45 binary64))) (.f64 (/.f64 (-.f64 (.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 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))) #s(literal -1/2 binary64)))) (-.f64 (.f64 (.f64 #s(literal -1/12 binary64) (sin.f64 kx)) (-.f64 (.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64)) (.f64 #s(literal -3/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -6 binary64))))) (-.f64 (/.f64 #s(literal 1/5040 binary64) (sin.f64 kx)) (.f64 #s(literal -1/240 binary64) (pow.f64 (sin.f64 kx) #s(literal -3 binary64)))))) (.f64 ky ky)) (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 kx)) (-.f64 (.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64)) (.f64 #s(literal -3/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -6 binary64))))))) (.f64 ky ky)) (-.f64 (/.f64 #s(literal 1/6 binary64) (sin.f64 kx)) (.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))) ky))
#s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (pow.f64 (sin.f64 kx) #s(literal -1 binary64)))
#s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (pow.f64 (sin.f64 kx) #s(literal -1 binary64))))
#s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (.f64 (-.f64 (.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64)) (.f64 #s(literal -3/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -6 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 ky) 2) (pow (sin kx) 2)) -1/2) (+.f64 (.f64 (-.f64 (.f64 (-.f64 (.f64 (.f64 (.f64 (.f64 ky ky) (sin.f64 kx)) (+.f64 (+.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal -8 binary64)) (.f64 (pow.f64 (sin.f64 kx) #s(literal -6 binary64)) #s(literal 2/3 binary64))) (.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 2/45 binary64))) (.f64 (/.f64 (-.f64 (.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 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))) #s(literal -1/2 binary64)))) #s(literal -1/2 binary64)) (.f64 #s(literal -1/2 binary64) (.f64 (-.f64 (.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64)) (.f64 #s(literal -3/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -6 binary64)))) (sin.f64 kx)))) (.f64 ky ky)) (.f64 (pow.f64 (sin.f64 kx) #s(literal -3 binary64)) #s(literal 1/2 binary64))) (.f64 ky ky)) (pow.f64 (sin.f64 kx) #s(literal -1 binary64))))
#s(approx (+ (pow (sin ky) 2) (pow (sin kx) 2)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))
#s(approx (+ (pow (sin ky) 2) (pow (sin kx) 2)) (+.f64 (*.f64 ky ky) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))
#s(approx (+ (pow (sin ky) 2) (pow (sin kx) 2)) (+.f64 (.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 ky) 2) (pow (sin kx) 2)) (+.f64 (.f64 (+.f64 (.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 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/3 binary64)) #s(literal 1 binary64)) (.f64 ky ky)))
#s(approx (pow (sin ky) 2) (.f64 (+.f64 (.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 (+.f64 (.f64 (-.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64)) ky) ky) #s(literal 1/3 binary64)) (.f64 ky ky)) #s(literal 1 binary64)) (.f64 ky ky)))
#s(approx (sin ky) ky)
#s(approx (sin ky) (.f64 (+.f64 (.f64 (*.f64 ky ky) #s(literal -1/6 binary64)) #s(literal 1 binary64)) ky))
#s(approx (sin ky) (.f64 (+.f64 (.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 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 ky ky)) (sin.f64 kx)) (sin.f64 kx)))
#s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+.f64 (.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sin.f64 kx)) (.f64 (/.f64 (.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 1/3 binary64)) (.f64 ky ky)) (sin.f64 kx)) #s(literal -1/2 binary64))) (*.f64 ky ky)) (sin.f64 kx)))
#s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+.f64 (.f64 (+.f64 (.f64 (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 1/3 binary64))) (sin.f64 kx)) (.f64 #s(literal -1/2 binary64) (.f64 (.f64 ky ky) (/.f64 (-.f64 #s(literal 2/45 binary64) (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 1/3 binary64))) (pow.f64 (sin.f64 kx) #s(literal 2 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 ky) 2) (pow (sin kx) 2)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))
#s(approx (+ (pow (sin ky) 2) (pow (sin kx) 2)) (+.f64 (*.f64 ky ky) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))
#s(approx (+ (pow (sin ky) 2) (pow (sin kx) 2)) (+.f64 (.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 ky) 2) (pow (sin kx) 2)) (+.f64 (.f64 (+.f64 (.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 (* (+ (* (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* ky ky)) 1) (* ky ky)) (*.f64 ky ky))
#s(approx (* (+ (* (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* ky ky)) 1) (* ky ky)) (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/3 binary64)) #s(literal 1 binary64)) (.f64 ky ky)))
#s(approx (* (+ (* (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* ky ky)) 1) (* ky ky)) (.f64 (+.f64 (.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 (* (+ (* (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* ky ky)) 1) (* ky ky)) (.f64 (+.f64 (.f64 (-.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64)) ky) ky) #s(literal 1/3 binary64)) (.f64 ky ky)) #s(literal 1 binary64)) (.f64 ky ky)))
#s(approx (+ (* (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* ky ky)) 1) #s(literal 1 binary64))
#s(approx (+ (* (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* ky ky)) 1) (+.f64 (.f64 (.f64 ky ky) #s(literal -1/3 binary64)) #s(literal 1 binary64)))
#s(approx (+ (* (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* ky ky)) 1) (+.f64 (.f64 (-.f64 (.f64 (.f64 ky ky) #s(literal 2/45 binary64)) #s(literal 1/3 binary64)) (.f64 ky ky)) #s(literal 1 binary64)))
#s(approx (+ (* (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* ky ky)) 1) (+.f64 (.f64 (-.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64)) ky) ky) #s(literal 1/3 binary64)) (.f64 ky ky)) #s(literal 1 binary64)))
#s(approx (* (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* ky ky)) (.f64 (.f64 ky ky) #s(literal -1/3 binary64)))
#s(approx (* (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* ky ky)) (.f64 (-.f64 (.f64 (.f64 ky ky) #s(literal 2/45 binary64)) #s(literal 1/3 binary64)) (.f64 ky ky)))
#s(approx (* (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* ky ky)) (.f64 (-.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64)) ky) ky) #s(literal 1/3 binary64)) (.f64 ky ky)))
#s(approx (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) #s(literal -1/3 binary64))
#s(approx (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (-.f64 (.f64 (.f64 ky ky) #s(literal 2/45 binary64)) #s(literal 1/3 binary64)))
#s(approx (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (-.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64)) ky) ky) #s(literal 1/3 binary64)))
#s(approx (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) (.f64 (.f64 ky ky) #s(literal 2/45 binary64)))
#s(approx (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) (.f64 (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64)) ky) ky))
#s(approx (+ (* (* ky ky) -1/315) 2/45) #s(literal 2/45 binary64))
#s(approx (+ (* (* ky ky) -1/315) 2/45) (+.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64)))
#s(approx (* (* ky ky) -1/315) (.f64 (.f64 ky ky) #s(literal -1/315 binary64)))
#s(approx (* ky ky) (*.f64 ky ky))
#s(approx (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (* (sin th) (sin ky))) (/.f64 (*.f64 (sin.f64 th) ky) (sin.f64 kx)))
#s(approx (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (* (sin th) (sin ky))) (.f64 (+.f64 (.f64 (+.f64 (/.f64 (.f64 #s(literal -1/6 binary64) (sin.f64 th)) (sin.f64 kx)) (/.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 (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (* (sin th) (sin ky))) (.f64 (+.f64 (.f64 (+.f64 (+.f64 (/.f64 (.f64 #s(literal -1/6 binary64) (sin.f64 th)) (sin.f64 kx)) (/.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))) (.f64 (+.f64 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 kx)) (.f64 (-.f64 (.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64)) (.f64 #s(literal -3/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -6 binary64)))) (sin.f64 th))) (/.f64 (.f64 #s(literal 1/12 binary64) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal 1/120 binary64) (sin.f64 th)) (sin.f64 kx))) (.f64 ky ky))) (.f64 ky ky)) (/.f64 (sin.f64 th) (sin.f64 kx))) ky))
#s(approx (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (* (sin th) (sin ky))) (.f64 (+.f64 (.f64 (+.f64 (+.f64 (/.f64 (.f64 #s(literal -1/6 binary64) (sin.f64 th)) (sin.f64 kx)) (/.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))) (.f64 (+.f64 (+.f64 (/.f64 (.f64 #s(literal 1/120 binary64) (sin.f64 th)) (sin.f64 kx)) (/.f64 (.f64 #s(literal 1/12 binary64) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))) (+.f64 (.f64 (+.f64 (+.f64 (+.f64 (/.f64 (.f64 #s(literal -1/5040 binary64) (sin.f64 th)) (sin.f64 kx)) (/.f64 (.f64 #s(literal -1/240 binary64) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))) (.f64 (.f64 #s(literal -1/12 binary64) (sin.f64 kx)) (.f64 (-.f64 (.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64)) (.f64 #s(literal -3/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -6 binary64)))) (sin.f64 th)))) (.f64 (.f64 (.f64 (sin.f64 kx) (sin.f64 th)) (+.f64 (+.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal -8 binary64)) (.f64 (pow.f64 (sin.f64 kx) #s(literal -6 binary64)) #s(literal 2/3 binary64))) (.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 2/45 binary64))) (.f64 (/.f64 (-.f64 (.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 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))) #s(literal -1/2 binary64)))) #s(literal -1/2 binary64))) (.f64 ky ky)) (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 kx)) (.f64 (-.f64 (.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64)) (.f64 #s(literal -3/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -6 binary64)))) (sin.f64 th))))) (.f64 ky ky))) (*.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 (+.f64 (.f64 (.f64 (.f64 ky ky) #s(literal -1/6 binary64)) (sin.f64 th)) (sin.f64 th)) ky))
#s(approx (* (sin th) (sin ky)) (.f64 (+.f64 (.f64 (+.f64 (.f64 (.f64 (.f64 ky ky) #s(literal 1/120 binary64)) (sin.f64 th)) (.f64 #s(literal -1/6 binary64) (sin.f64 th))) (*.f64 ky ky)) (sin.f64 th)) ky))
#s(approx (* (sin th) (sin ky)) (.f64 (+.f64 (.f64 (+.f64 (.f64 (-.f64 (.f64 (.f64 (.f64 ky ky) #s(literal -1/5040 binary64)) (sin.f64 th)) (.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 (pow (sin ky) 2) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))
#s(approx (sin ky) (sin.f64 ky))
#s(approx (* (+ (* (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* ky ky)) 1) (* ky ky)) (*.f64 (pow.f64 ky #s(literal 8 binary64)) #s(literal -1/315 binary64)))
#s(approx (* (+ (* (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* ky ky)) 1) (* ky ky)) (.f64 (-.f64 (.f64 (pow.f64 ky #s(literal -2 binary64)) #s(literal 2/45 binary64)) #s(literal 1/315 binary64)) (pow.f64 ky #s(literal 8 binary64))))
#s(approx (* (+ (* (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* ky ky)) 1) (* ky ky)) (.f64 (-.f64 (-.f64 (.f64 (pow.f64 ky #s(literal -2 binary64)) #s(literal 2/45 binary64)) #s(literal 1/315 binary64)) (/.f64 #s(literal 1/3 binary64) (pow.f64 ky #s(literal 4 binary64)))) (pow.f64 ky #s(literal 8 binary64))))
#s(approx (* (+ (* (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* ky ky)) 1) (* ky ky)) (.f64 (-.f64 (+.f64 (pow.f64 ky #s(literal -6 binary64)) (.f64 (pow.f64 ky #s(literal -2 binary64)) #s(literal 2/45 binary64))) (+.f64 (/.f64 #s(literal 1/3 binary64) (pow.f64 ky #s(literal 4 binary64))) #s(literal 1/315 binary64))) (pow.f64 ky #s(literal 8 binary64))))
#s(approx (+ (* (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* ky ky)) 1) (*.f64 (pow.f64 ky #s(literal 6 binary64)) #s(literal -1/315 binary64)))
#s(approx (+ (* (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* ky ky)) 1) (.f64 (pow.f64 ky #s(literal 6 binary64)) (-.f64 (.f64 (pow.f64 ky #s(literal -2 binary64)) #s(literal 2/45 binary64)) #s(literal 1/315 binary64))))
#s(approx (+ (* (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* ky ky)) 1) (.f64 (pow.f64 ky #s(literal 6 binary64)) (-.f64 (-.f64 (.f64 (pow.f64 ky #s(literal -2 binary64)) #s(literal 2/45 binary64)) #s(literal 1/315 binary64)) (/.f64 #s(literal 1/3 binary64) (pow.f64 ky #s(literal 4 binary64))))))
#s(approx (+ (* (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* ky ky)) 1) (.f64 (-.f64 (+.f64 (pow.f64 ky #s(literal -6 binary64)) (.f64 (pow.f64 ky #s(literal -2 binary64)) #s(literal 2/45 binary64))) (+.f64 (/.f64 #s(literal 1/3 binary64) (pow.f64 ky #s(literal 4 binary64))) #s(literal 1/315 binary64))) (pow.f64 ky #s(literal 6 binary64))))
#s(approx (* (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* ky ky)) (*.f64 (pow.f64 ky #s(literal 6 binary64)) #s(literal -1/315 binary64)))
#s(approx (* (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* ky ky)) (.f64 (pow.f64 ky #s(literal 6 binary64)) (-.f64 (.f64 (pow.f64 ky #s(literal -2 binary64)) #s(literal 2/45 binary64)) #s(literal 1/315 binary64))))
#s(approx (* (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* ky ky)) (.f64 (pow.f64 ky #s(literal 6 binary64)) (-.f64 (-.f64 (.f64 (pow.f64 ky #s(literal -2 binary64)) #s(literal 2/45 binary64)) #s(literal 1/315 binary64)) (/.f64 #s(literal 1/3 binary64) (pow.f64 ky #s(literal 4 binary64))))))
#s(approx (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (*.f64 (pow.f64 ky #s(literal 4 binary64)) #s(literal -1/315 binary64)))
#s(approx (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (.f64 (pow.f64 ky #s(literal 4 binary64)) (-.f64 (.f64 (pow.f64 ky #s(literal -2 binary64)) #s(literal 2/45 binary64)) #s(literal 1/315 binary64))))
#s(approx (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (.f64 (-.f64 (-.f64 (.f64 (pow.f64 ky #s(literal -2 binary64)) #s(literal 2/45 binary64)) #s(literal 1/315 binary64)) (/.f64 #s(literal 1/3 binary64) (pow.f64 ky #s(literal 4 binary64)))) (pow.f64 ky #s(literal 4 binary64))))
#s(approx (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) (*.f64 (pow.f64 ky #s(literal 4 binary64)) #s(literal -1/315 binary64)))
#s(approx (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) (.f64 (pow.f64 ky #s(literal 4 binary64)) (-.f64 (.f64 (pow.f64 ky #s(literal -2 binary64)) #s(literal 2/45 binary64)) #s(literal 1/315 binary64))))
#s(approx (+ (* (* ky ky) -1/315) 2/45) (.f64 (.f64 ky ky) #s(literal -1/315 binary64)))
#s(approx (+ (* (* ky ky) -1/315) 2/45) (.f64 (-.f64 (.f64 (pow.f64 ky #s(literal -2 binary64)) #s(literal 2/45 binary64)) #s(literal 1/315 binary64)) (*.f64 ky ky)))
#s(approx (* (sin th) (sin ky)) (*.f64 (sin.f64 th) (sin.f64 ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (.f64 th (sin.f64 ky)) (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (+.f64 (.f64 (.f64 (.f64 (.f64 th th) #s(literal -1/6 binary64)) (sin.f64 ky)) (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (sin.f64 ky))) th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (+.f64 (.f64 (+.f64 (.f64 (.f64 (.f64 (.f64 th th) #s(literal 1/120 binary64)) (sin.f64 ky)) (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (.f64 (.f64 #s(literal -1/6 binary64) (sin.f64 ky)) (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (.f64 th th)) (.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (sin.f64 ky))) th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (+.f64 (.f64 (+.f64 (.f64 (+.f64 (.f64 (.f64 #s(literal 1/120 binary64) (sin.f64 ky)) (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (.f64 (.f64 (.f64 (.f64 th th) #s(literal -1/5040 binary64)) (sin.f64 ky)) (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (.f64 th th)) (.f64 (.f64 #s(literal -1/6 binary64) (sin.f64 ky)) (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (.f64 th th)) (.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (sin.f64 ky))) th))
#s(approx (sin th) th)
#s(approx (sin th) (.f64 (+.f64 (.f64 (*.f64 th th) #s(literal -1/6 binary64)) #s(literal 1 binary64)) th))
#s(approx (sin th) (.f64 (+.f64 (.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 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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 (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (* (sin th) (sin ky))) (.f64 (.f64 th (sin.f64 ky)) (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64))))
#s(approx (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (* (sin th) (sin ky))) (.f64 (+.f64 (.f64 (.f64 (.f64 (.f64 th th) #s(literal -1/6 binary64)) (sin.f64 ky)) (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (sin.f64 ky))) th))
#s(approx (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (* (sin th) (sin ky))) (.f64 (+.f64 (.f64 (+.f64 (.f64 (.f64 (.f64 (.f64 th th) #s(literal 1/120 binary64)) (sin.f64 ky)) (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (.f64 (.f64 #s(literal -1/6 binary64) (sin.f64 ky)) (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (.f64 th th)) (.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (sin.f64 ky))) th))
#s(approx (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (* (sin th) (sin ky))) (.f64 (+.f64 (.f64 (+.f64 (.f64 (+.f64 (.f64 (.f64 #s(literal 1/120 binary64) (sin.f64 ky)) (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (.f64 (.f64 (.f64 (.f64 th th) #s(literal -1/5040 binary64)) (sin.f64 ky)) (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (.f64 th th)) (.f64 (.f64 #s(literal -1/6 binary64) (sin.f64 ky)) (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (.f64 th th)) (.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (sin.f64 ky))) th))
#s(approx (* (sin th) (sin ky)) (*.f64 th (sin.f64 ky)))
#s(approx (* (sin th) (sin ky)) (.f64 (+.f64 (.f64 (.f64 (.f64 th th) #s(literal -1/6 binary64)) (sin.f64 ky)) (sin.f64 ky)) th))
#s(approx (* (sin th) (sin ky)) (.f64 (+.f64 (.f64 (+.f64 (.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 (+.f64 (.f64 (+.f64 (.f64 (-.f64 (.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 (sin th) (sin.f64 th))

eval73.0ms (1%)

Memory: 8.9MiB live, 151.7MiB allocated; 16ms collecting garbage
Compiler: Compiled 25 381 to 2 964 computations (88.3% saved)

prune44.0ms (0.6%)

Memory

23.6MiB live, 118.0MiB allocated; 4ms collecting garbage

Pruning

38 alts after pruning (36 fresh and 2 done)

	Pruned	Kept	Total
New	556	25	581
Fresh	8	11	19
Picked	3	2	5
Done	0	0	0
Total	567	38	605

Accuracy

99.9%

Counts

605 → 38

Alt Table

Click to see full alt table

Status	Accuracy	Program
	39.7%	(*.f64 (/.f64 (sin.f64 ky) (/.f64 #s(literal 1 binary64) (pow.f64 #s(approx (+ (pow (sin ky) 2) (pow (sin kx) 2)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (sin.f64 th))
	85.2%	(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 (sin.f64 ky) #s(literal 4 binary64))) (-.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (sin.f64 th))
▶	45.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))))) #s(approx (sin th) th))
	21.9%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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 th) th))
	85.3%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
	36.5%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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)))))) (sin.f64 th))
	42.0%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 (+.f64 (.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))))) (sin.f64 th))
	52.7%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
	27.7%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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)))))) (sin.f64 th))
✓	39.9%	(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
	18.1%	(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(approx (sin th) th))
	41.9%	(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 th))
	30.3%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (sin.f64 th))
	13.6%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (sin.f64 th))
	34.2%	(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sin.f64 kx))) (sin.f64 th))
	42.2%	(.f64 (/.f64 (exp.f64 (.f64 (log.f64 (sin.f64 ky)) #s(literal 1 binary64))) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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)))))) (sin.f64 th))
	44.8%	(.f64 (/.f64 #s(approx (sin ky) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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)) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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)))))) (sin.f64 th))
	44.3%	(.f64 (/.f64 #s(approx (sin ky) ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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)))))) (sin.f64 th))
	31.4%	(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (sin.f64 kx))) (sin.f64 th))
▶	26.6%	(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (*.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 1 binary64))) (sin.f64 th))
	93.2%	(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 (pow.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/4 binary64)) #s(literal 2 binary64)) (sin.f64 ky))) (sin.f64 th))
	45.4%	(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (sin.f64 ky))) #s(approx (sin th) th))
	85.2%	(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal -1/2 binary64)) (sin.f64 ky))) (sin.f64 th))
	48.6%	(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) #s(approx (pow (sin kx) 2) (.f64 (+.f64 (.f64 #s(literal -1/3 binary64) (.f64 kx kx)) #s(literal 1 binary64)) (.f64 kx kx)))) #s(literal -1/2 binary64)) (sin.f64 ky))) (sin.f64 th))
	41.9%	(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 (pow.f64 #s(approx (+ (pow (sin ky) 2) (pow (sin kx) 2)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (sin.f64 ky))) (sin.f64 th))
▶	33.7%	(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (pow.f64 (sin.f64 ky) #s(literal -1 binary64))) (sin.f64 ky))) (sin.f64 th))
	34.1%	(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (pow.f64 (sin.f64 kx) #s(literal -1 binary64))) (sin.f64 ky))) (sin.f64 th))
	29.2%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (sin.f64 kx)))
	43.4%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (.f64 #s(approx (sin th) th) (sin.f64 ky))))
	84.4%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal -1/2 binary64)) (.f64 (sin.f64 th) (sin.f64 ky))))
	40.8%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (pow.f64 #s(approx (+ (pow (sin ky) 2) (pow (sin kx) 2)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (.f64 (sin.f64 th) (sin.f64 ky))))
	24.0%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (+.f64 (.f64 (+.f64 (/.f64 (.f64 #s(literal -1/6 binary64) (sin.f64 th)) (sin.f64 kx)) (/.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))
▶	93.5%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (sin.f64 th)) (sin.f64 ky)))
	40.9%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (pow.f64 (sin.f64 ky) #s(literal -1 binary64))) (.f64 (sin.f64 th) (sin.f64 ky))))
	31.9%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (pow.f64 (sin.f64 kx) #s(literal -1 binary64))) (.f64 (sin.f64 th) (sin.f64 ky))))
✓	33.7%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th))
	14.6%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (.f64 (+.f64 (.f64 (*.f64 th th) #s(literal -1/6 binary64)) #s(literal 1 binary64)) th)))
▶	15.5%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) th))

Compiler

Compiled 2 388 to 1 684 computations (29.5% saved)

series42.0ms (0.6%)

Memory

-4.8MiB live, 92.2MiB allocated; 7ms collecting garbage

Counts

34 → 141

Calls

Call 1

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

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 (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (sin ky)) #s(hole binary64 (sin th)))
#s(approx (* (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (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 ky) 2) (pow (sin kx) 2)) -1/2) (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 ky) 2) (pow (sin kx) 2)) -1/2) (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 ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) #s(hole binary64 (/ (sin th) (sin ky))))
#s(approx (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) #s(hole binary64 (+ (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 3))) (/ (sin th) (sin ky)))))
#s(approx (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (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 (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (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 (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) #s(hole binary64 (/ 1 (sin ky))))
#s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) #s(hole binary64 (+ (* -1/2 (/ (pow kx 2) (pow (sin ky) 3))) (/ 1 (sin ky)))))
#s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -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 ky) 2) (pow (sin kx) 2)) -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 ky) 2) (pow (sin kx) 2)) #s(hole binary64 (pow (sin ky) 2)))
#s(approx (+ (pow (sin ky) 2) (pow (sin kx) 2)) #s(hole binary64 (+ (pow kx 2) (pow (sin ky) 2))))
#s(approx (+ (pow (sin ky) 2) (pow (sin kx) 2)) #s(hole binary64 (+ (* (pow kx 2) (+ 1 (* -1/3 (pow kx 2)))) (pow (sin ky) 2))))
#s(approx (+ (pow (sin ky) 2) (pow (sin kx) 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)))) #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 (+ (/ (* -1/2 (* kx kx)) (pow (sin ky) 2)) 1) #s(hole binary64 1))
#s(approx (+ (/ (* -1/2 (* kx kx)) (pow (sin ky) 2)) 1) #s(hole binary64 (+ 1 (* -1/2 (/ (pow kx 2) (pow (sin ky) 2))))))
#s(approx (/ (* -1/2 (* kx kx)) (pow (sin ky) 2)) #s(hole binary64 (* -1/2 (/ (pow kx 2) (pow (sin ky) 2)))))
#s(approx (* -1/2 (* kx kx)) #s(hole binary64 (* -1/2 (pow kx 2))))
#s(approx (* kx kx) #s(hole binary64 (pow kx 2)))
#s(approx (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin ky)) #s(hole binary64 1))
#s(approx (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin ky)) #s(hole binary64 (+ 1 (* -1/2 (/ (pow kx 2) (pow (sin ky) 2))))))
#s(approx (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -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 ky) 2) (pow (sin kx) 2)) -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 (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 (* (/ (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 (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (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 ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) #s(hole binary64 (* (sin th) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
#s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) #s(hole binary64 (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))
#s(approx (+ (pow (sin ky) 2) (pow (sin kx) 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)))) #s(hole binary64 (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
#s(approx (+ (/ (* -1/2 (* kx kx)) (pow (sin ky) 2)) 1) #s(hole binary64 (* -1/2 (/ (pow kx 2) (pow (sin ky) 2)))))
#s(approx (+ (/ (* -1/2 (* kx kx)) (pow (sin ky) 2)) 1) #s(hole binary64 (* (pow kx 2) (- (/ 1 (pow kx 2)) (* 1/2 (/ 1 (pow (sin ky) 2)))))))
#s(approx (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin ky)) #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 (* (/ (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 (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (sin ky)) #s(hole binary64 (/ (* ky (sin th)) (sin kx))))
#s(approx (* (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (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 ky) 2) (pow (sin kx) 2)) -1/2) (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 ky) 2) (pow (sin kx) 2)) -1/2) (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 ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) #s(hole binary64 (/ (sin th) (sin kx))))
#s(approx (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) #s(hole binary64 (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (sin th) (sin kx)))))
#s(approx (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (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 (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (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 (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) #s(hole binary64 (/ 1 (sin kx))))
#s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) #s(hole binary64 (+ (* -1/2 (/ (pow ky 2) (pow (sin kx) 3))) (/ 1 (sin kx)))))
#s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -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 ky) 2) (pow (sin kx) 2)) -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 ky) 2) (pow (sin kx) 2)) #s(hole binary64 (pow (sin kx) 2)))
#s(approx (+ (pow (sin ky) 2) (pow (sin kx) 2)) #s(hole binary64 (+ (pow ky 2) (pow (sin kx) 2))))
#s(approx (+ (pow (sin ky) 2) (pow (sin kx) 2)) #s(hole binary64 (+ (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2)))) (pow (sin kx) 2))))
#s(approx (+ (pow (sin ky) 2) (pow (sin kx) 2)) #s(hole binary64 (+ (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3)))) (pow (sin kx) 2))))
#s(approx (pow (sin ky) 2) #s(hole binary64 (pow ky 2)))
#s(approx (pow (sin ky) 2) #s(hole binary64 (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2))))))
#s(approx (pow (sin ky) 2) #s(hole binary64 (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3))))))
#s(approx (pow (sin ky) 2) #s(hole binary64 (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* (pow ky 2) (+ 2/45 (* -1/315 (pow ky 2)))) 1/3))))))
#s(approx (sin ky) #s(hole binary64 ky))
#s(approx (sin ky) #s(hole binary64 (* ky (+ 1 (* -1/6 (pow ky 2))))))
#s(approx (sin ky) #s(hole binary64 (* ky (+ 1 (* (pow ky 2) (- (* 1/120 (pow ky 2)) 1/6))))))
#s(approx (sin ky) #s(hole binary64 (* ky (+ 1 (* (pow ky 2) (- (* (pow ky 2) (+ 1/120 (* -1/5040 (pow ky 2)))) 1/6))))))
#s(approx ky #s(hole binary64 ky))
#s(approx (/ (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 (+ (/ (* -1/2 (* kx kx)) (pow (sin ky) 2)) 1) #s(hole binary64 (* -1/2 (/ (pow kx 2) (pow ky 2)))))
#s(approx (+ (/ (* -1/2 (* kx kx)) (pow (sin ky) 2)) 1) #s(hole binary64 (/ (+ (* -1/2 (pow kx 2)) (* (pow ky 2) (+ 1 (* -1/6 (pow kx 2))))) (pow ky 2))))
#s(approx (+ (/ (* -1/2 (* kx kx)) (pow (sin ky) 2)) 1) #s(hole binary64 (/ (+ (* -1/2 (pow kx 2)) (* (pow ky 2) (+ 1 (+ (* -1/6 (pow kx 2)) (* 1/2 (* (pow ky 2) (+ (* -1/9 (pow kx 2)) (* 2/45 (pow kx 2))))))))) (pow ky 2))))
#s(approx (+ (/ (* -1/2 (* kx kx)) (pow (sin ky) 2)) 1) #s(hole binary64 (/ (+ (* -1/2 (pow kx 2)) (* (pow ky 2) (+ 1 (+ (* -1/6 (pow kx 2)) (* (pow ky 2) (+ (* 1/2 (* (pow ky 2) (+ (* -1/315 (pow kx 2)) (+ (* 2/135 (pow kx 2)) (* 1/3 (+ (* -1/9 (pow kx 2)) (* 2/45 (pow kx 2)))))))) (* 1/2 (+ (* -1/9 (pow kx 2)) (* 2/45 (pow kx 2)))))))))) (pow ky 2))))
#s(approx (/ (* -1/2 (* kx kx)) (pow (sin ky) 2)) #s(hole binary64 (* -1/2 (/ (pow kx 2) (pow ky 2)))))
#s(approx (/ (* -1/2 (* kx kx)) (pow (sin ky) 2)) #s(hole binary64 (/ (+ (* -1/2 (pow kx 2)) (* -1/6 (* (pow kx 2) (pow ky 2)))) (pow ky 2))))
#s(approx (/ (* -1/2 (* kx kx)) (pow (sin ky) 2)) #s(hole binary64 (/ (+ (* -1/2 (pow kx 2)) (* (pow ky 2) (+ (* -1/6 (pow kx 2)) (* 1/2 (* (pow ky 2) (+ (* -1/9 (pow kx 2)) (* 2/45 (pow kx 2)))))))) (pow ky 2))))
#s(approx (/ (* -1/2 (* kx kx)) (pow (sin ky) 2)) #s(hole binary64 (/ (+ (* -1/2 (pow kx 2)) (* (pow ky 2) (+ (* -1/6 (pow kx 2)) (* (pow ky 2) (+ (* 1/2 (* (pow ky 2) (+ (* -1/315 (pow kx 2)) (+ (* 2/135 (pow kx 2)) (* 1/3 (+ (* -1/9 (pow kx 2)) (* 2/45 (pow kx 2)))))))) (* 1/2 (+ (* -1/9 (pow kx 2)) (* 2/45 (pow kx 2))))))))) (pow ky 2))))
#s(approx (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin ky)) #s(hole binary64 (/ ky (sin kx))))
#s(approx (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -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 ky) 2) (pow (sin kx) 2)) -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 ky) 2) (pow (sin kx) 2)) -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 (sin ky) -1) #s(hole binary64 (/ 1 ky)))
#s(approx (pow (sin ky) -1) #s(hole binary64 (/ (+ 1 (* 1/6 (pow ky 2))) ky)))
#s(approx (pow (sin ky) -1) #s(hole binary64 (/ (+ 1 (* (pow ky 2) (+ 1/6 (* 7/360 (pow ky 2))))) ky)))
#s(approx (pow (sin ky) -1) #s(hole binary64 (/ (+ 1 (* (pow ky 2) (+ 1/6 (* (pow ky 2) (+ 7/360 (* 31/15120 (pow ky 2))))))) ky)))
#s(approx (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 (sin ky) 2)))
#s(approx (sin ky) #s(hole binary64 (sin ky)))
#s(approx (pow (sin ky) -1) #s(hole binary64 (/ 1 (sin ky))))
#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 (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (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 ky) 2) (pow (sin kx) 2)) -1/2) (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 ky) 2) (pow (sin kx) 2)) -1/2) (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 ky) 2) (pow (sin kx) 2)) -1/2) (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 (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) #s(hole binary64 (* th (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
#s(approx (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (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 (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (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 (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (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 (sin th) #s(hole binary64 (sin th)))

Calls

9 calls:

Time	Variable		Point	Expression
7.0ms	ky	@	-inf	((* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (* (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (sin ky)) (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (+ (pow (sin ky) 2) (pow (sin kx) 2)) (pow (sin ky) 2) (sin ky) ky 2 (pow (sin kx) 2) (sin kx) kx -1/2 (sin th) th (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin 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)))) (+ (/ (* -1/2 (* kx kx)) (pow (sin ky) 2)) 1) (/ (* -1/2 (* kx kx)) (pow (sin ky) 2)) (* -1/2 (* kx kx)) (* kx kx) 1 (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin ky)) (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (pow (sin ky) -1) -1 (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+ (pow (sin kx) 2) (pow (sin ky) 2)))
6.0ms	kx	@	inf	((* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (* (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (sin ky)) (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (+ (pow (sin ky) 2) (pow (sin kx) 2)) (pow (sin ky) 2) (sin ky) ky 2 (pow (sin kx) 2) (sin kx) kx -1/2 (sin th) th (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin 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)))) (+ (/ (* -1/2 (* kx kx)) (pow (sin ky) 2)) 1) (/ (* -1/2 (* kx kx)) (pow (sin ky) 2)) (* -1/2 (* kx kx)) (* kx kx) 1 (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin ky)) (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (pow (sin ky) -1) -1 (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+ (pow (sin kx) 2) (pow (sin ky) 2)))
5.0ms	ky	@	inf	((* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (* (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (sin ky)) (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (+ (pow (sin ky) 2) (pow (sin kx) 2)) (pow (sin ky) 2) (sin ky) ky 2 (pow (sin kx) 2) (sin kx) kx -1/2 (sin th) th (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin 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)))) (+ (/ (* -1/2 (* kx kx)) (pow (sin ky) 2)) 1) (/ (* -1/2 (* kx kx)) (pow (sin ky) 2)) (* -1/2 (* kx kx)) (* kx kx) 1 (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin ky)) (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (pow (sin ky) -1) -1 (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+ (pow (sin kx) 2) (pow (sin ky) 2)))
4.0ms	ky	@	0	((* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (* (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (sin ky)) (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (+ (pow (sin ky) 2) (pow (sin kx) 2)) (pow (sin ky) 2) (sin ky) ky 2 (pow (sin kx) 2) (sin kx) kx -1/2 (sin th) th (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin 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)))) (+ (/ (* -1/2 (* kx kx)) (pow (sin ky) 2)) 1) (/ (* -1/2 (* kx kx)) (pow (sin ky) 2)) (* -1/2 (* kx kx)) (* kx kx) 1 (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin ky)) (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (pow (sin ky) -1) -1 (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+ (pow (sin kx) 2) (pow (sin ky) 2)))
4.0ms	kx	@	-inf	((* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (* (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (sin ky)) (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (+ (pow (sin ky) 2) (pow (sin kx) 2)) (pow (sin ky) 2) (sin ky) ky 2 (pow (sin kx) 2) (sin kx) kx -1/2 (sin th) th (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin 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)))) (+ (/ (* -1/2 (* kx kx)) (pow (sin ky) 2)) 1) (/ (* -1/2 (* kx kx)) (pow (sin ky) 2)) (* -1/2 (* kx kx)) (* kx kx) 1 (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin ky)) (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (pow (sin ky) -1) -1 (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+ (pow (sin kx) 2) (pow (sin ky) 2)))

rewrite214.0ms (2.9%)

Memory

1.8MiB live, 285.7MiB allocated; 23ms collecting garbage

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	687	6226
0	735	5853
1	4053	5802
0	8270	5802

Stop Event

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

Counts

175 → 282

Calls

Call 1

Inputs
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (sin.f64 th)) (sin.f64 ky)))
(.f64 (.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (sin.f64 th)) (sin.f64 ky))
(*.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (sin.f64 th))
(pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64))
(+.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 2 binary64))
(sin.f64 ky)
ky
#s(literal 2 binary64)
(pow.f64 (sin.f64 kx) #s(literal 2 binary64))
(sin.f64 kx)
kx
#s(literal -1/2 binary64)
(sin.f64 th)
th
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) th))
#s(approx (sin th) th)
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (*.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 1 binary64))) (sin.f64 th))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 1 binary64)))
(+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 1 binary64))
(/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))
(.f64 #s(literal -1/2 binary64) (.f64 kx kx))
(*.f64 kx kx)
#s(literal 1 binary64)
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (pow.f64 (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 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (pow.f64 (sin.f64 ky) #s(literal -1 binary64))) (sin.f64 ky)))
(*.f64 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (pow.f64 (sin.f64 ky) #s(literal -1 binary64))) (sin.f64 ky))
#s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (pow.f64 (sin.f64 ky) #s(literal -1 binary64)))
(pow.f64 (sin.f64 ky) #s(literal -1 binary64))
#s(literal -1 binary64)
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(approx (sin th) 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)))))
(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)))
#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 (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (sin ky)) #s(hole binary64 (sin th)))
#s(approx (* (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (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 ky) 2) (pow (sin kx) 2)) -1/2) (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 ky) 2) (pow (sin kx) 2)) -1/2) (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 ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) #s(hole binary64 (/ (sin th) (sin ky))))
#s(approx (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) #s(hole binary64 (+ (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 3))) (/ (sin th) (sin ky)))))
#s(approx (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (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 (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (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 (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) #s(hole binary64 (/ 1 (sin ky))))
#s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) #s(hole binary64 (+ (* -1/2 (/ (pow kx 2) (pow (sin ky) 3))) (/ 1 (sin ky)))))
#s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -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 ky) 2) (pow (sin kx) 2)) -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 ky) 2) (pow (sin kx) 2)) #s(hole binary64 (pow (sin ky) 2)))
#s(approx (+ (pow (sin ky) 2) (pow (sin kx) 2)) #s(hole binary64 (+ (pow kx 2) (pow (sin ky) 2))))
#s(approx (+ (pow (sin ky) 2) (pow (sin kx) 2)) #s(hole binary64 (+ (* (pow kx 2) (+ 1 (* -1/3 (pow kx 2)))) (pow (sin ky) 2))))
#s(approx (+ (pow (sin ky) 2) (pow (sin kx) 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)))) #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 (+ (/ (* -1/2 (* kx kx)) (pow (sin ky) 2)) 1) #s(hole binary64 1))
#s(approx (+ (/ (* -1/2 (* kx kx)) (pow (sin ky) 2)) 1) #s(hole binary64 (+ 1 (* -1/2 (/ (pow kx 2) (pow (sin ky) 2))))))
#s(approx (/ (* -1/2 (* kx kx)) (pow (sin ky) 2)) #s(hole binary64 (* -1/2 (/ (pow kx 2) (pow (sin ky) 2)))))
#s(approx (* -1/2 (* kx kx)) #s(hole binary64 (* -1/2 (pow kx 2))))
#s(approx (* kx kx) #s(hole binary64 (pow kx 2)))
#s(approx (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin ky)) #s(hole binary64 1))
#s(approx (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin ky)) #s(hole binary64 (+ 1 (* -1/2 (/ (pow kx 2) (pow (sin ky) 2))))))
#s(approx (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -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 ky) 2) (pow (sin kx) 2)) -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 (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 (* (/ (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 (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (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 ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) #s(hole binary64 (* (sin th) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
#s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) #s(hole binary64 (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))
#s(approx (+ (pow (sin ky) 2) (pow (sin kx) 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)))) #s(hole binary64 (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
#s(approx (+ (/ (* -1/2 (* kx kx)) (pow (sin ky) 2)) 1) #s(hole binary64 (* -1/2 (/ (pow kx 2) (pow (sin ky) 2)))))
#s(approx (+ (/ (* -1/2 (* kx kx)) (pow (sin ky) 2)) 1) #s(hole binary64 (* (pow kx 2) (- (/ 1 (pow kx 2)) (* 1/2 (/ 1 (pow (sin ky) 2)))))))
#s(approx (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin ky)) #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 (* (/ (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 (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (sin ky)) #s(hole binary64 (/ (* ky (sin th)) (sin kx))))
#s(approx (* (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (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 ky) 2) (pow (sin kx) 2)) -1/2) (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 ky) 2) (pow (sin kx) 2)) -1/2) (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 ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) #s(hole binary64 (/ (sin th) (sin kx))))
#s(approx (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) #s(hole binary64 (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (sin th) (sin kx)))))
#s(approx (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (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 (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (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 (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) #s(hole binary64 (/ 1 (sin kx))))
#s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) #s(hole binary64 (+ (* -1/2 (/ (pow ky 2) (pow (sin kx) 3))) (/ 1 (sin kx)))))
#s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -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 ky) 2) (pow (sin kx) 2)) -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 ky) 2) (pow (sin kx) 2)) #s(hole binary64 (pow (sin kx) 2)))
#s(approx (+ (pow (sin ky) 2) (pow (sin kx) 2)) #s(hole binary64 (+ (pow ky 2) (pow (sin kx) 2))))
#s(approx (+ (pow (sin ky) 2) (pow (sin kx) 2)) #s(hole binary64 (+ (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2)))) (pow (sin kx) 2))))
#s(approx (+ (pow (sin ky) 2) (pow (sin kx) 2)) #s(hole binary64 (+ (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3)))) (pow (sin kx) 2))))
#s(approx (pow (sin ky) 2) #s(hole binary64 (pow ky 2)))
#s(approx (pow (sin ky) 2) #s(hole binary64 (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2))))))
#s(approx (pow (sin ky) 2) #s(hole binary64 (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3))))))
#s(approx (pow (sin ky) 2) #s(hole binary64 (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* (pow ky 2) (+ 2/45 (* -1/315 (pow ky 2)))) 1/3))))))
#s(approx (sin ky) #s(hole binary64 ky))
#s(approx (sin ky) #s(hole binary64 (* ky (+ 1 (* -1/6 (pow ky 2))))))
#s(approx (sin ky) #s(hole binary64 (* ky (+ 1 (* (pow ky 2) (- (* 1/120 (pow ky 2)) 1/6))))))
#s(approx (sin ky) #s(hole binary64 (* ky (+ 1 (* (pow ky 2) (- (* (pow ky 2) (+ 1/120 (* -1/5040 (pow ky 2)))) 1/6))))))
#s(approx ky #s(hole binary64 ky))
#s(approx (/ (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 (+ (/ (* -1/2 (* kx kx)) (pow (sin ky) 2)) 1) #s(hole binary64 (* -1/2 (/ (pow kx 2) (pow ky 2)))))
#s(approx (+ (/ (* -1/2 (* kx kx)) (pow (sin ky) 2)) 1) #s(hole binary64 (/ (+ (* -1/2 (pow kx 2)) (* (pow ky 2) (+ 1 (* -1/6 (pow kx 2))))) (pow ky 2))))
#s(approx (+ (/ (* -1/2 (* kx kx)) (pow (sin ky) 2)) 1) #s(hole binary64 (/ (+ (* -1/2 (pow kx 2)) (* (pow ky 2) (+ 1 (+ (* -1/6 (pow kx 2)) (* 1/2 (* (pow ky 2) (+ (* -1/9 (pow kx 2)) (* 2/45 (pow kx 2))))))))) (pow ky 2))))
#s(approx (+ (/ (* -1/2 (* kx kx)) (pow (sin ky) 2)) 1) #s(hole binary64 (/ (+ (* -1/2 (pow kx 2)) (* (pow ky 2) (+ 1 (+ (* -1/6 (pow kx 2)) (* (pow ky 2) (+ (* 1/2 (* (pow ky 2) (+ (* -1/315 (pow kx 2)) (+ (* 2/135 (pow kx 2)) (* 1/3 (+ (* -1/9 (pow kx 2)) (* 2/45 (pow kx 2)))))))) (* 1/2 (+ (* -1/9 (pow kx 2)) (* 2/45 (pow kx 2)))))))))) (pow ky 2))))
#s(approx (/ (* -1/2 (* kx kx)) (pow (sin ky) 2)) #s(hole binary64 (* -1/2 (/ (pow kx 2) (pow ky 2)))))
#s(approx (/ (* -1/2 (* kx kx)) (pow (sin ky) 2)) #s(hole binary64 (/ (+ (* -1/2 (pow kx 2)) (* -1/6 (* (pow kx 2) (pow ky 2)))) (pow ky 2))))
#s(approx (/ (* -1/2 (* kx kx)) (pow (sin ky) 2)) #s(hole binary64 (/ (+ (* -1/2 (pow kx 2)) (* (pow ky 2) (+ (* -1/6 (pow kx 2)) (* 1/2 (* (pow ky 2) (+ (* -1/9 (pow kx 2)) (* 2/45 (pow kx 2)))))))) (pow ky 2))))
#s(approx (/ (* -1/2 (* kx kx)) (pow (sin ky) 2)) #s(hole binary64 (/ (+ (* -1/2 (pow kx 2)) (* (pow ky 2) (+ (* -1/6 (pow kx 2)) (* (pow ky 2) (+ (* 1/2 (* (pow ky 2) (+ (* -1/315 (pow kx 2)) (+ (* 2/135 (pow kx 2)) (* 1/3 (+ (* -1/9 (pow kx 2)) (* 2/45 (pow kx 2)))))))) (* 1/2 (+ (* -1/9 (pow kx 2)) (* 2/45 (pow kx 2))))))))) (pow ky 2))))
#s(approx (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin ky)) #s(hole binary64 (/ ky (sin kx))))
#s(approx (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -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 ky) 2) (pow (sin kx) 2)) -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 ky) 2) (pow (sin kx) 2)) -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 (sin ky) -1) #s(hole binary64 (/ 1 ky)))
#s(approx (pow (sin ky) -1) #s(hole binary64 (/ (+ 1 (* 1/6 (pow ky 2))) ky)))
#s(approx (pow (sin ky) -1) #s(hole binary64 (/ (+ 1 (* (pow ky 2) (+ 1/6 (* 7/360 (pow ky 2))))) ky)))
#s(approx (pow (sin ky) -1) #s(hole binary64 (/ (+ 1 (* (pow ky 2) (+ 1/6 (* (pow ky 2) (+ 7/360 (* 31/15120 (pow ky 2))))))) ky)))
#s(approx (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 (sin ky) 2)))
#s(approx (sin ky) #s(hole binary64 (sin ky)))
#s(approx (pow (sin ky) -1) #s(hole binary64 (/ 1 (sin ky))))
#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 (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (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 ky) 2) (pow (sin kx) 2)) -1/2) (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 ky) 2) (pow (sin kx) 2)) -1/2) (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 ky) 2) (pow (sin kx) 2)) -1/2) (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 (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) #s(hole binary64 (* th (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
#s(approx (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (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 (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (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 (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (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 (sin th) #s(hole binary64 (sin th)))

Outputs
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (.f64 (sin.f64 th) (sin.f64 ky))))
(.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (.f64 (sin.f64 th) (sin.f64 ky)))
(.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64)))
(.f64 (.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (sin.f64 th)) (sin.f64 ky))
(.f64 (sin.f64 ky) (.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (sin.f64 th)))
(*.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (sin.f64 th))
(*.f64 (sin.f64 th) (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64)))
(*.f64 (neg.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/4 binary64))) (neg.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/4 binary64))))
(*.f64 (fabs.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/4 binary64))) (fabs.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/4 binary64))))
(*.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/4 binary64)))
(pow.f64 (exp.f64 (log.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) #s(literal -1/2 binary64))
(pow.f64 (*.f64 (+.f64 (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 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))) #s(literal -1/4 binary64))
(pow.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1 binary64)) #s(literal 1/2 binary64))
(pow.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64))
(pow.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))) #s(literal -1 binary64))
(pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64))
(/.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (neg.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))))
(/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1 binary64)) #s(literal -1/2 binary64)))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
(sqrt.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1 binary64)))
(exp.f64 (*.f64 (log.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1 binary64))) #s(literal 1/2 binary64)))
(exp.f64 (*.f64 (log.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))) #s(literal -1/2 binary64)))
(+.f64 (cosh.f64 (.f64 (log.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))) #s(literal -1/2 binary64))) (sinh.f64 (.f64 (log.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))) #s(literal -1/2 binary64))))
(/.f64 (-.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 binary64))) (-.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #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 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)) (pow.f64 (*.f64 (sin.f64 ky) (sin.f64 kx)) #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)))))
(+.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 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))))
(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
#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 -1/2 binary64)
(sin.f64 th)
th
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) th))
#s(approx (sin th) th)
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 (/.f64 (.f64 (*.f64 kx kx) #s(literal -1/2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 1 binary64))) (sin.f64 th))
(.f64 (sin.f64 th) #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 (/.f64 (.f64 (*.f64 kx kx) #s(literal -1/2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 1 binary64))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 (/.f64 (.f64 (.f64 kx kx) #s(literal -1/2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 1 binary64)))
(/.f64 (+.f64 (.f64 (neg.f64 (.f64 (.f64 kx kx) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (neg.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (neg.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)))
(/.f64 (+.f64 (.f64 (.f64 (.f64 kx kx) #s(literal -1/2 binary64)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) #s(literal 2 binary64)))
(/.f64 (+.f64 (.f64 #s(literal 2 binary64) (neg.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (neg.f64 (.f64 (.f64 kx kx) #s(literal -1/2 binary64))))) (*.f64 #s(literal 2 binary64) (neg.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
(/.f64 (+.f64 (.f64 #s(literal 2 binary64) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 #s(literal 2 binary64) (.f64 (.f64 kx kx) #s(literal -1/2 binary64)))) (*.f64 #s(literal 2 binary64) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.f64 (.f64 (.f64 kx kx) #s(literal -1/2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 kx kx) #s(literal -1/2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (/.f64 (.f64 (.f64 kx kx) #s(literal -1/2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (/.f64 (.f64 (.f64 kx kx) #s(literal -1/2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 1 binary64)))
(/.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 kx #s(literal 6 binary64))) (pow.f64 (sin.f64 ky) #s(literal 6 binary64)))) (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (/.f64 (.f64 (.f64 kx kx) #s(literal -1/2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 kx kx) #s(literal -1/2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))))
(/.f64 (+.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 kx #s(literal 6 binary64))) (pow.f64 (sin.f64 ky) #s(literal 6 binary64))) #s(literal 1 binary64)) (+.f64 (pow.f64 (/.f64 (.f64 (.f64 kx kx) #s(literal -1/2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 kx kx) #s(literal -1/2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 1 binary64)))))
(-.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
(+.f64 (/.f64 (.f64 (.f64 kx kx) #s(literal -1/2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 kx kx) #s(literal -1/2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
(.f64 (/.f64 (.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal -1/2 binary64))
(.f64 #s(literal -1/2 binary64) (/.f64 (.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
(/.f64 (neg.f64 (.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (neg.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
(/.f64 (.f64 (.f64 kx kx) #s(literal -1/2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))
(.f64 (.f64 #s(literal -1/2 binary64) kx) kx)
(.f64 (.f64 kx kx) #s(literal -1/2 binary64))
(.f64 #s(literal -1/2 binary64) (.f64 kx kx))
(*.f64 (neg.f64 (neg.f64 kx)) (neg.f64 (neg.f64 kx)))
(*.f64 (neg.f64 (fabs.f64 kx)) (neg.f64 (fabs.f64 kx)))
(*.f64 (fabs.f64 (fabs.f64 kx)) (fabs.f64 (fabs.f64 kx)))
(*.f64 (exp.f64 (log.f64 kx)) (exp.f64 (log.f64 kx)))
(*.f64 (neg.f64 kx) (neg.f64 kx))
(*.f64 (fabs.f64 kx) (fabs.f64 kx))
(*.f64 kx kx)
(pow.f64 (exp.f64 (log.f64 kx)) #s(literal 2 binary64))
(pow.f64 (neg.f64 kx) #s(literal 2 binary64))
(pow.f64 (fabs.f64 kx) #s(literal 2 binary64))
(pow.f64 (*.f64 kx kx) #s(literal 1 binary64))
(pow.f64 kx #s(literal 2 binary64))
(fabs.f64 (*.f64 kx kx))
(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))))
#s(literal 1 binary64)
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (pow.f64 (sin.f64 ky) #s(literal -1 binary64))) (sin.f64 ky))) (sin.f64 th))
(.f64 (sin.f64 th) #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (pow.f64 (sin.f64 ky) #s(literal -1 binary64))) (sin.f64 ky))))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (*.f64 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (pow.f64 (sin.f64 ky) #s(literal -1 binary64))) (sin.f64 ky)))
(*.f64 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (pow.f64 (sin.f64 ky) #s(literal -1 binary64))) (sin.f64 ky))
(*.f64 (sin.f64 ky) #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (pow.f64 (sin.f64 ky) #s(literal -1 binary64))))
#s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (pow.f64 (sin.f64 ky) #s(literal -1 binary64)))
(*.f64 (neg.f64 (pow.f64 (sin.f64 ky) #s(literal -1/2 binary64))) (neg.f64 (pow.f64 (sin.f64 ky) #s(literal -1/2 binary64))))
(*.f64 (fabs.f64 (pow.f64 (sin.f64 ky) #s(literal -1/2 binary64))) (fabs.f64 (pow.f64 (sin.f64 ky) #s(literal -1/2 binary64))))
(*.f64 (pow.f64 (sin.f64 ky) #s(literal -1/2 binary64)) (pow.f64 (sin.f64 ky) #s(literal -1/2 binary64)))
(pow.f64 (exp.f64 (log.f64 (sin.f64 ky))) #s(literal -1 binary64))
(pow.f64 (pow.f64 (sin.f64 ky) #s(literal -1/2 binary64)) #s(literal 2 binary64))
(pow.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) #s(literal -1/2 binary64))
(pow.f64 (sin.f64 ky) #s(literal -1 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (sin.f64 ky)))
(/.f64 #s(literal 1 binary64) (sin.f64 ky))
(exp.f64 (*.f64 (log.f64 (sin.f64 ky)) #s(literal -1 binary64)))
(+.f64 (cosh.f64 (.f64 (log.f64 (sin.f64 ky)) #s(literal -1 binary64))) (sinh.f64 (.f64 (log.f64 (sin.f64 ky)) #s(literal -1 binary64))))
#s(literal -1 binary64)
(*.f64 #s(approx (sin th) th) (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) #s(approx (sin th) th))
(/.f64 (*.f64 (sin.f64 ky) #s(approx (sin th) th)) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (sin.f64 ky)) (neg.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))))
(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
(pow.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))) #s(literal 1 binary64))
(pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 1/2 binary64))
(/.f64 (sqrt.f64 (-.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 binary64)))) (sqrt.f64 (-.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 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 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 6 binary64)) (pow.f64 (sin.f64 kx) #s(literal 6 binary64)))) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 (*.f64 (sin.f64 ky) (sin.f64 kx)) #s(literal 2 binary64))))))
(/.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 6 binary64)) (pow.f64 (sin.f64 ky) #s(literal 6 binary64)))) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (*.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal 2 binary64))))))
(/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64)))
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))
(exp.f64 (*.f64 (log.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))) #s(literal 1/2 binary64)))
(/.f64 (-.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 binary64))) (-.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #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 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)) (pow.f64 (*.f64 (sin.f64 ky) (sin.f64 kx)) #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)))))
(+.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(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 (.f64 (+.f64 (.f64 (.f64 (pow.f64 (.f64 kx (sin.f64 ky)) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 1/3 binary64)) (.f64 #s(literal -3/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 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)) (+.f64 (.f64 (+.f64 (.f64 (-.f64 (.f64 (.f64 (pow.f64 (.f64 kx (sin.f64 ky)) #s(literal 2 binary64)) (.f64 (+.f64 (+.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal -8 binary64)) (.f64 #s(literal 2/3 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 binary64)))) (.f64 #s(literal 2/45 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)))) (.f64 (/.f64 (-.f64 (.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 1/3 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))) #s(literal -1/2 binary64))) (sin.f64 th))) #s(literal -1/2 binary64)) (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (-.f64 (.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 1/3 binary64)) (.f64 #s(literal -3/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 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 (* (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (sin ky)) (sin.f64 th))
#s(approx (* (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (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 ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (sin ky)) (+.f64 (.f64 (+.f64 (.f64 (.f64 (pow.f64 (.f64 kx (sin.f64 ky)) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 1/3 binary64)) (.f64 #s(literal -3/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 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 (* (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (sin ky)) (+.f64 (.f64 (+.f64 (.f64 (-.f64 (.f64 (.f64 (pow.f64 (.f64 kx (sin.f64 ky)) #s(literal 2 binary64)) (.f64 (+.f64 (+.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal -8 binary64)) (.f64 #s(literal 2/3 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 binary64)))) (.f64 #s(literal 2/45 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)))) (.f64 (/.f64 (-.f64 (.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 1/3 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))) #s(literal -1/2 binary64))) (sin.f64 th))) #s(literal -1/2 binary64)) (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (-.f64 (.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 1/3 binary64)) (.f64 #s(literal -3/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 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 (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (/.f64 (sin.f64 th) (sin.f64 ky)))
#s(approx (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (+.f64 (.f64 (/.f64 (.f64 (*.f64 kx kx) (sin.f64 th)) (pow.f64 (sin.f64 ky) #s(literal 3 binary64))) #s(literal -1/2 binary64)) (/.f64 (sin.f64 th) (sin.f64 ky))))
#s(approx (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (+.f64 (.f64 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 kx kx)) (.f64 (.f64 (-.f64 (.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 1/3 binary64)) (.f64 #s(literal -3/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 binary64)))) (sin.f64 th)) (sin.f64 ky))) (/.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) (pow.f64 (sin.f64 ky) #s(literal 3 binary64)))) (.f64 kx kx)) (/.f64 (sin.f64 th) (sin.f64 ky))))
#s(approx (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (+.f64 (.f64 (+.f64 (.f64 (-.f64 (.f64 (.f64 (.f64 kx kx) #s(literal -1/2 binary64)) (.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (+.f64 (+.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal -8 binary64)) (.f64 #s(literal 2/3 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 binary64)))) (.f64 #s(literal 2/45 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)))) (.f64 (/.f64 (-.f64 (.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 1/3 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))) #s(literal -1/2 binary64))))) (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (-.f64 (.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 1/3 binary64)) (.f64 #s(literal -3/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 binary64)))) (sin.f64 th)) (sin.f64 ky)))) (.f64 kx kx)) (/.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) (pow.f64 (sin.f64 ky) #s(literal 3 binary64)))) (.f64 kx kx)) (/.f64 (sin.f64 th) (sin.f64 ky))))
#s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (pow.f64 (sin.f64 ky) #s(literal -1 binary64)))
#s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (+.f64 (/.f64 (.f64 (.f64 kx kx) #s(literal -1/2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 3 binary64))) (pow.f64 (sin.f64 ky) #s(literal -1 binary64))))
#s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (.f64 (-.f64 (.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 1/3 binary64)) (.f64 #s(literal -3/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 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 ky) 2) (pow (sin kx) 2)) -1/2) (+.f64 (.f64 (-.f64 (.f64 (-.f64 (.f64 (.f64 (.f64 (.f64 kx kx) (sin.f64 ky)) (+.f64 (+.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal -8 binary64)) (.f64 #s(literal 2/3 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 binary64)))) (.f64 #s(literal 2/45 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)))) (.f64 (/.f64 (-.f64 (.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 1/3 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))) #s(literal -1/2 binary64)))) #s(literal -1/2 binary64)) (.f64 #s(literal -1/2 binary64) (.f64 (-.f64 (.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 1/3 binary64)) (.f64 #s(literal -3/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 binary64)))) (sin.f64 ky)))) (.f64 kx kx)) (.f64 (pow.f64 (sin.f64 ky) #s(literal -3 binary64)) #s(literal 1/2 binary64))) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal -1 binary64))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (+.f64 (*.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (+.f64 (.f64 (+.f64 (.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 (+.f64 (.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 (+.f64 (.f64 #s(literal -1/3 binary64) (.f64 kx kx)) #s(literal 1 binary64)) (.f64 kx kx)))
#s(approx (pow (sin kx) 2) (.f64 (+.f64 (.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 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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 (+.f64 (.f64 #s(literal -1/6 binary64) (*.f64 kx kx)) #s(literal 1 binary64)) kx))
#s(approx (sin kx) (.f64 (+.f64 (.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 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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)))) #s(literal 1 binary64))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 (/.f64 (.f64 (.f64 kx kx) #s(literal -1/2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 1 binary64)))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (pow.f64 (.f64 kx (sin.f64 ky)) #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 1/3 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)))) (*.f64 kx kx)) #s(literal 1 binary64)))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 (.f64 (-.f64 (.f64 (-.f64 (.f64 (.f64 (pow.f64 (.f64 kx (sin.f64 ky)) #s(literal 2 binary64)) (+.f64 (+.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal -8 binary64)) (.f64 #s(literal 2/3 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 binary64)))) (.f64 #s(literal 2/45 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)))) (.f64 (/.f64 (-.f64 (.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 1/3 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))) #s(literal -1/2 binary64)))) #s(literal -1/2 binary64)) (.f64 #s(literal -1/2 binary64) (.f64 (-.f64 (.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 1/3 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))))) (.f64 kx kx)) (.f64 (pow.f64 (sin.f64 ky) #s(literal -2 binary64)) #s(literal 1/2 binary64))) (*.f64 kx kx)) #s(literal 1 binary64)))
#s(approx (+ (/ (* -1/2 (* kx kx)) (pow (sin ky) 2)) 1) #s(literal 1 binary64))
#s(approx (+ (/ (* -1/2 (* kx kx)) (pow (sin ky) 2)) 1) (+.f64 (/.f64 (.f64 (.f64 kx kx) #s(literal -1/2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 1 binary64)))
#s(approx (/ (* -1/2 (* kx kx)) (pow (sin ky) 2)) (/.f64 (.f64 (.f64 kx kx) #s(literal -1/2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
#s(approx (* -1/2 (* kx kx)) (.f64 (.f64 kx kx) #s(literal -1/2 binary64)))
#s(approx (* kx kx) (*.f64 kx kx))
#s(approx (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin ky)) #s(literal 1 binary64))
#s(approx (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin ky)) (+.f64 (/.f64 (.f64 (.f64 kx kx) #s(literal -1/2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 1 binary64)))
#s(approx (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin ky)) (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (pow.f64 (.f64 kx (sin.f64 ky)) #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 1/3 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)))) (*.f64 kx kx)) #s(literal 1 binary64)))
#s(approx (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin ky)) (+.f64 (.f64 (-.f64 (.f64 (-.f64 (.f64 (.f64 (pow.f64 (.f64 kx (sin.f64 ky)) #s(literal 2 binary64)) (+.f64 (+.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal -8 binary64)) (.f64 #s(literal 2/3 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 binary64)))) (.f64 #s(literal 2/45 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)))) (.f64 (/.f64 (-.f64 (.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 1/3 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))) #s(literal -1/2 binary64)))) #s(literal -1/2 binary64)) (.f64 #s(literal -1/2 binary64) (.f64 (-.f64 (.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 1/3 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))))) (.f64 kx kx)) (.f64 (pow.f64 (sin.f64 ky) #s(literal -2 binary64)) #s(literal 1/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))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 kx kx)) (sin.f64 ky)) (sin.f64 ky)))
#s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+.f64 (.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sin.f64 ky)) (.f64 (/.f64 (.f64 (+.f64 (.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 kx kx)) (sin.f64 ky)))
#s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+.f64 (.f64 (+.f64 (.f64 (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64))) #s(literal 1/3 binary64))) (sin.f64 ky)) (.f64 #s(literal -1/2 binary64) (.f64 (.f64 kx kx) (/.f64 (-.f64 #s(literal 2/45 binary64) (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.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))))) (.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)) (+.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 (+.f64 (.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 (+.f64 (.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 (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (.f64 (sin.f64 th) (sin.f64 ky))))
#s(approx (* (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (sin ky)) (.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (.f64 (sin.f64 th) (sin.f64 ky))))
#s(approx (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (*.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (sin.f64 th)))
#s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64)))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #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)))) (*.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (sin.f64 ky)))
#s(approx (+ (/ (* -1/2 (* kx kx)) (pow (sin ky) 2)) 1) (/.f64 (.f64 (.f64 kx kx) #s(literal -1/2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
#s(approx (+ (/ (* -1/2 (* kx kx)) (pow (sin ky) 2)) 1) (.f64 (-.f64 (pow.f64 kx #s(literal -2 binary64)) (.f64 (pow.f64 (sin.f64 ky) #s(literal -2 binary64)) #s(literal 1/2 binary64))) (*.f64 kx kx)))
#s(approx (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin ky)) (*.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (sin.f64 ky)))
#s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (sin.f64 kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (+.f64 (.f64 (+.f64 (/.f64 (.f64 #s(literal -1/6 binary64) (sin.f64 th)) (sin.f64 kx)) (/.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 (+.f64 (.f64 (+.f64 (+.f64 (/.f64 (.f64 #s(literal -1/6 binary64) (sin.f64 th)) (sin.f64 kx)) (/.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))) (.f64 (+.f64 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 kx)) (.f64 (-.f64 (.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64)) (.f64 #s(literal -3/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -6 binary64)))) (sin.f64 th))) (/.f64 (.f64 #s(literal 1/12 binary64) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal 1/120 binary64) (sin.f64 th)) (sin.f64 kx))) (.f64 ky ky))) (.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 (+.f64 (.f64 (+.f64 (+.f64 (/.f64 (.f64 #s(literal -1/6 binary64) (sin.f64 th)) (sin.f64 kx)) (/.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))) (.f64 (+.f64 (+.f64 (/.f64 (.f64 #s(literal 1/120 binary64) (sin.f64 th)) (sin.f64 kx)) (/.f64 (.f64 #s(literal 1/12 binary64) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))) (+.f64 (.f64 (+.f64 (+.f64 (+.f64 (/.f64 (.f64 #s(literal -1/5040 binary64) (sin.f64 th)) (sin.f64 kx)) (/.f64 (.f64 #s(literal -1/240 binary64) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))) (.f64 (.f64 #s(literal -1/12 binary64) (sin.f64 kx)) (.f64 (-.f64 (.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64)) (.f64 #s(literal -3/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -6 binary64)))) (sin.f64 th)))) (.f64 (.f64 (.f64 (sin.f64 kx) (sin.f64 th)) (+.f64 (+.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal -8 binary64)) (.f64 (pow.f64 (sin.f64 kx) #s(literal -6 binary64)) #s(literal 2/3 binary64))) (.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 2/45 binary64))) (.f64 (/.f64 (-.f64 (.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 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))) #s(literal -1/2 binary64)))) #s(literal -1/2 binary64))) (.f64 ky ky)) (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 kx)) (.f64 (-.f64 (.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64)) (.f64 #s(literal -3/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -6 binary64)))) (sin.f64 th))))) (.f64 ky ky))) (*.f64 ky ky)) (/.f64 (sin.f64 th) (sin.f64 kx))) ky))
#s(approx (* (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (sin ky)) (/.f64 (*.f64 (sin.f64 th) ky) (sin.f64 kx)))
#s(approx (* (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (sin ky)) (.f64 (+.f64 (.f64 (+.f64 (/.f64 (.f64 #s(literal -1/6 binary64) (sin.f64 th)) (sin.f64 kx)) (/.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 (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (sin ky)) (.f64 (+.f64 (.f64 (+.f64 (+.f64 (/.f64 (.f64 #s(literal -1/6 binary64) (sin.f64 th)) (sin.f64 kx)) (/.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))) (.f64 (+.f64 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 kx)) (.f64 (-.f64 (.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64)) (.f64 #s(literal -3/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -6 binary64)))) (sin.f64 th))) (/.f64 (.f64 #s(literal 1/12 binary64) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal 1/120 binary64) (sin.f64 th)) (sin.f64 kx))) (.f64 ky ky))) (.f64 ky ky)) (/.f64 (sin.f64 th) (sin.f64 kx))) ky))
#s(approx (* (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (sin ky)) (.f64 (+.f64 (.f64 (+.f64 (+.f64 (/.f64 (.f64 #s(literal -1/6 binary64) (sin.f64 th)) (sin.f64 kx)) (/.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))) (.f64 (+.f64 (+.f64 (/.f64 (.f64 #s(literal 1/120 binary64) (sin.f64 th)) (sin.f64 kx)) (/.f64 (.f64 #s(literal 1/12 binary64) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))) (+.f64 (.f64 (+.f64 (+.f64 (+.f64 (/.f64 (.f64 #s(literal -1/5040 binary64) (sin.f64 th)) (sin.f64 kx)) (/.f64 (.f64 #s(literal -1/240 binary64) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))) (.f64 (.f64 #s(literal -1/12 binary64) (sin.f64 kx)) (.f64 (-.f64 (.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64)) (.f64 #s(literal -3/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -6 binary64)))) (sin.f64 th)))) (.f64 (.f64 (.f64 (sin.f64 kx) (sin.f64 th)) (+.f64 (+.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal -8 binary64)) (.f64 (pow.f64 (sin.f64 kx) #s(literal -6 binary64)) #s(literal 2/3 binary64))) (.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 2/45 binary64))) (.f64 (/.f64 (-.f64 (.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 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))) #s(literal -1/2 binary64)))) #s(literal -1/2 binary64))) (.f64 ky ky)) (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 kx)) (.f64 (-.f64 (.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64)) (.f64 #s(literal -3/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -6 binary64)))) (sin.f64 th))))) (.f64 ky ky))) (*.f64 ky ky)) (/.f64 (sin.f64 th) (sin.f64 kx))) ky))
#s(approx (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (/.f64 (sin.f64 th) (sin.f64 kx)))
#s(approx (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (+.f64 (.f64 (.f64 (*.f64 ky ky) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))) #s(literal -1/2 binary64)) (/.f64 (sin.f64 th) (sin.f64 kx))))
#s(approx (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (+.f64 (.f64 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 ky ky)) (.f64 (.f64 (-.f64 (.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64)) (.f64 #s(literal -3/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -6 binary64)))) (sin.f64 th)) (sin.f64 kx))) (/.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))))
#s(approx (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (+.f64 (.f64 (+.f64 (.f64 (-.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (.f64 (.f64 (sin.f64 kx) (sin.f64 th)) (+.f64 (+.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal -8 binary64)) (.f64 (pow.f64 (sin.f64 kx) #s(literal -6 binary64)) #s(literal 2/3 binary64))) (.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 2/45 binary64))) (.f64 (/.f64 (-.f64 (.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 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))) #s(literal -1/2 binary64))))) (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (-.f64 (.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64)) (.f64 #s(literal -3/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -6 binary64)))) (sin.f64 th)) (sin.f64 kx)))) (.f64 ky ky)) (/.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))))
#s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (pow.f64 (sin.f64 kx) #s(literal -1 binary64)))
#s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (pow.f64 (sin.f64 kx) #s(literal -1 binary64))))
#s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (.f64 (-.f64 (.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64)) (.f64 #s(literal -3/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -6 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 ky) 2) (pow (sin kx) 2)) -1/2) (+.f64 (.f64 (-.f64 (.f64 (-.f64 (.f64 (.f64 (.f64 (.f64 ky ky) (sin.f64 kx)) (+.f64 (+.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal -8 binary64)) (.f64 (pow.f64 (sin.f64 kx) #s(literal -6 binary64)) #s(literal 2/3 binary64))) (.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 2/45 binary64))) (.f64 (/.f64 (-.f64 (.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 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))) #s(literal -1/2 binary64)))) #s(literal -1/2 binary64)) (.f64 #s(literal -1/2 binary64) (.f64 (-.f64 (.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64)) (.f64 #s(literal -3/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -6 binary64)))) (sin.f64 kx)))) (.f64 ky ky)) (.f64 (pow.f64 (sin.f64 kx) #s(literal -3 binary64)) #s(literal 1/2 binary64))) (.f64 ky ky)) (pow.f64 (sin.f64 kx) #s(literal -1 binary64))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (+.f64 (*.f64 ky ky) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (+.f64 (.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)) (+.f64 (.f64 (+.f64 (.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 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/3 binary64)) #s(literal 1 binary64)) (.f64 ky ky)))
#s(approx (pow (sin ky) 2) (.f64 (+.f64 (.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 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64)) (.f64 ky ky)) #s(literal 1/3 binary64)) (.f64 ky ky)) #s(literal 1 binary64)) (.f64 ky ky)))
#s(approx (sin ky) ky)
#s(approx (sin ky) (.f64 (+.f64 (.f64 (*.f64 ky ky) #s(literal -1/6 binary64)) #s(literal 1 binary64)) ky))
#s(approx (sin ky) (.f64 (+.f64 (.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 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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 (/ (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 (+.f64 (neg.f64 (.f64 (-.f64 (/.f64 #s(literal 1/6 binary64) (sin.f64 kx)) (.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))) ky))
#s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 (+.f64 (.f64 (-.f64 (-.f64 (.f64 (+.f64 (-.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 kx)) (-.f64 (.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 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)))) (/.f64 #s(literal 1/120 binary64) (sin.f64 kx))) (.f64 ky ky)) (/.f64 #s(literal 1/6 binary64) (sin.f64 kx))) (.f64 (pow.f64 (sin.f64 kx) #s(literal -3 binary64)) #s(literal 1/2 binary64))) (*.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 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/120 binary64) (sin.f64 kx)) (.f64 (pow.f64 (sin.f64 kx) #s(literal -3 binary64)) #s(literal 1/12 binary64))) (+.f64 (.f64 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 kx)) (+.f64 (+.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal -8 binary64)) (.f64 (pow.f64 (sin.f64 kx) #s(literal -6 binary64)) #s(literal 2/3 binary64))) (.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 2/45 binary64))) (.f64 (/.f64 (-.f64 (.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 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))) #s(literal -1/2 binary64)))) (-.f64 (.f64 (.f64 #s(literal -1/12 binary64) (sin.f64 kx)) (-.f64 (.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64)) (.f64 #s(literal -3/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -6 binary64))))) (-.f64 (/.f64 #s(literal 1/5040 binary64) (sin.f64 kx)) (.f64 #s(literal -1/240 binary64) (pow.f64 (sin.f64 kx) #s(literal -3 binary64)))))) (.f64 ky ky)) (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 kx)) (-.f64 (.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64)) (.f64 #s(literal -3/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -6 binary64))))))) (.f64 ky ky)) (-.f64 (/.f64 #s(literal 1/6 binary64) (sin.f64 kx)) (.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))) ky))
#s(approx (+ (/ (* -1/2 (* kx kx)) (pow (sin ky) 2)) 1) (/.f64 (.f64 (.f64 kx kx) #s(literal -1/2 binary64)) (*.f64 ky ky)))
#s(approx (+ (/ (* -1/2 (* kx kx)) (pow (sin ky) 2)) 1) (/.f64 (+.f64 (.f64 (.f64 ky ky) (+.f64 (.f64 #s(literal -1/6 binary64) (.f64 kx kx)) #s(literal 1 binary64))) (.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (*.f64 ky ky)))
#s(approx (+ (/ (* -1/2 (* kx kx)) (pow (sin ky) 2)) 1) (/.f64 (+.f64 (.f64 (+.f64 (+.f64 (.f64 #s(literal -1/6 binary64) (.f64 kx kx)) #s(literal 1 binary64)) (.f64 (.f64 #s(literal 1/2 binary64) (.f64 ky ky)) (.f64 (.f64 kx kx) #s(literal -1/15 binary64)))) (.f64 ky ky)) (.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (.f64 ky ky)))
#s(approx (+ (/ (* -1/2 (* kx kx)) (pow (sin ky) 2)) 1) (/.f64 (+.f64 (.f64 (+.f64 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (+.f64 (-.f64 (.f64 #s(literal 2/135 binary64) (.f64 kx kx)) (.f64 #s(literal -1/3 binary64) (.f64 (.f64 kx kx) #s(literal -1/15 binary64)))) (.f64 #s(literal -1/315 binary64) (.f64 kx kx))) (.f64 ky ky)) (.f64 (.f64 kx kx) #s(literal -1/15 binary64)))) (.f64 ky ky)) (.f64 #s(literal -1/6 binary64) (.f64 kx kx))) #s(literal 1 binary64)) (.f64 ky ky)) (.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (*.f64 ky ky)))
#s(approx (/ (* -1/2 (* kx kx)) (pow (sin ky) 2)) (/.f64 (.f64 (.f64 kx kx) #s(literal -1/2 binary64)) (*.f64 ky ky)))
#s(approx (/ (* -1/2 (* kx kx)) (pow (sin ky) 2)) (/.f64 (+.f64 (.f64 (pow.f64 (.f64 ky kx) #s(literal 2 binary64)) #s(literal -1/6 binary64)) (.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (*.f64 ky ky)))
#s(approx (/ (* -1/2 (* kx kx)) (pow (sin ky) 2)) (/.f64 (+.f64 (.f64 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 ky ky)) (.f64 (.f64 kx kx) #s(literal -1/15 binary64))) (.f64 #s(literal -1/6 binary64) (.f64 kx kx))) (.f64 ky ky)) (.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (.f64 ky ky)))
#s(approx (/ (* -1/2 (* kx kx)) (pow (sin ky) 2)) (/.f64 (+.f64 (.f64 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (+.f64 (-.f64 (.f64 #s(literal 2/135 binary64) (.f64 kx kx)) (.f64 #s(literal -1/3 binary64) (.f64 (.f64 kx kx) #s(literal -1/15 binary64)))) (.f64 #s(literal -1/315 binary64) (.f64 kx kx))) (.f64 ky ky)) (.f64 (.f64 kx kx) #s(literal -1/15 binary64)))) (.f64 ky ky)) (.f64 #s(literal -1/6 binary64) (.f64 kx kx))) (.f64 ky ky)) (.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (*.f64 ky ky)))
#s(approx (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin ky)) (/.f64 ky (sin.f64 kx)))
#s(approx (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin ky)) (.f64 (+.f64 (neg.f64 (.f64 (-.f64 (/.f64 #s(literal 1/6 binary64) (sin.f64 kx)) (.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))) ky))
#s(approx (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin ky)) (.f64 (+.f64 (.f64 (-.f64 (-.f64 (.f64 (+.f64 (-.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 kx)) (-.f64 (.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 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)))) (/.f64 #s(literal 1/120 binary64) (sin.f64 kx))) (.f64 ky ky)) (/.f64 #s(literal 1/6 binary64) (sin.f64 kx))) (.f64 (pow.f64 (sin.f64 kx) #s(literal -3 binary64)) #s(literal 1/2 binary64))) (*.f64 ky ky)) (pow.f64 (sin.f64 kx) #s(literal -1 binary64))) ky))
#s(approx (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin ky)) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/120 binary64) (sin.f64 kx)) (.f64 (pow.f64 (sin.f64 kx) #s(literal -3 binary64)) #s(literal 1/12 binary64))) (+.f64 (.f64 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 kx)) (+.f64 (+.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal -8 binary64)) (.f64 (pow.f64 (sin.f64 kx) #s(literal -6 binary64)) #s(literal 2/3 binary64))) (.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 2/45 binary64))) (.f64 (/.f64 (-.f64 (.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 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))) #s(literal -1/2 binary64)))) (-.f64 (.f64 (.f64 #s(literal -1/12 binary64) (sin.f64 kx)) (-.f64 (.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64)) (.f64 #s(literal -3/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -6 binary64))))) (-.f64 (/.f64 #s(literal 1/5040 binary64) (sin.f64 kx)) (.f64 #s(literal -1/240 binary64) (pow.f64 (sin.f64 kx) #s(literal -3 binary64)))))) (.f64 ky ky)) (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 kx)) (-.f64 (.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64)) (.f64 #s(literal -3/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -6 binary64))))))) (.f64 ky ky)) (-.f64 (/.f64 #s(literal 1/6 binary64) (sin.f64 kx)) (.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))) ky))
#s(approx (pow (sin ky) -1) (pow.f64 ky #s(literal -1 binary64)))
#s(approx (pow (sin ky) -1) (/.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 ky ky) #s(literal -1/6 binary64))) ky))
#s(approx (pow (sin ky) -1) (/.f64 (+.f64 (.f64 (+.f64 (.f64 #s(literal 7/360 binary64) (.f64 ky ky)) #s(literal 1/6 binary64)) (.f64 ky ky)) #s(literal 1 binary64)) ky))
#s(approx (pow (sin ky) -1) (/.f64 (+.f64 (.f64 (+.f64 (.f64 (+.f64 (.f64 #s(literal 31/15120 binary64) (.f64 ky ky)) #s(literal 7/360 binary64)) (.f64 ky ky)) #s(literal 1/6 binary64)) (.f64 ky ky)) #s(literal 1 binary64)) ky))
#s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sin.f64 kx))
#s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 ky ky)) (sin.f64 kx)) (sin.f64 kx)))
#s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+.f64 (.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sin.f64 kx)) (.f64 (/.f64 (.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 1/3 binary64)) (.f64 ky ky)) (sin.f64 kx)) #s(literal -1/2 binary64))) (*.f64 ky ky)) (sin.f64 kx)))
#s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+.f64 (.f64 (+.f64 (.f64 (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 1/3 binary64))) (sin.f64 kx)) (.f64 #s(literal -1/2 binary64) (.f64 (.f64 ky ky) (/.f64 (-.f64 #s(literal 2/45 binary64) (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 1/3 binary64))) (pow.f64 (sin.f64 kx) #s(literal 2 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)) (+.f64 (*.f64 ky ky) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (+.f64 (.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)) (+.f64 (.f64 (+.f64 (.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) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))
#s(approx (sin ky) (sin.f64 ky))
#s(approx (pow (sin ky) -1) (pow.f64 (sin.f64 ky) #s(literal -1 binary64)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (.f64 th (sin.f64 ky)) (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (+.f64 (.f64 (.f64 #s(literal -1/6 binary64) (.f64 (.f64 th th) (sin.f64 ky))) (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (sin.f64 ky))) th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (+.f64 (.f64 (-.f64 (.f64 (.f64 #s(literal -1/6 binary64) (sin.f64 ky)) (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (.f64 #s(literal -1/120 binary64) (.f64 (.f64 (.f64 th th) (sin.f64 ky)) (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64))))) (.f64 th th)) (.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (sin.f64 ky))) th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (+.f64 (.f64 (+.f64 (.f64 (+.f64 (.f64 (.f64 #s(literal 1/120 binary64) (sin.f64 ky)) (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (.f64 (.f64 #s(literal -1/5040 binary64) (.f64 (.f64 th th) (sin.f64 ky))) (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (.f64 th th)) (.f64 (.f64 #s(literal -1/6 binary64) (sin.f64 ky)) (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (.f64 th th)) (.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (sin.f64 ky))) th))
#s(approx (* (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (sin ky)) (.f64 (.f64 th (sin.f64 ky)) (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64))))
#s(approx (* (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (sin ky)) (.f64 (+.f64 (.f64 (.f64 #s(literal -1/6 binary64) (.f64 (.f64 th th) (sin.f64 ky))) (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (sin.f64 ky))) th))
#s(approx (* (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (sin ky)) (.f64 (+.f64 (.f64 (-.f64 (.f64 (.f64 #s(literal -1/6 binary64) (sin.f64 ky)) (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (.f64 #s(literal -1/120 binary64) (.f64 (.f64 (.f64 th th) (sin.f64 ky)) (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64))))) (.f64 th th)) (.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (sin.f64 ky))) th))
#s(approx (* (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (sin ky)) (.f64 (+.f64 (.f64 (+.f64 (.f64 (+.f64 (.f64 (.f64 #s(literal 1/120 binary64) (sin.f64 ky)) (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (.f64 (.f64 #s(literal -1/5040 binary64) (.f64 (.f64 th th) (sin.f64 ky))) (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (.f64 th th)) (.f64 (.f64 #s(literal -1/6 binary64) (sin.f64 ky)) (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (.f64 th th)) (.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (sin.f64 ky))) th))
#s(approx (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (*.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64)) th))
#s(approx (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (.f64 (+.f64 (.f64 (.f64 (.f64 th th) #s(literal -1/6 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64))) th))
#s(approx (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (.f64 (+.f64 (.f64 (+.f64 (.f64 (.f64 (.f64 th th) #s(literal 1/120 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64)) #s(literal -1/6 binary64))) (*.f64 th th)) (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64))) th))
#s(approx (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (.f64 (+.f64 (.f64 (+.f64 (.f64 (-.f64 (.f64 (.f64 (.f64 th th) #s(literal -1/5040 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (.f64 #s(literal -1/120 binary64) (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (.f64 th th)) (.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64)) #s(literal -1/6 binary64))) (.f64 th th)) (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64))) th))
#s(approx (sin th) th)
#s(approx (sin th) (.f64 (+.f64 (.f64 (*.f64 th th) #s(literal -1/6 binary64)) #s(literal 1 binary64)) th))
#s(approx (sin th) (.f64 (+.f64 (.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 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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))

eval58.0ms (0.8%)

Memory: 4.9MiB live, 104.4MiB allocated; 10ms collecting garbage
Compiler: Compiled 16 845 to 2 002 computations (88.1% saved)

prune65.0ms (0.9%)

Memory

-21.4MiB live, 120.8MiB allocated; 6ms collecting garbage

Pruning

57 alts after pruning (53 fresh and 4 done)

	Pruned	Kept	Total
New	383	26	409
Fresh	4	27	31
Picked	3	2	5
Done	0	2	2
Total	390	57	447

Accuracy

99.9%

Counts

447 → 57

Alt Table

Click to see full alt table

Status	Accuracy	Program
	43.4%	(/.f64 (*.f64 (sin.f64 ky) #s(approx (sin th) th)) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
	19.3%	(*.f64 (/.f64 (sin.f64 ky) (/.f64 (sqrt.f64 (-.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 binary64)))) (sqrt.f64 (-.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))) #s(approx (sin th) th))
	21.9%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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 th) th))
	24.0%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.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 (sin th) th))
	21.7%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/3 binary64)) #s(literal 1 binary64)) (*.f64 ky ky)))))) #s(approx (sin th) th))
	24.2%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) #s(approx (sin th) th))
	85.3%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
	40.6%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(approx (sin th) th))
▶	36.5%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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)))))) (sin.f64 th))
	42.0%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 (+.f64 (.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))))) (sin.f64 th))
	52.7%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
	29.6%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(approx (sin th) th))
	27.7%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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)))))) (sin.f64 th))
✓	39.9%	(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
	18.1%	(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(approx (sin th) th))
	41.9%	(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 th))
	30.3%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (sin.f64 th))
	13.6%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (sin.f64 th))
	24.0%	(.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (*.f64 kx kx)) (sin.f64 ky)) (sin.f64 ky)))) #s(approx (sin th) th))
	34.2%	(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sin.f64 kx))) (sin.f64 th))
	20.3%	(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sin.f64 kx))) #s(approx (sin th) th))
	42.2%	(.f64 (/.f64 (exp.f64 (.f64 (log.f64 (sin.f64 ky)) #s(literal 1 binary64))) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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)))))) (sin.f64 th))
	44.8%	(.f64 (/.f64 #s(approx (sin ky) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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)) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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)))))) (sin.f64 th))
	44.3%	(.f64 (/.f64 #s(approx (sin ky) ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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)))))) (sin.f64 th))
	31.4%	(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (sin.f64 kx))) (sin.f64 th))
✓	26.6%	(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (*.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 1 binary64))) (sin.f64 th))
	17.7%	(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 1 binary64))) (sin.f64 th))
	27.3%	(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (.f64 ky ky))) #s(literal 1 binary64))) (sin.f64 th))
	15.5%	(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 #s(approx (/ ( -1/2 (* kx kx)) (pow (sin ky) 2)) (/.f64 (+.f64 (.f64 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (+.f64 (-.f64 (.f64 #s(literal 2/135 binary64) (.f64 kx kx)) (.f64 #s(literal -1/3 binary64) (.f64 (.f64 kx kx) #s(literal -1/15 binary64)))) (.f64 #s(literal -1/315 binary64) (.f64 kx kx))) (.f64 ky ky)) (.f64 (.f64 kx kx) #s(literal -1/15 binary64)))) (.f64 ky ky)) (.f64 #s(literal -1/6 binary64) (.f64 kx kx))) (.f64 ky ky)) (.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (*.f64 ky ky))) #s(literal 1 binary64))) (sin.f64 th))
▶	93.2%	(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 (pow.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/4 binary64)) #s(literal 2 binary64)) (sin.f64 ky))) (sin.f64 th))
	45.4%	(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (sin.f64 ky))) #s(approx (sin th) th))
	85.2%	(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal -1/2 binary64)) (sin.f64 ky))) (sin.f64 th))
	48.6%	(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) #s(approx (pow (sin kx) 2) (.f64 (+.f64 (.f64 #s(literal -1/3 binary64) (.f64 kx kx)) #s(literal 1 binary64)) (.f64 kx kx)))) #s(literal -1/2 binary64)) (sin.f64 ky))) (sin.f64 th))
▶	39.8%	(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (pow.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) #s(literal -1/2 binary64))) (sin.f64 ky))) (sin.f64 th))
	34.1%	(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (pow.f64 (sin.f64 kx) #s(literal -1 binary64))) (sin.f64 ky))) (sin.f64 th))
	16.9%	(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (pow.f64 #s(approx (sin ky) ky) #s(literal -1 binary64))) (sin.f64 ky))) (sin.f64 th))
	33.7%	(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) (sin.f64 ky))) (sin.f64 th))
	32.3%	(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (exp.f64 (*.f64 (log.f64 (sin.f64 ky)) #s(literal -1 binary64)))) (sin.f64 ky))) (sin.f64 th))
	16.5%	(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) #s(approx (pow (sin ky) -1) (/.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 ky ky) #s(literal -1/6 binary64))) ky))) (sin.f64 ky))) (sin.f64 th))
	18.6%	(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(approx (+ (/ ( -1/2 (* kx kx)) (pow (sin ky) 2)) 1) (/.f64 (+.f64 (.f64 (.f64 ky ky) (+.f64 (.f64 #s(literal -1/6 binary64) (.f64 kx kx)) #s(literal 1 binary64))) (.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (*.f64 ky ky)))) (sin.f64 th))
	2.6%	(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(approx (+ (/ ( -1/2 (* kx kx)) (pow (sin ky) 2)) 1) (/.f64 (.f64 (.f64 kx kx) #s(literal -1/2 binary64)) (*.f64 ky ky)))) (sin.f64 th))
	29.2%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (sin.f64 kx)))
	43.4%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (.f64 #s(approx (sin th) th) (sin.f64 ky))))
	84.4%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal -1/2 binary64)) (.f64 (sin.f64 th) (sin.f64 ky))))
	40.8%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (pow.f64 #s(approx (+ (pow (sin ky) 2) (pow (sin kx) 2)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (.f64 (sin.f64 th) (sin.f64 ky))))
	85.1%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal -1/2 binary64)) (sin.f64 th)) (sin.f64 ky)))
	39.7%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (.f64 (pow.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (sin.f64 th)) (sin.f64 ky)))
	41.9%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (.f64 (pow.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (sin.f64 th)) (sin.f64 ky)))
	34.1%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (.f64 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (pow.f64 (sin.f64 kx) #s(literal -1 binary64))) (sin.f64 th)) (sin.f64 ky)))
	40.9%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (pow.f64 (sin.f64 ky) #s(literal -1 binary64))) (.f64 (sin.f64 th) (sin.f64 ky))))
	31.9%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (pow.f64 (sin.f64 kx) #s(literal -1 binary64))) (.f64 (sin.f64 th) (sin.f64 ky))))
	33.7%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx ( (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (/.f64 (sin.f64 th) (sin.f64 ky))) (sin.f64 ky)))
▶	34.2%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx ( (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (/.f64 (sin.f64 th) (sin.f64 kx))) (sin.f64 ky)))
	45.4%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx ( (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (*.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64)) th)) (sin.f64 ky)))
✓	33.7%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th))
▶	14.6%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (.f64 (+.f64 (.f64 (*.f64 th th) #s(literal -1/6 binary64)) #s(literal 1 binary64)) th)))
✓	15.5%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) th))

Compiler

Compiled 3 798 to 2 588 computations (31.9% saved)

series269.0ms (3.7%)

Memory

15.8MiB live, 430.7MiB allocated; 123ms collecting garbage

Counts

55 → 249

Calls

Call 1

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

Outputs
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #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 (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/4) 2) (sin ky)) #s(hole binary64 1))
#s(approx (* (pow (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/4) 2) (sin ky)) #s(hole binary64 (+ 1 (* -1/2 (/ (pow kx 2) (pow (sin ky) 2))))))
#s(approx (* (pow (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/4) 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 (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/4) 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 (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/4) 2) #s(hole binary64 (/ 1 (sin ky))))
#s(approx (pow (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/4) 2) #s(hole binary64 (+ (* -1/2 (/ (pow kx 2) (pow (sin ky) 3))) (/ 1 (sin ky)))))
#s(approx (pow (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/4) 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 (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/4) 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 (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/4) #s(hole binary64 (* (pow 1 1/4) (sqrt (/ 1 (sin ky))))))
#s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/4) #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 (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/4) #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 (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/4) #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/45 (/ 1 (pow (sin ky) 4))) (+ (* 2/3 (/ 1 (pow (sin ky) 6))) (/ 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 (+ (pow (sin ky) 2) (pow (sin kx) 2)) #s(hole binary64 (pow (sin ky) 2)))
#s(approx (+ (pow (sin ky) 2) (pow (sin kx) 2)) #s(hole binary64 (+ (pow kx 2) (pow (sin ky) 2))))
#s(approx (+ (pow (sin ky) 2) (pow (sin kx) 2)) #s(hole binary64 (+ (* (pow kx 2) (+ 1 (* -1/3 (pow kx 2)))) (pow (sin ky) 2))))
#s(approx (+ (pow (sin ky) 2) (pow (sin kx) 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 (* (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (sin ky)) #s(hole binary64 (sin th)))
#s(approx (* (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (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 ky) 2) (pow (sin kx) 2)) -1/2) (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 ky) 2) (pow (sin kx) 2)) -1/2) (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 ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) #s(hole binary64 (/ (sin th) (sin ky))))
#s(approx (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) #s(hole binary64 (+ (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 3))) (/ (sin th) (sin ky)))))
#s(approx (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (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 (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (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 (/ (sin th) (sin kx)) #s(hole binary64 (/ (sin th) kx)))
#s(approx (/ (sin th) (sin kx)) #s(hole binary64 (/ (+ (sin th) (* 1/6 (* (pow kx 2) (sin th)))) kx)))
#s(approx (/ (sin th) (sin kx)) #s(hole binary64 (/ (+ (sin th) (* (pow kx 2) (- (* -1 (* (pow kx 2) (+ (* -1/36 (sin th)) (* 1/120 (sin th))))) (* -1/6 (sin th))))) kx)))
#s(approx (/ (sin th) (sin kx)) #s(hole binary64 (/ (+ (sin th) (* (pow kx 2) (- (* (pow kx 2) (- (* -1 (* (pow kx 2) (+ (* -1/5040 (sin th)) (+ (* 1/720 (sin th)) (* 1/6 (+ (* -1/36 (sin th)) (* 1/120 (sin th)))))))) (+ (* -1/36 (sin th)) (* 1/120 (sin th))))) (* -1/6 (sin th))))) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (sin th)))
#s(approx (* (/ (sin ky) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (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 (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (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 (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (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 (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) #s(hole binary64 1))
#s(approx (/ (sin ky) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) #s(hole binary64 (+ 1 (* -1/2 (/ (pow kx 2) (pow (sin ky) 2))))))
#s(approx (/ (sin ky) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (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 (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (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 (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2))) #s(hole binary64 (sin ky)))
#s(approx (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2))) #s(hole binary64 (+ (sin ky) (* 1/2 (/ (pow kx 2) (sin ky))))))
#s(approx (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (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 (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (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 (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)) #s(hole binary64 (pow (sin ky) 2)))
#s(approx (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)) #s(hole binary64 (+ (pow kx 2) (pow (sin ky) 2))))
#s(approx (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)) #s(hole binary64 (+ (* (pow kx 2) (+ 1 (* -1/3 (pow kx 2)))) (pow (sin ky) 2))))
#s(approx (+ (- 1/2 (* 1/2 (cos (* 2 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 (- 1/2 (* 1/2 (cos (* 2 kx)))) #s(hole binary64 (pow kx 2)))
#s(approx (- 1/2 (* 1/2 (cos (* 2 kx)))) #s(hole binary64 (* (pow kx 2) (+ 1 (* -1/3 (pow kx 2))))))
#s(approx (- 1/2 (* 1/2 (cos (* 2 kx)))) #s(hole binary64 (* (pow kx 2) (+ 1 (* (pow kx 2) (- (* 2/45 (pow kx 2)) 1/3))))))
#s(approx (- 1/2 (* 1/2 (cos (* 2 kx)))) #s(hole binary64 (* (pow kx 2) (+ 1 (* (pow kx 2) (- (* (pow kx 2) (+ 2/45 (* -1/315 (pow kx 2)))) 1/3))))))
#s(approx (* 1/2 (cos (* 2 kx))) #s(hole binary64 1/2))
#s(approx (* 1/2 (cos (* 2 kx))) #s(hole binary64 (+ 1/2 (* -1 (pow kx 2)))))
#s(approx (* 1/2 (cos (* 2 kx))) #s(hole binary64 (+ 1/2 (* (pow kx 2) (- (* 1/3 (pow kx 2)) 1)))))
#s(approx (* 1/2 (cos (* 2 kx))) #s(hole binary64 (+ 1/2 (* (pow kx 2) (- (* (pow kx 2) (+ 1/3 (* -2/45 (pow kx 2)))) 1)))))
#s(approx (cos (* 2 kx)) #s(hole binary64 1))
#s(approx (cos (* 2 kx)) #s(hole binary64 (+ 1 (* -2 (pow kx 2)))))
#s(approx (cos (* 2 kx)) #s(hole binary64 (+ 1 (* (pow kx 2) (- (* 2/3 (pow kx 2)) 2)))))
#s(approx (cos (* 2 kx)) #s(hole binary64 (+ 1 (* (pow kx 2) (- (* (pow kx 2) (+ 2/3 (* -4/45 (pow kx 2)))) 2)))))
#s(approx (* 2 kx) #s(hole binary64 (* 2 kx)))
#s(approx (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin ky)) #s(hole binary64 1))
#s(approx (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin ky)) #s(hole binary64 (+ 1 (* -1/2 (/ (pow kx 2) (pow (sin ky) 2))))))
#s(approx (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -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 ky) 2) (pow (sin kx) 2)) -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 ky) 2) (pow (sin kx) 2)) -1/2) #s(hole binary64 (/ 1 (sin ky))))
#s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) #s(hole binary64 (+ (* -1/2 (/ (pow kx 2) (pow (sin ky) 3))) (/ 1 (sin ky)))))
#s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -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 ky) 2) (pow (sin kx) 2)) -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 (* (/ (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 (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/4) 2) (sin ky)) #s(hole binary64 (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
#s(approx (pow (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/4) 2) #s(hole binary64 (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))
#s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/4) #s(hole binary64 (pow (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))) 1/4)))
#s(approx (+ (pow (sin ky) 2) (pow (sin kx) 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 (* (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (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 ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) #s(hole binary64 (* (sin th) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
#s(approx (/ (sin th) (sin kx)) #s(hole binary64 (/ (sin th) (sin kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (* (* (sin ky) (sin th)) (sqrt (/ 1 (- (+ 1/2 (pow (sin ky) 2)) (* 1/2 (cos (* 2 kx)))))))))
#s(approx (/ (sin ky) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) #s(hole binary64 (* (sin ky) (sqrt (/ 1 (- (+ 1/2 (pow (sin ky) 2)) (* 1/2 (cos (* 2 kx)))))))))
#s(approx (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2))) #s(hole binary64 (sqrt (- (+ 1/2 (pow (sin ky) 2)) (* 1/2 (cos (* 2 kx)))))))
#s(approx (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)) #s(hole binary64 (- (+ 1/2 (pow (sin ky) 2)) (* 1/2 (cos (* 2 kx))))))
#s(approx (- 1/2 (* 1/2 (cos (* 2 kx)))) #s(hole binary64 (- 1/2 (* 1/2 (cos (* 2 kx))))))
#s(approx (* 1/2 (cos (* 2 kx))) #s(hole binary64 (* 1/2 (cos (* 2 kx)))))
#s(approx (cos (* 2 kx)) #s(hole binary64 (cos (* 2 kx))))
#s(approx (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin ky)) #s(hole binary64 (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
#s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) #s(hole binary64 (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 (/ (* 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 (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/4) 2) (sin ky)) #s(hole binary64 (/ ky (sin kx))))
#s(approx (* (pow (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/4) 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 (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/4) 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 (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/4) 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 (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/4) 2) #s(hole binary64 (/ 1 (sin kx))))
#s(approx (pow (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/4) 2) #s(hole binary64 (+ (* -1/2 (/ (pow ky 2) (pow (sin kx) 3))) (/ 1 (sin kx)))))
#s(approx (pow (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/4) 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 (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/4) 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 (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/4) #s(hole binary64 (* (pow 1 1/4) (sqrt (/ 1 (sin kx))))))
#s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/4) #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 (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/4) #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 (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/4) #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/45 (/ 1 (pow (sin kx) 4))) (+ (* 2/3 (/ 1 (pow (sin kx) 6))) (/ 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 (+ (pow (sin ky) 2) (pow (sin kx) 2)) #s(hole binary64 (pow (sin kx) 2)))
#s(approx (+ (pow (sin ky) 2) (pow (sin kx) 2)) #s(hole binary64 (+ (pow ky 2) (pow (sin kx) 2))))
#s(approx (+ (pow (sin ky) 2) (pow (sin kx) 2)) #s(hole binary64 (+ (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2)))) (pow (sin kx) 2))))
#s(approx (+ (pow (sin ky) 2) (pow (sin kx) 2)) #s(hole binary64 (+ (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3)))) (pow (sin kx) 2))))
#s(approx (pow (sin ky) 2) #s(hole binary64 (pow ky 2)))
#s(approx (pow (sin ky) 2) #s(hole binary64 (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2))))))
#s(approx (pow (sin ky) 2) #s(hole binary64 (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3))))))
#s(approx (pow (sin ky) 2) #s(hole binary64 (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* (pow ky 2) (+ 2/45 (* -1/315 (pow ky 2)))) 1/3))))))
#s(approx (sin ky) #s(hole binary64 ky))
#s(approx (sin ky) #s(hole binary64 (* ky (+ 1 (* -1/6 (pow ky 2))))))
#s(approx (sin ky) #s(hole binary64 (* ky (+ 1 (* (pow ky 2) (- (* 1/120 (pow ky 2)) 1/6))))))
#s(approx (sin ky) #s(hole binary64 (* ky (+ 1 (* (pow ky 2) (- (* (pow ky 2) (+ 1/120 (* -1/5040 (pow ky 2)))) 1/6))))))
#s(approx ky #s(hole binary64 ky))
#s(approx (* (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (sin ky)) #s(hole binary64 (/ (* ky (sin th)) (sin kx))))
#s(approx (* (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (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 ky) 2) (pow (sin kx) 2)) -1/2) (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 ky) 2) (pow (sin kx) 2)) -1/2) (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 ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) #s(hole binary64 (/ (sin th) (sin kx))))
#s(approx (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) #s(hole binary64 (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (sin th) (sin kx)))))
#s(approx (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (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 (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (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 (* (/ (sin ky) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (* (* ky (sin th)) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx)))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (* ky (+ (* (sin th) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx))))))) (* (pow ky 2) (+ (* -1/2 (* (sin th) (sqrt (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 3))))) (* -1/6 (* (sin th) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx))))))))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (* ky (+ (* (sin th) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx))))))) (* (pow ky 2) (+ (* -1/2 (* (sin th) (sqrt (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 3))))) (+ (* -1/6 (* (sin th) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx)))))))) (* (pow ky 2) (+ (* 1/120 (* (sin th) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx)))))))) (+ (* 1/12 (* (sin th) (sqrt (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 3))))) (* 1/2 (* (* (sin th) (+ (* 1/3 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 2))) (* 3/4 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 3))))) (sqrt (- 1/2 (* 1/2 (cos (* 2 kx)))))))))))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (* ky (+ (* (sin th) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx))))))) (* (pow ky 2) (+ (* -1/2 (* (sin th) (sqrt (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 3))))) (+ (* -1/6 (* (sin th) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx)))))))) (* (pow ky 2) (+ (* 1/120 (* (sin th) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx)))))))) (+ (* 1/12 (* (sin th) (sqrt (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 3))))) (+ (* 1/2 (* (* (sin th) (+ (* 1/3 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 2))) (* 3/4 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 3))))) (sqrt (- 1/2 (* 1/2 (cos (* 2 kx))))))) (* (pow ky 2) (+ (* -1/2 (* (* (sin th) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 2))) (* 3/4 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 3)))) (- 1/2 (* 1/2 (cos (* 2 kx)))))) (+ (* 2/45 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 2))) (+ (* 2/3 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 3))) (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 4)))))) (sqrt (- 1/2 (* 1/2 (cos (* 2 kx))))))) (+ (* -1/12 (* (* (sin th) (+ (* 1/3 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 2))) (* 3/4 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 3))))) (sqrt (- 1/2 (* 1/2 (cos (* 2 kx))))))) (+ (* -1/240 (* (sin th) (sqrt (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 3))))) (* -1/5040 (* (sin th) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx)))))))))))))))))))))))
#s(approx (/ (sin ky) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) #s(hole binary64 (* ky (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx)))))))))
#s(approx (/ (sin ky) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) #s(hole binary64 (* ky (+ (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -1/2 (sqrt (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 3)))) (* -1/6 (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx)))))))))))))
#s(approx (/ (sin ky) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) #s(hole binary64 (* ky (+ (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -1/2 (sqrt (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 3)))) (+ (* -1/6 (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx))))))) (* (pow ky 2) (+ (* 1/120 (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx))))))) (+ (* 1/12 (sqrt (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 3)))) (* 1/2 (* (+ (* 1/3 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 2))) (* 3/4 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 3)))) (sqrt (- 1/2 (* 1/2 (cos (* 2 kx)))))))))))))))))
#s(approx (/ (sin ky) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) #s(hole binary64 (* ky (+ (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -1/2 (sqrt (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 3)))) (+ (* -1/6 (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx))))))) (* (pow ky 2) (+ (* 1/120 (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx))))))) (+ (* 1/12 (sqrt (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 3)))) (+ (* 1/2 (* (+ (* 1/3 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 2))) (* 3/4 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 3)))) (sqrt (- 1/2 (* 1/2 (cos (* 2 kx))))))) (* (pow ky 2) (+ (* -1/2 (* (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 2))) (* 3/4 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 3)))) (- 1/2 (* 1/2 (cos (* 2 kx)))))) (+ (* 2/45 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 2))) (+ (* 2/3 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 3))) (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 4))))) (sqrt (- 1/2 (* 1/2 (cos (* 2 kx))))))) (+ (* -1/12 (* (+ (* 1/3 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 2))) (* 3/4 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 3)))) (sqrt (- 1/2 (* 1/2 (cos (* 2 kx))))))) (+ (* -1/240 (sqrt (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 3)))) (* -1/5040 (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx))))))))))))))))))))))
#s(approx (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2))) #s(hole binary64 (sqrt (- 1/2 (* 1/2 (cos (* 2 kx)))))))
#s(approx (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2))) #s(hole binary64 (+ (sqrt (- 1/2 (* 1/2 (cos (* 2 kx))))) (* 1/2 (* (pow ky 2) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx)))))))))))
#s(approx (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2))) #s(hole binary64 (+ (sqrt (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (pow ky 2) (+ (* -1/2 (* (* (pow ky 2) (+ 1/3 (* 1/4 (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx)))))))) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx)))))))) (* 1/2 (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx))))))))))))
#s(approx (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2))) #s(hole binary64 (+ (sqrt (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (pow ky 2) (+ (* 1/2 (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx))))))) (* (pow ky 2) (+ (* -1/2 (* (+ 1/3 (* 1/4 (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx))))))) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx)))))))) (* 1/2 (* (* (pow ky 2) (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx))))))) (- 1/2 (* 1/2 (cos (* 2 kx)))))))) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx)))))))))))))))
#s(approx (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)) #s(hole binary64 (- 1/2 (* 1/2 (cos (* 2 kx))))))
#s(approx (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)) #s(hole binary64 (- (+ 1/2 (pow ky 2)) (* 1/2 (cos (* 2 kx))))))
#s(approx (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)) #s(hole binary64 (- (+ 1/2 (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2))))) (* 1/2 (cos (* 2 kx))))))
#s(approx (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)) #s(hole binary64 (- (+ 1/2 (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3))))) (* 1/2 (cos (* 2 kx))))))
#s(approx (* (+ (* (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* ky ky)) 1) (* ky ky)) #s(hole binary64 (pow ky 2)))
#s(approx (* (+ (* (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* ky ky)) 1) (* ky ky)) #s(hole binary64 (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2))))))
#s(approx (* (+ (* (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* ky ky)) 1) (* ky ky)) #s(hole binary64 (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3))))))
#s(approx (* (+ (* (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* ky ky)) 1) (* ky ky)) #s(hole binary64 (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* (pow ky 2) (+ 2/45 (* -1/315 (pow ky 2)))) 1/3))))))
#s(approx (+ (* (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* ky ky)) 1) #s(hole binary64 1))
#s(approx (+ (* (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* ky ky)) 1) #s(hole binary64 (+ 1 (* -1/3 (pow ky 2)))))
#s(approx (+ (* (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* ky ky)) 1) #s(hole binary64 (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3)))))
#s(approx (+ (* (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* ky ky)) 1) #s(hole binary64 (+ 1 (* (pow ky 2) (- (* (pow ky 2) (+ 2/45 (* -1/315 (pow ky 2)))) 1/3)))))
#s(approx (* (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* ky ky)) #s(hole binary64 (* -1/3 (pow ky 2))))
#s(approx (* (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* ky ky)) #s(hole binary64 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3))))
#s(approx (* (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* ky ky)) #s(hole binary64 (* (pow ky 2) (- (* (pow ky 2) (+ 2/45 (* -1/315 (pow ky 2)))) 1/3))))
#s(approx (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) #s(hole binary64 -1/3))
#s(approx (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) #s(hole binary64 (- (* 2/45 (pow ky 2)) 1/3)))
#s(approx (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) #s(hole binary64 (- (* (pow ky 2) (+ 2/45 (* -1/315 (pow ky 2)))) 1/3)))
#s(approx (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) #s(hole binary64 (* 2/45 (pow ky 2))))
#s(approx (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) #s(hole binary64 (* (pow ky 2) (+ 2/45 (* -1/315 (pow ky 2))))))
#s(approx (+ (* (* ky ky) -1/315) 2/45) #s(hole binary64 2/45))
#s(approx (+ (* (* ky ky) -1/315) 2/45) #s(hole binary64 (+ 2/45 (* -1/315 (pow ky 2)))))
#s(approx (* (* ky ky) -1/315) #s(hole binary64 (* -1/315 (pow ky 2))))
#s(approx (* ky ky) #s(hole binary64 (pow ky 2)))
#s(approx (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin ky)) #s(hole binary64 (/ ky (sin kx))))
#s(approx (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -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 ky) 2) (pow (sin kx) 2)) -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 ky) 2) (pow (sin kx) 2)) -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 ky) 2) (pow (sin kx) 2)) -1/2) #s(hole binary64 (/ 1 (sin kx))))
#s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) #s(hole binary64 (+ (* -1/2 (/ (pow ky 2) (pow (sin kx) 3))) (/ 1 (sin kx)))))
#s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -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 ky) 2) (pow (sin kx) 2)) -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 (pow (sin ky) 2) -1/2) #s(hole binary64 (/ 1 ky)))
#s(approx (pow (pow (sin ky) 2) -1/2) #s(hole binary64 (/ (+ 1 (* 1/6 (pow ky 2))) ky)))
#s(approx (pow (pow (sin ky) 2) -1/2) #s(hole binary64 (/ (+ 1 (* (pow ky 2) (+ 1/6 (* 7/360 (pow ky 2))))) ky)))
#s(approx (pow (pow (sin ky) 2) -1/2) #s(hole binary64 (/ (+ 1 (* (pow ky 2) (+ 1/6 (* (pow ky 2) (+ 7/360 (* 31/15120 (pow ky 2))))))) ky)))
#s(approx (pow (sin ky) 2) #s(hole binary64 (pow (sin ky) 2)))
#s(approx (sin ky) #s(hole binary64 (sin ky)))
#s(approx (* (+ (* (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* ky ky)) 1) (* ky ky)) #s(hole binary64 (* -1/315 (pow ky 8))))
#s(approx (* (+ (* (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* ky ky)) 1) (* ky ky)) #s(hole binary64 (* (pow ky 8) (- (* 2/45 (/ 1 (pow ky 2))) 1/315))))
#s(approx (* (+ (* (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* ky ky)) 1) (* ky ky)) #s(hole binary64 (* (pow ky 8) (- (* 2/45 (/ 1 (pow ky 2))) (+ 1/315 (/ 1/3 (pow ky 4)))))))
#s(approx (* (+ (* (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* ky ky)) 1) (* ky ky)) #s(hole binary64 (* (pow ky 8) (- (+ (* 2/45 (/ 1 (pow ky 2))) (/ 1 (pow ky 6))) (+ 1/315 (/ 1/3 (pow ky 4)))))))
#s(approx (+ (* (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* ky ky)) 1) #s(hole binary64 (* -1/315 (pow ky 6))))
#s(approx (+ (* (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* ky ky)) 1) #s(hole binary64 (* (pow ky 6) (- (* 2/45 (/ 1 (pow ky 2))) 1/315))))
#s(approx (+ (* (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* ky ky)) 1) #s(hole binary64 (* (pow ky 6) (- (* 2/45 (/ 1 (pow ky 2))) (+ 1/315 (/ 1/3 (pow ky 4)))))))
#s(approx (+ (* (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* ky ky)) 1) #s(hole binary64 (* (pow ky 6) (- (+ (* 2/45 (/ 1 (pow ky 2))) (/ 1 (pow ky 6))) (+ 1/315 (/ 1/3 (pow ky 4)))))))
#s(approx (* (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* ky ky)) #s(hole binary64 (* -1/315 (pow ky 6))))
#s(approx (* (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* ky ky)) #s(hole binary64 (* (pow ky 6) (- (* 2/45 (/ 1 (pow ky 2))) 1/315))))
#s(approx (* (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* ky ky)) #s(hole binary64 (* (pow ky 6) (- (* 2/45 (/ 1 (pow ky 2))) (+ 1/315 (/ 1/3 (pow ky 4)))))))
#s(approx (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) #s(hole binary64 (* -1/315 (pow ky 4))))
#s(approx (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) #s(hole binary64 (* (pow ky 4) (- (* 2/45 (/ 1 (pow ky 2))) 1/315))))
#s(approx (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) #s(hole binary64 (* (pow ky 4) (- (* 2/45 (/ 1 (pow ky 2))) (+ 1/315 (/ 1/3 (pow ky 4)))))))
#s(approx (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) #s(hole binary64 (* -1/315 (pow ky 4))))
#s(approx (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) #s(hole binary64 (* (pow ky 4) (- (* 2/45 (/ 1 (pow ky 2))) 1/315))))
#s(approx (+ (* (* ky ky) -1/315) 2/45) #s(hole binary64 (* -1/315 (pow ky 2))))
#s(approx (+ (* (* ky ky) -1/315) 2/45) #s(hole binary64 (* (pow ky 2) (- (* 2/45 (/ 1 (pow ky 2))) 1/315))))
#s(approx (pow (pow (sin ky) 2) -1/2) #s(hole binary64 (/ 1 (sin ky))))
#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 (* (+ (* (* th th) -1/6) 1) th) #s(hole binary64 th))
#s(approx (* (+ (* (* th th) -1/6) 1) th) #s(hole binary64 (* th (+ 1 (* -1/6 (pow th 2))))))
#s(approx (+ (* (* th th) -1/6) 1) #s(hole binary64 1))
#s(approx (+ (* (* th th) -1/6) 1) #s(hole binary64 (+ 1 (* -1/6 (pow th 2)))))
#s(approx (* (* th th) -1/6) #s(hole binary64 (* -1/6 (pow th 2))))
#s(approx (* th th) #s(hole binary64 (pow th 2)))
#s(approx (* (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (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 ky) 2) (pow (sin kx) 2)) -1/2) (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 ky) 2) (pow (sin kx) 2)) -1/2) (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 ky) 2) (pow (sin kx) 2)) -1/2) (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 (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) #s(hole binary64 (* th (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
#s(approx (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (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 (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (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 (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (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) (sin kx)) #s(hole binary64 (/ th (sin kx))))
#s(approx (/ (sin th) (sin kx)) #s(hole binary64 (* th (+ (* -1/6 (/ (pow th 2) (sin kx))) (/ 1 (sin kx))))))
#s(approx (/ (sin th) (sin kx)) #s(hole binary64 (* th (+ (* (pow th 2) (- (* 1/120 (/ (pow th 2) (sin kx))) (* 1/6 (/ 1 (sin kx))))) (/ 1 (sin kx))))))
#s(approx (/ (sin th) (sin kx)) #s(hole binary64 (* th (+ (* (pow th 2) (- (* (pow th 2) (+ (* -1/5040 (/ (pow th 2) (sin kx))) (* 1/120 (/ 1 (sin kx))))) (* 1/6 (/ 1 (sin kx))))) (/ 1 (sin kx))))))
#s(approx (* (/ (sin ky) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (* (* th (sin ky)) (sqrt (/ 1 (- (+ 1/2 (pow (sin ky) 2)) (* 1/2 (cos (* 2 kx)))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (* th (+ (* -1/6 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (- (+ 1/2 (pow (sin ky) 2)) (* 1/2 (cos (* 2 kx)))))))) (* (sin ky) (sqrt (/ 1 (- (+ 1/2 (pow (sin ky) 2)) (* 1/2 (cos (* 2 kx)))))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (* th (+ (* (sin ky) (sqrt (/ 1 (- (+ 1/2 (pow (sin ky) 2)) (* 1/2 (cos (* 2 kx))))))) (* (pow th 2) (+ (* -1/6 (* (sin ky) (sqrt (/ 1 (- (+ 1/2 (pow (sin ky) 2)) (* 1/2 (cos (* 2 kx)))))))) (* 1/120 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (- (+ 1/2 (pow (sin ky) 2)) (* 1/2 (cos (* 2 kx))))))))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (* th (+ (* (sin ky) (sqrt (/ 1 (- (+ 1/2 (pow (sin ky) 2)) (* 1/2 (cos (* 2 kx))))))) (* (pow th 2) (+ (* -1/6 (* (sin ky) (sqrt (/ 1 (- (+ 1/2 (pow (sin ky) 2)) (* 1/2 (cos (* 2 kx)))))))) (* (pow th 2) (+ (* -1/5040 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (- (+ 1/2 (pow (sin ky) 2)) (* 1/2 (cos (* 2 kx)))))))) (* 1/120 (* (sin ky) (sqrt (/ 1 (- (+ 1/2 (pow (sin ky) 2)) (* 1/2 (cos (* 2 kx))))))))))))))))
#s(approx (sin th) #s(hole binary64 (sin th)))
#s(approx (* (+ (* (* th th) -1/6) 1) th) #s(hole binary64 (* -1/6 (pow th 3))))
#s(approx (* (+ (* (* th th) -1/6) 1) th) #s(hole binary64 (* (pow th 3) (- (/ 1 (pow th 2)) 1/6))))
#s(approx (+ (* (* th th) -1/6) 1) #s(hole binary64 (* -1/6 (pow th 2))))
#s(approx (+ (* (* th th) -1/6) 1) #s(hole binary64 (* (pow th 2) (- (/ 1 (pow th 2)) 1/6))))
#s(approx (* (+ (* (* th th) -1/6) 1) th) #s(hole binary64 (* -1 (* (pow th 3) (- 1/6 (/ 1 (pow th 2)))))))

Calls

9 calls:

Time	Variable		Point	Expression
60.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 (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/4) 2) (sin ky)) (pow (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/4) 2) (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/4) (+ (pow (sin ky) 2) (pow (sin kx) 2)) (pow (sin ky) 2) (sin ky) ky 2 (pow (sin kx) 2) (sin kx) kx -1/4 (sin th) th (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin th) (* (+ (* (* th th) -1/6) 1) th) (+ (* (* th th) -1/6) 1) (* (* th th) -1/6) (* th th) -1/6 1 (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (* (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (sin ky)) (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (/ (sin th) (sin kx)) (* (/ (sin ky) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2))) (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)) (- 1/2 (* 1/2 (cos (* 2 kx)))) 1/2 (* 1/2 (cos (* 2 kx))) (cos (* 2 kx)) (* 2 kx) (pow (sin ky) 2) (* (+ (* (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* ky ky)) 1) (* ky ky)) (+ (* (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* ky ky)) 1) (* (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* ky ky)) (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) (+ (* (* ky ky) -1/315) 2/45) (* (* ky ky) -1/315) (* ky ky) -1/315 2/45 1/3 (* (/ (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 ky) 2) (pow (sin kx) 2)) -1/2) (sin ky)) (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (pow (pow (sin ky) 2) -1/2) -1/2)
46.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 (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/4) 2) (sin ky)) (pow (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/4) 2) (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/4) (+ (pow (sin ky) 2) (pow (sin kx) 2)) (pow (sin ky) 2) (sin ky) ky 2 (pow (sin kx) 2) (sin kx) kx -1/4 (sin th) th (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin th) (* (+ (* (* th th) -1/6) 1) th) (+ (* (* th th) -1/6) 1) (* (* th th) -1/6) (* th th) -1/6 1 (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (* (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (sin ky)) (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (/ (sin th) (sin kx)) (* (/ (sin ky) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2))) (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)) (- 1/2 (* 1/2 (cos (* 2 kx)))) 1/2 (* 1/2 (cos (* 2 kx))) (cos (* 2 kx)) (* 2 kx) (pow (sin ky) 2) (* (+ (* (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* ky ky)) 1) (* ky ky)) (+ (* (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* ky ky)) 1) (* (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* ky ky)) (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) (+ (* (* ky ky) -1/315) 2/45) (* (* ky ky) -1/315) (* ky ky) -1/315 2/45 1/3 (* (/ (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 ky) 2) (pow (sin kx) 2)) -1/2) (sin ky)) (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (pow (pow (sin ky) 2) -1/2) -1/2)
45.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 (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/4) 2) (sin ky)) (pow (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/4) 2) (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/4) (+ (pow (sin ky) 2) (pow (sin kx) 2)) (pow (sin ky) 2) (sin ky) ky 2 (pow (sin kx) 2) (sin kx) kx -1/4 (sin th) th (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin th) (* (+ (* (* th th) -1/6) 1) th) (+ (* (* th th) -1/6) 1) (* (* th th) -1/6) (* th th) -1/6 1 (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (* (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (sin ky)) (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (/ (sin th) (sin kx)) (* (/ (sin ky) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2))) (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)) (- 1/2 (* 1/2 (cos (* 2 kx)))) 1/2 (* 1/2 (cos (* 2 kx))) (cos (* 2 kx)) (* 2 kx) (pow (sin ky) 2) (* (+ (* (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* ky ky)) 1) (* ky ky)) (+ (* (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* ky ky)) 1) (* (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* ky ky)) (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) (+ (* (* ky ky) -1/315) 2/45) (* (* ky ky) -1/315) (* ky ky) -1/315 2/45 1/3 (* (/ (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 ky) 2) (pow (sin kx) 2)) -1/2) (sin ky)) (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (pow (pow (sin ky) 2) -1/2) -1/2)
29.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)))) (* (pow (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/4) 2) (sin ky)) (pow (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/4) 2) (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/4) (+ (pow (sin ky) 2) (pow (sin kx) 2)) (pow (sin ky) 2) (sin ky) ky 2 (pow (sin kx) 2) (sin kx) kx -1/4 (sin th) th (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin th) (* (+ (* (* th th) -1/6) 1) th) (+ (* (* th th) -1/6) 1) (* (* th th) -1/6) (* th th) -1/6 1 (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (* (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (sin ky)) (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (/ (sin th) (sin kx)) (* (/ (sin ky) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2))) (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)) (- 1/2 (* 1/2 (cos (* 2 kx)))) 1/2 (* 1/2 (cos (* 2 kx))) (cos (* 2 kx)) (* 2 kx) (pow (sin ky) 2) (* (+ (* (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* ky ky)) 1) (* ky ky)) (+ (* (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* ky ky)) 1) (* (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* ky ky)) (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) (+ (* (* ky ky) -1/315) 2/45) (* (* ky ky) -1/315) (* ky ky) -1/315 2/45 1/3 (* (/ (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 ky) 2) (pow (sin kx) 2)) -1/2) (sin ky)) (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (pow (pow (sin ky) 2) -1/2) -1/2)
27.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 (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/4) 2) (sin ky)) (pow (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/4) 2) (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/4) (+ (pow (sin ky) 2) (pow (sin kx) 2)) (pow (sin ky) 2) (sin ky) ky 2 (pow (sin kx) 2) (sin kx) kx -1/4 (sin th) th (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin th) (* (+ (* (* th th) -1/6) 1) th) (+ (* (* th th) -1/6) 1) (* (* th th) -1/6) (* th th) -1/6 1 (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (* (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (sin ky)) (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (/ (sin th) (sin kx)) (* (/ (sin ky) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) (sin th)) (/ (sin ky) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2))) (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)) (- 1/2 (* 1/2 (cos (* 2 kx)))) 1/2 (* 1/2 (cos (* 2 kx))) (cos (* 2 kx)) (* 2 kx) (pow (sin ky) 2) (* (+ (* (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* ky ky)) 1) (* ky ky)) (+ (* (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* ky ky)) 1) (* (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* ky ky)) (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) (+ (* (* ky ky) -1/315) 2/45) (* (* ky ky) -1/315) (* ky ky) -1/315 2/45 1/3 (* (/ (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 ky) 2) (pow (sin kx) 2)) -1/2) (sin ky)) (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (pow (pow (sin ky) 2) -1/2) -1/2)

rewrite213.0ms (2.9%)

Memory

-3.0MiB live, 280.6MiB allocated; 23ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	1131	11894
0	1204	10536
1	6596	10536
0	8016	10536

Stop Event

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

Counts

304 → 424

Calls

Call 1

Inputs
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 (pow.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/4 binary64)) #s(literal 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 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/4 binary64)) #s(literal 2 binary64)) (sin.f64 ky)))
(*.f64 (pow.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/4 binary64)) #s(literal 2 binary64)) (sin.f64 ky))
(pow.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/4 binary64))
(+.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 2 binary64))
(sin.f64 ky)
ky
#s(literal 2 binary64)
(pow.f64 (sin.f64 kx) #s(literal 2 binary64))
(sin.f64 kx)
kx
#s(literal -1/4 binary64)
(sin.f64 th)
th
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (.f64 (+.f64 (.f64 (*.f64 th th) #s(literal -1/6 binary64)) #s(literal 1 binary64)) th)))
#s(approx (sin th) (.f64 (+.f64 (.f64 (*.f64 th th) #s(literal -1/6 binary64)) #s(literal 1 binary64)) th))
(.f64 (+.f64 (.f64 (*.f64 th th) #s(literal -1/6 binary64)) #s(literal 1 binary64)) th)
(+.f64 (.f64 (.f64 th th) #s(literal -1/6 binary64)) #s(literal 1 binary64))
(.f64 (.f64 th th) #s(literal -1/6 binary64))
(*.f64 th th)
#s(literal -1/6 binary64)
#s(literal 1 binary64)
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx ( (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (/.f64 (sin.f64 th) (sin.f64 kx))) (sin.f64 ky)))
(.f64 #s(approx ( (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (/.f64 (sin.f64 th) (sin.f64 kx))) (sin.f64 ky))
#s(approx (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (/.f64 (sin.f64 th) (sin.f64 kx)))
(/.f64 (sin.f64 th) (sin.f64 kx))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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)))))) (sin.f64 th))
(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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))))))
(sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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)))))
(+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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))))
(-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))
#s(literal 1/2 binary64)
(.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))
(cos.f64 (*.f64 #s(literal 2 binary64) kx))
(*.f64 #s(literal 2 binary64) kx)
#s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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)))
(.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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))
(+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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 (-.f64 (.f64 (+.f64 (.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))
(-.f64 (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64)) (.f64 ky ky)) #s(literal 1/3 binary64))
(.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64)) (.f64 ky ky))
(+.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64))
(.f64 (.f64 ky ky) #s(literal -1/315 binary64))
(*.f64 ky ky)
#s(literal -1/315 binary64)
#s(literal 2/45 binary64)
#s(literal 1/3 binary64)
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (pow.f64 (pow.f64 (sin.f64 ky) #s(literal 2 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 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (pow.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) #s(literal -1/2 binary64))) (sin.f64 ky)))
(*.f64 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (pow.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) #s(literal -1/2 binary64))) (sin.f64 ky))
#s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (pow.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) #s(literal -1/2 binary64)))
(pow.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) #s(literal -1/2 binary64))
#s(literal -1/2 binary64)
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #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 (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/4) 2) (sin ky)) #s(hole binary64 1))
#s(approx (* (pow (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/4) 2) (sin ky)) #s(hole binary64 (+ 1 (* -1/2 (/ (pow kx 2) (pow (sin ky) 2))))))
#s(approx (* (pow (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/4) 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 (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/4) 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 (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/4) 2) #s(hole binary64 (/ 1 (sin ky))))
#s(approx (pow (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/4) 2) #s(hole binary64 (+ (* -1/2 (/ (pow kx 2) (pow (sin ky) 3))) (/ 1 (sin ky)))))
#s(approx (pow (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/4) 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 (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/4) 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 (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/4) #s(hole binary64 (* (pow 1 1/4) (sqrt (/ 1 (sin ky))))))
#s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/4) #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 (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/4) #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 (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/4) #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/45 (/ 1 (pow (sin ky) 4))) (+ (* 2/3 (/ 1 (pow (sin ky) 6))) (/ 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 (+ (pow (sin ky) 2) (pow (sin kx) 2)) #s(hole binary64 (pow (sin ky) 2)))
#s(approx (+ (pow (sin ky) 2) (pow (sin kx) 2)) #s(hole binary64 (+ (pow kx 2) (pow (sin ky) 2))))
#s(approx (+ (pow (sin ky) 2) (pow (sin kx) 2)) #s(hole binary64 (+ (* (pow kx 2) (+ 1 (* -1/3 (pow kx 2)))) (pow (sin ky) 2))))
#s(approx (+ (pow (sin ky) 2) (pow (sin kx) 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 (* (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (sin ky)) #s(hole binary64 (sin th)))
#s(approx (* (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (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 ky) 2) (pow (sin kx) 2)) -1/2) (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 ky) 2) (pow (sin kx) 2)) -1/2) (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 ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) #s(hole binary64 (/ (sin th) (sin ky))))
#s(approx (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) #s(hole binary64 (+ (* -1/2 (/ (* (pow kx 2) (sin th)) (pow (sin ky) 3))) (/ (sin th) (sin ky)))))
#s(approx (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (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 (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (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 (/ (sin th) (sin kx)) #s(hole binary64 (/ (sin th) kx)))
#s(approx (/ (sin th) (sin kx)) #s(hole binary64 (/ (+ (sin th) (* 1/6 (* (pow kx 2) (sin th)))) kx)))
#s(approx (/ (sin th) (sin kx)) #s(hole binary64 (/ (+ (sin th) (* (pow kx 2) (- (* -1 (* (pow kx 2) (+ (* -1/36 (sin th)) (* 1/120 (sin th))))) (* -1/6 (sin th))))) kx)))
#s(approx (/ (sin th) (sin kx)) #s(hole binary64 (/ (+ (sin th) (* (pow kx 2) (- (* (pow kx 2) (- (* -1 (* (pow kx 2) (+ (* -1/5040 (sin th)) (+ (* 1/720 (sin th)) (* 1/6 (+ (* -1/36 (sin th)) (* 1/120 (sin th)))))))) (+ (* -1/36 (sin th)) (* 1/120 (sin th))))) (* -1/6 (sin th))))) kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (sin th)))
#s(approx (* (/ (sin ky) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (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 (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (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 (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (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 (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) #s(hole binary64 1))
#s(approx (/ (sin ky) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) #s(hole binary64 (+ 1 (* -1/2 (/ (pow kx 2) (pow (sin ky) 2))))))
#s(approx (/ (sin ky) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (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 (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (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 (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2))) #s(hole binary64 (sin ky)))
#s(approx (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2))) #s(hole binary64 (+ (sin ky) (* 1/2 (/ (pow kx 2) (sin ky))))))
#s(approx (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (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 (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (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 (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)) #s(hole binary64 (pow (sin ky) 2)))
#s(approx (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)) #s(hole binary64 (+ (pow kx 2) (pow (sin ky) 2))))
#s(approx (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)) #s(hole binary64 (+ (* (pow kx 2) (+ 1 (* -1/3 (pow kx 2)))) (pow (sin ky) 2))))
#s(approx (+ (- 1/2 (* 1/2 (cos (* 2 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 (- 1/2 (* 1/2 (cos (* 2 kx)))) #s(hole binary64 (pow kx 2)))
#s(approx (- 1/2 (* 1/2 (cos (* 2 kx)))) #s(hole binary64 (* (pow kx 2) (+ 1 (* -1/3 (pow kx 2))))))
#s(approx (- 1/2 (* 1/2 (cos (* 2 kx)))) #s(hole binary64 (* (pow kx 2) (+ 1 (* (pow kx 2) (- (* 2/45 (pow kx 2)) 1/3))))))
#s(approx (- 1/2 (* 1/2 (cos (* 2 kx)))) #s(hole binary64 (* (pow kx 2) (+ 1 (* (pow kx 2) (- (* (pow kx 2) (+ 2/45 (* -1/315 (pow kx 2)))) 1/3))))))
#s(approx (* 1/2 (cos (* 2 kx))) #s(hole binary64 1/2))
#s(approx (* 1/2 (cos (* 2 kx))) #s(hole binary64 (+ 1/2 (* -1 (pow kx 2)))))
#s(approx (* 1/2 (cos (* 2 kx))) #s(hole binary64 (+ 1/2 (* (pow kx 2) (- (* 1/3 (pow kx 2)) 1)))))
#s(approx (* 1/2 (cos (* 2 kx))) #s(hole binary64 (+ 1/2 (* (pow kx 2) (- (* (pow kx 2) (+ 1/3 (* -2/45 (pow kx 2)))) 1)))))
#s(approx (cos (* 2 kx)) #s(hole binary64 1))
#s(approx (cos (* 2 kx)) #s(hole binary64 (+ 1 (* -2 (pow kx 2)))))
#s(approx (cos (* 2 kx)) #s(hole binary64 (+ 1 (* (pow kx 2) (- (* 2/3 (pow kx 2)) 2)))))
#s(approx (cos (* 2 kx)) #s(hole binary64 (+ 1 (* (pow kx 2) (- (* (pow kx 2) (+ 2/3 (* -4/45 (pow kx 2)))) 2)))))
#s(approx (* 2 kx) #s(hole binary64 (* 2 kx)))
#s(approx (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin ky)) #s(hole binary64 1))
#s(approx (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin ky)) #s(hole binary64 (+ 1 (* -1/2 (/ (pow kx 2) (pow (sin ky) 2))))))
#s(approx (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -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 ky) 2) (pow (sin kx) 2)) -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 ky) 2) (pow (sin kx) 2)) -1/2) #s(hole binary64 (/ 1 (sin ky))))
#s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) #s(hole binary64 (+ (* -1/2 (/ (pow kx 2) (pow (sin ky) 3))) (/ 1 (sin ky)))))
#s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -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 ky) 2) (pow (sin kx) 2)) -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 (* (/ (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 (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/4) 2) (sin ky)) #s(hole binary64 (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
#s(approx (pow (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/4) 2) #s(hole binary64 (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))
#s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/4) #s(hole binary64 (pow (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))) 1/4)))
#s(approx (+ (pow (sin ky) 2) (pow (sin kx) 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 (* (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (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 ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) #s(hole binary64 (* (sin th) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
#s(approx (/ (sin th) (sin kx)) #s(hole binary64 (/ (sin th) (sin kx))))
#s(approx (* (/ (sin ky) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (* (* (sin ky) (sin th)) (sqrt (/ 1 (- (+ 1/2 (pow (sin ky) 2)) (* 1/2 (cos (* 2 kx)))))))))
#s(approx (/ (sin ky) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) #s(hole binary64 (* (sin ky) (sqrt (/ 1 (- (+ 1/2 (pow (sin ky) 2)) (* 1/2 (cos (* 2 kx)))))))))
#s(approx (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2))) #s(hole binary64 (sqrt (- (+ 1/2 (pow (sin ky) 2)) (* 1/2 (cos (* 2 kx)))))))
#s(approx (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)) #s(hole binary64 (- (+ 1/2 (pow (sin ky) 2)) (* 1/2 (cos (* 2 kx))))))
#s(approx (- 1/2 (* 1/2 (cos (* 2 kx)))) #s(hole binary64 (- 1/2 (* 1/2 (cos (* 2 kx))))))
#s(approx (* 1/2 (cos (* 2 kx))) #s(hole binary64 (* 1/2 (cos (* 2 kx)))))
#s(approx (cos (* 2 kx)) #s(hole binary64 (cos (* 2 kx))))
#s(approx (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin ky)) #s(hole binary64 (* (sin ky) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
#s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) #s(hole binary64 (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 (/ (* 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 (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/4) 2) (sin ky)) #s(hole binary64 (/ ky (sin kx))))
#s(approx (* (pow (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/4) 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 (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/4) 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 (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/4) 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 (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/4) 2) #s(hole binary64 (/ 1 (sin kx))))
#s(approx (pow (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/4) 2) #s(hole binary64 (+ (* -1/2 (/ (pow ky 2) (pow (sin kx) 3))) (/ 1 (sin kx)))))
#s(approx (pow (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/4) 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 (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/4) 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 (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/4) #s(hole binary64 (* (pow 1 1/4) (sqrt (/ 1 (sin kx))))))
#s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/4) #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 (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/4) #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 (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/4) #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/45 (/ 1 (pow (sin kx) 4))) (+ (* 2/3 (/ 1 (pow (sin kx) 6))) (/ 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 (+ (pow (sin ky) 2) (pow (sin kx) 2)) #s(hole binary64 (pow (sin kx) 2)))
#s(approx (+ (pow (sin ky) 2) (pow (sin kx) 2)) #s(hole binary64 (+ (pow ky 2) (pow (sin kx) 2))))
#s(approx (+ (pow (sin ky) 2) (pow (sin kx) 2)) #s(hole binary64 (+ (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2)))) (pow (sin kx) 2))))
#s(approx (+ (pow (sin ky) 2) (pow (sin kx) 2)) #s(hole binary64 (+ (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3)))) (pow (sin kx) 2))))
#s(approx (pow (sin ky) 2) #s(hole binary64 (pow ky 2)))
#s(approx (pow (sin ky) 2) #s(hole binary64 (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2))))))
#s(approx (pow (sin ky) 2) #s(hole binary64 (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3))))))
#s(approx (pow (sin ky) 2) #s(hole binary64 (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* (pow ky 2) (+ 2/45 (* -1/315 (pow ky 2)))) 1/3))))))
#s(approx (sin ky) #s(hole binary64 ky))
#s(approx (sin ky) #s(hole binary64 (* ky (+ 1 (* -1/6 (pow ky 2))))))
#s(approx (sin ky) #s(hole binary64 (* ky (+ 1 (* (pow ky 2) (- (* 1/120 (pow ky 2)) 1/6))))))
#s(approx (sin ky) #s(hole binary64 (* ky (+ 1 (* (pow ky 2) (- (* (pow ky 2) (+ 1/120 (* -1/5040 (pow ky 2)))) 1/6))))))
#s(approx ky #s(hole binary64 ky))
#s(approx (* (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (sin ky)) #s(hole binary64 (/ (* ky (sin th)) (sin kx))))
#s(approx (* (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (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 ky) 2) (pow (sin kx) 2)) -1/2) (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 ky) 2) (pow (sin kx) 2)) -1/2) (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 ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) #s(hole binary64 (/ (sin th) (sin kx))))
#s(approx (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) #s(hole binary64 (+ (* -1/2 (/ (* (pow ky 2) (sin th)) (pow (sin kx) 3))) (/ (sin th) (sin kx)))))
#s(approx (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (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 (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (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 (* (/ (sin ky) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (* (* ky (sin th)) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx)))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (* ky (+ (* (sin th) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx))))))) (* (pow ky 2) (+ (* -1/2 (* (sin th) (sqrt (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 3))))) (* -1/6 (* (sin th) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx))))))))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (* ky (+ (* (sin th) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx))))))) (* (pow ky 2) (+ (* -1/2 (* (sin th) (sqrt (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 3))))) (+ (* -1/6 (* (sin th) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx)))))))) (* (pow ky 2) (+ (* 1/120 (* (sin th) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx)))))))) (+ (* 1/12 (* (sin th) (sqrt (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 3))))) (* 1/2 (* (* (sin th) (+ (* 1/3 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 2))) (* 3/4 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 3))))) (sqrt (- 1/2 (* 1/2 (cos (* 2 kx)))))))))))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (* ky (+ (* (sin th) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx))))))) (* (pow ky 2) (+ (* -1/2 (* (sin th) (sqrt (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 3))))) (+ (* -1/6 (* (sin th) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx)))))))) (* (pow ky 2) (+ (* 1/120 (* (sin th) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx)))))))) (+ (* 1/12 (* (sin th) (sqrt (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 3))))) (+ (* 1/2 (* (* (sin th) (+ (* 1/3 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 2))) (* 3/4 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 3))))) (sqrt (- 1/2 (* 1/2 (cos (* 2 kx))))))) (* (pow ky 2) (+ (* -1/2 (* (* (sin th) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 2))) (* 3/4 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 3)))) (- 1/2 (* 1/2 (cos (* 2 kx)))))) (+ (* 2/45 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 2))) (+ (* 2/3 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 3))) (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 4)))))) (sqrt (- 1/2 (* 1/2 (cos (* 2 kx))))))) (+ (* -1/12 (* (* (sin th) (+ (* 1/3 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 2))) (* 3/4 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 3))))) (sqrt (- 1/2 (* 1/2 (cos (* 2 kx))))))) (+ (* -1/240 (* (sin th) (sqrt (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 3))))) (* -1/5040 (* (sin th) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx)))))))))))))))))))))))
#s(approx (/ (sin ky) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) #s(hole binary64 (* ky (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx)))))))))
#s(approx (/ (sin ky) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) #s(hole binary64 (* ky (+ (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -1/2 (sqrt (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 3)))) (* -1/6 (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx)))))))))))))
#s(approx (/ (sin ky) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) #s(hole binary64 (* ky (+ (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -1/2 (sqrt (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 3)))) (+ (* -1/6 (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx))))))) (* (pow ky 2) (+ (* 1/120 (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx))))))) (+ (* 1/12 (sqrt (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 3)))) (* 1/2 (* (+ (* 1/3 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 2))) (* 3/4 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 3)))) (sqrt (- 1/2 (* 1/2 (cos (* 2 kx)))))))))))))))))
#s(approx (/ (sin ky) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) #s(hole binary64 (* ky (+ (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx)))))) (* (pow ky 2) (+ (* -1/2 (sqrt (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 3)))) (+ (* -1/6 (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx))))))) (* (pow ky 2) (+ (* 1/120 (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx))))))) (+ (* 1/12 (sqrt (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 3)))) (+ (* 1/2 (* (+ (* 1/3 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 2))) (* 3/4 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 3)))) (sqrt (- 1/2 (* 1/2 (cos (* 2 kx))))))) (* (pow ky 2) (+ (* -1/2 (* (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 2))) (* 3/4 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 3)))) (- 1/2 (* 1/2 (cos (* 2 kx)))))) (+ (* 2/45 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 2))) (+ (* 2/3 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 3))) (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 4))))) (sqrt (- 1/2 (* 1/2 (cos (* 2 kx))))))) (+ (* -1/12 (* (+ (* 1/3 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 2))) (* 3/4 (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 3)))) (sqrt (- 1/2 (* 1/2 (cos (* 2 kx))))))) (+ (* -1/240 (sqrt (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 3)))) (* -1/5040 (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx))))))))))))))))))))))
#s(approx (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2))) #s(hole binary64 (sqrt (- 1/2 (* 1/2 (cos (* 2 kx)))))))
#s(approx (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2))) #s(hole binary64 (+ (sqrt (- 1/2 (* 1/2 (cos (* 2 kx))))) (* 1/2 (* (pow ky 2) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx)))))))))))
#s(approx (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2))) #s(hole binary64 (+ (sqrt (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (pow ky 2) (+ (* -1/2 (* (* (pow ky 2) (+ 1/3 (* 1/4 (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx)))))))) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx)))))))) (* 1/2 (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx))))))))))))
#s(approx (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2))) #s(hole binary64 (+ (sqrt (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (pow ky 2) (+ (* 1/2 (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx))))))) (* (pow ky 2) (+ (* -1/2 (* (+ 1/3 (* 1/4 (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx))))))) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx)))))))) (* 1/2 (* (* (pow ky 2) (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx))))))) (- 1/2 (* 1/2 (cos (* 2 kx)))))))) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx)))))))))))))))
#s(approx (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)) #s(hole binary64 (- 1/2 (* 1/2 (cos (* 2 kx))))))
#s(approx (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)) #s(hole binary64 (- (+ 1/2 (pow ky 2)) (* 1/2 (cos (* 2 kx))))))
#s(approx (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)) #s(hole binary64 (- (+ 1/2 (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2))))) (* 1/2 (cos (* 2 kx))))))
#s(approx (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)) #s(hole binary64 (- (+ 1/2 (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3))))) (* 1/2 (cos (* 2 kx))))))
#s(approx (* (+ (* (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* ky ky)) 1) (* ky ky)) #s(hole binary64 (pow ky 2)))
#s(approx (* (+ (* (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* ky ky)) 1) (* ky ky)) #s(hole binary64 (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2))))))
#s(approx (* (+ (* (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* ky ky)) 1) (* ky ky)) #s(hole binary64 (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3))))))
#s(approx (* (+ (* (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* ky ky)) 1) (* ky ky)) #s(hole binary64 (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* (pow ky 2) (+ 2/45 (* -1/315 (pow ky 2)))) 1/3))))))
#s(approx (+ (* (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* ky ky)) 1) #s(hole binary64 1))
#s(approx (+ (* (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* ky ky)) 1) #s(hole binary64 (+ 1 (* -1/3 (pow ky 2)))))
#s(approx (+ (* (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* ky ky)) 1) #s(hole binary64 (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3)))))
#s(approx (+ (* (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* ky ky)) 1) #s(hole binary64 (+ 1 (* (pow ky 2) (- (* (pow ky 2) (+ 2/45 (* -1/315 (pow ky 2)))) 1/3)))))
#s(approx (* (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* ky ky)) #s(hole binary64 (* -1/3 (pow ky 2))))
#s(approx (* (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* ky ky)) #s(hole binary64 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3))))
#s(approx (* (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* ky ky)) #s(hole binary64 (* (pow ky 2) (- (* (pow ky 2) (+ 2/45 (* -1/315 (pow ky 2)))) 1/3))))
#s(approx (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) #s(hole binary64 -1/3))
#s(approx (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) #s(hole binary64 (- (* 2/45 (pow ky 2)) 1/3)))
#s(approx (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) #s(hole binary64 (- (* (pow ky 2) (+ 2/45 (* -1/315 (pow ky 2)))) 1/3)))
#s(approx (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) #s(hole binary64 (* 2/45 (pow ky 2))))
#s(approx (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) #s(hole binary64 (* (pow ky 2) (+ 2/45 (* -1/315 (pow ky 2))))))
#s(approx (+ (* (* ky ky) -1/315) 2/45) #s(hole binary64 2/45))
#s(approx (+ (* (* ky ky) -1/315) 2/45) #s(hole binary64 (+ 2/45 (* -1/315 (pow ky 2)))))
#s(approx (* (* ky ky) -1/315) #s(hole binary64 (* -1/315 (pow ky 2))))
#s(approx (* ky ky) #s(hole binary64 (pow ky 2)))
#s(approx (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin ky)) #s(hole binary64 (/ ky (sin kx))))
#s(approx (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -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 ky) 2) (pow (sin kx) 2)) -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 ky) 2) (pow (sin kx) 2)) -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 ky) 2) (pow (sin kx) 2)) -1/2) #s(hole binary64 (/ 1 (sin kx))))
#s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) #s(hole binary64 (+ (* -1/2 (/ (pow ky 2) (pow (sin kx) 3))) (/ 1 (sin kx)))))
#s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -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 ky) 2) (pow (sin kx) 2)) -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 (pow (sin ky) 2) -1/2) #s(hole binary64 (/ 1 ky)))
#s(approx (pow (pow (sin ky) 2) -1/2) #s(hole binary64 (/ (+ 1 (* 1/6 (pow ky 2))) ky)))
#s(approx (pow (pow (sin ky) 2) -1/2) #s(hole binary64 (/ (+ 1 (* (pow ky 2) (+ 1/6 (* 7/360 (pow ky 2))))) ky)))
#s(approx (pow (pow (sin ky) 2) -1/2) #s(hole binary64 (/ (+ 1 (* (pow ky 2) (+ 1/6 (* (pow ky 2) (+ 7/360 (* 31/15120 (pow ky 2))))))) ky)))
#s(approx (pow (sin ky) 2) #s(hole binary64 (pow (sin ky) 2)))
#s(approx (sin ky) #s(hole binary64 (sin ky)))
#s(approx (* (+ (* (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* ky ky)) 1) (* ky ky)) #s(hole binary64 (* -1/315 (pow ky 8))))
#s(approx (* (+ (* (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* ky ky)) 1) (* ky ky)) #s(hole binary64 (* (pow ky 8) (- (* 2/45 (/ 1 (pow ky 2))) 1/315))))
#s(approx (* (+ (* (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* ky ky)) 1) (* ky ky)) #s(hole binary64 (* (pow ky 8) (- (* 2/45 (/ 1 (pow ky 2))) (+ 1/315 (/ 1/3 (pow ky 4)))))))
#s(approx (* (+ (* (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* ky ky)) 1) (* ky ky)) #s(hole binary64 (* (pow ky 8) (- (+ (* 2/45 (/ 1 (pow ky 2))) (/ 1 (pow ky 6))) (+ 1/315 (/ 1/3 (pow ky 4)))))))
#s(approx (+ (* (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* ky ky)) 1) #s(hole binary64 (* -1/315 (pow ky 6))))
#s(approx (+ (* (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* ky ky)) 1) #s(hole binary64 (* (pow ky 6) (- (* 2/45 (/ 1 (pow ky 2))) 1/315))))
#s(approx (+ (* (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* ky ky)) 1) #s(hole binary64 (* (pow ky 6) (- (* 2/45 (/ 1 (pow ky 2))) (+ 1/315 (/ 1/3 (pow ky 4)))))))
#s(approx (+ (* (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* ky ky)) 1) #s(hole binary64 (* (pow ky 6) (- (+ (* 2/45 (/ 1 (pow ky 2))) (/ 1 (pow ky 6))) (+ 1/315 (/ 1/3 (pow ky 4)))))))
#s(approx (* (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* ky ky)) #s(hole binary64 (* -1/315 (pow ky 6))))
#s(approx (* (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* ky ky)) #s(hole binary64 (* (pow ky 6) (- (* 2/45 (/ 1 (pow ky 2))) 1/315))))
#s(approx (* (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* ky ky)) #s(hole binary64 (* (pow ky 6) (- (* 2/45 (/ 1 (pow ky 2))) (+ 1/315 (/ 1/3 (pow ky 4)))))))
#s(approx (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) #s(hole binary64 (* -1/315 (pow ky 4))))
#s(approx (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) #s(hole binary64 (* (pow ky 4) (- (* 2/45 (/ 1 (pow ky 2))) 1/315))))
#s(approx (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) #s(hole binary64 (* (pow ky 4) (- (* 2/45 (/ 1 (pow ky 2))) (+ 1/315 (/ 1/3 (pow ky 4)))))))
#s(approx (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) #s(hole binary64 (* -1/315 (pow ky 4))))
#s(approx (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) #s(hole binary64 (* (pow ky 4) (- (* 2/45 (/ 1 (pow ky 2))) 1/315))))
#s(approx (+ (* (* ky ky) -1/315) 2/45) #s(hole binary64 (* -1/315 (pow ky 2))))
#s(approx (+ (* (* ky ky) -1/315) 2/45) #s(hole binary64 (* (pow ky 2) (- (* 2/45 (/ 1 (pow ky 2))) 1/315))))
#s(approx (pow (pow (sin ky) 2) -1/2) #s(hole binary64 (/ 1 (sin ky))))
#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 (* (+ (* (* th th) -1/6) 1) th) #s(hole binary64 th))
#s(approx (* (+ (* (* th th) -1/6) 1) th) #s(hole binary64 (* th (+ 1 (* -1/6 (pow th 2))))))
#s(approx (+ (* (* th th) -1/6) 1) #s(hole binary64 1))
#s(approx (+ (* (* th th) -1/6) 1) #s(hole binary64 (+ 1 (* -1/6 (pow th 2)))))
#s(approx (* (* th th) -1/6) #s(hole binary64 (* -1/6 (pow th 2))))
#s(approx (* th th) #s(hole binary64 (pow th 2)))
#s(approx (* (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (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 ky) 2) (pow (sin kx) 2)) -1/2) (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 ky) 2) (pow (sin kx) 2)) -1/2) (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 ky) 2) (pow (sin kx) 2)) -1/2) (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 (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) #s(hole binary64 (* th (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
#s(approx (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (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 (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (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 (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (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) (sin kx)) #s(hole binary64 (/ th (sin kx))))
#s(approx (/ (sin th) (sin kx)) #s(hole binary64 (* th (+ (* -1/6 (/ (pow th 2) (sin kx))) (/ 1 (sin kx))))))
#s(approx (/ (sin th) (sin kx)) #s(hole binary64 (* th (+ (* (pow th 2) (- (* 1/120 (/ (pow th 2) (sin kx))) (* 1/6 (/ 1 (sin kx))))) (/ 1 (sin kx))))))
#s(approx (/ (sin th) (sin kx)) #s(hole binary64 (* th (+ (* (pow th 2) (- (* (pow th 2) (+ (* -1/5040 (/ (pow th 2) (sin kx))) (* 1/120 (/ 1 (sin kx))))) (* 1/6 (/ 1 (sin kx))))) (/ 1 (sin kx))))))
#s(approx (* (/ (sin ky) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (* (* th (sin ky)) (sqrt (/ 1 (- (+ 1/2 (pow (sin ky) 2)) (* 1/2 (cos (* 2 kx)))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (* th (+ (* -1/6 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (- (+ 1/2 (pow (sin ky) 2)) (* 1/2 (cos (* 2 kx)))))))) (* (sin ky) (sqrt (/ 1 (- (+ 1/2 (pow (sin ky) 2)) (* 1/2 (cos (* 2 kx)))))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (* th (+ (* (sin ky) (sqrt (/ 1 (- (+ 1/2 (pow (sin ky) 2)) (* 1/2 (cos (* 2 kx))))))) (* (pow th 2) (+ (* -1/6 (* (sin ky) (sqrt (/ 1 (- (+ 1/2 (pow (sin ky) 2)) (* 1/2 (cos (* 2 kx)))))))) (* 1/120 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (- (+ 1/2 (pow (sin ky) 2)) (* 1/2 (cos (* 2 kx))))))))))))))
#s(approx (* (/ (sin ky) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) (sin th)) #s(hole binary64 (* th (+ (* (sin ky) (sqrt (/ 1 (- (+ 1/2 (pow (sin ky) 2)) (* 1/2 (cos (* 2 kx))))))) (* (pow th 2) (+ (* -1/6 (* (sin ky) (sqrt (/ 1 (- (+ 1/2 (pow (sin ky) 2)) (* 1/2 (cos (* 2 kx)))))))) (* (pow th 2) (+ (* -1/5040 (* (* (pow th 2) (sin ky)) (sqrt (/ 1 (- (+ 1/2 (pow (sin ky) 2)) (* 1/2 (cos (* 2 kx)))))))) (* 1/120 (* (sin ky) (sqrt (/ 1 (- (+ 1/2 (pow (sin ky) 2)) (* 1/2 (cos (* 2 kx))))))))))))))))
#s(approx (sin th) #s(hole binary64 (sin th)))
#s(approx (* (+ (* (* th th) -1/6) 1) th) #s(hole binary64 (* -1/6 (pow th 3))))
#s(approx (* (+ (* (* th th) -1/6) 1) th) #s(hole binary64 (* (pow th 3) (- (/ 1 (pow th 2)) 1/6))))
#s(approx (+ (* (* th th) -1/6) 1) #s(hole binary64 (* -1/6 (pow th 2))))
#s(approx (+ (* (* th th) -1/6) 1) #s(hole binary64 (* (pow th 2) (- (/ 1 (pow th 2)) 1/6))))
#s(approx (* (+ (* (* th th) -1/6) 1) th) #s(hole binary64 (* -1 (* (pow th 3) (- 1/6 (/ 1 (pow th 2)))))))

Outputs
(.f64 (sin.f64 th) #s(approx (/ (sin ky) (sqrt (+ (- 1/2 ( 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) (*.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (sin.f64 ky))))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (- 1/2 ( 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) (*.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (sin.f64 ky))) (sin.f64 th))
#s(approx (/ (sin ky) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) (*.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (sin.f64 ky)))
(*.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (sin.f64 ky))
(*.f64 (sin.f64 ky) (pow.f64 (+.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 (pow.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal -1/4 binary64)) #s(literal 1 binary64)) (pow.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal -1/4 binary64)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal -1/4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal -1/4 binary64)))
(pow.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal -1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal -1/2 binary64))
(exp.f64 (*.f64 (log.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #s(literal -1/2 binary64)))
(exp.f64 (.f64 (.f64 #s(literal -1/4 binary64) (log.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal 2 binary64)))
(+.f64 (cosh.f64 (.f64 (log.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #s(literal -1/2 binary64))) (sinh.f64 (.f64 (log.f64 (+.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 (cosh.f64 (.f64 (.f64 #s(literal -1/4 binary64) (log.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal 2 binary64))) (sinh.f64 (.f64 (.f64 #s(literal -1/4 binary64) (log.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal 2 binary64))))
(*.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal -1/8 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal -1/8 binary64)))
(pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal -1/4 binary64))
(exp.f64 (*.f64 (log.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #s(literal -1/4 binary64)))
(+.f64 (cosh.f64 (.f64 (log.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #s(literal -1/4 binary64))) (sinh.f64 (.f64 (log.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #s(literal -1/4 binary64))))
(/.f64 (-.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 binary64))) (-.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #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 (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))) (+.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 (+.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 #s(literal 1/2 binary64) (-.f64 (.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1/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 ky) #s(literal 2 binary64)) (pow.f64 (sin.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 (sin.f64 ky) (sin.f64 ky))
(pow.f64 (sin.f64 ky) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 ky ky)) (cos.f64 (+.f64 ky ky))) #s(literal 2 binary64))
(-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))
(exp.f64 (*.f64 (log.f64 (sin.f64 ky)) #s(literal 2 binary64)))
(+.f64 (cosh.f64 (.f64 (log.f64 (sin.f64 ky)) #s(literal 2 binary64))) (sinh.f64 (.f64 (log.f64 (sin.f64 ky)) #s(literal 2 binary64))))
(sin.f64 ky)
ky
#s(literal 2 binary64)
(*.f64 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) (pow.f64 (sin.f64 kx) #s(literal 1 binary64)))
(*.f64 (sin.f64 kx) (sin.f64 kx))
(pow.f64 (sin.f64 kx) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (*.f64 #s(literal 2 binary64) kx))) #s(literal 2 binary64))
(/.f64 (-.f64 #s(literal 1/4 binary64) (.f64 (.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1/2 binary64)) (.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1/2 binary64)))) (.f64 (cos.f64 kx) (cos.f64 kx)))
(/.f64 (-.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (+.f64 #s(literal 1/4 binary64) (+.f64 (.f64 (.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1/2 binary64)) (.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1/2 binary64))) (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1/2 binary64))))))
(-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1/2 binary64)))
(exp.f64 (*.f64 (log.f64 (sin.f64 kx)) #s(literal 2 binary64)))
(+.f64 (cosh.f64 (.f64 (log.f64 (sin.f64 kx)) #s(literal 2 binary64))) (sinh.f64 (.f64 (log.f64 (sin.f64 kx)) #s(literal 2 binary64))))
(+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))
(sin.f64 kx)
kx
#s(literal -1/4 binary64)
(sin.f64 th)
th
#s(approx (* (/ (sin ky) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (.f64 (+.f64 (.f64 (*.f64 th th) #s(literal -1/6 binary64)) #s(literal 1 binary64)) th)))
#s(approx (sin th) (.f64 (+.f64 (.f64 (*.f64 th th) #s(literal -1/6 binary64)) #s(literal 1 binary64)) th))
(.f64 (+.f64 (.f64 (*.f64 th th) #s(literal -1/6 binary64)) #s(literal 1 binary64)) th)
(.f64 th (+.f64 (.f64 (*.f64 th th) #s(literal -1/6 binary64)) #s(literal 1 binary64)))
(+.f64 (.f64 #s(literal 1 binary64) th) (.f64 (.f64 (.f64 th th) #s(literal -1/6 binary64)) th))
(+.f64 (.f64 th #s(literal 1 binary64)) (.f64 th (.f64 (.f64 th th) #s(literal -1/6 binary64))))
(/.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 th th) #s(literal -1/6 binary64)) (.f64 (.f64 th th) #s(literal -1/6 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (*.f64 th th) #s(literal -1/6 binary64))))
(/.f64 (-.f64 (.f64 (.f64 (.f64 th th) #s(literal -1/6 binary64)) (.f64 (.f64 th th) #s(literal -1/6 binary64))) #s(literal 1 binary64)) (-.f64 (.f64 (*.f64 th th) #s(literal -1/6 binary64)) #s(literal 1 binary64)))
(/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (.f64 (.f64 th th) #s(literal -1/6 binary64)) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (.f64 th th) #s(literal -1/6 binary64)) (.f64 (.f64 th th) #s(literal -1/6 binary64))) (.f64 #s(literal 1 binary64) (.f64 (.f64 th th) #s(literal -1/6 binary64))))))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 th th) #s(literal -1/6 binary64)) #s(literal 3 binary64)) #s(literal 1 binary64)) (+.f64 (.f64 (.f64 (.f64 th th) #s(literal -1/6 binary64)) (.f64 (.f64 th th) #s(literal -1/6 binary64))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 th th) #s(literal -1/6 binary64)) #s(literal 1 binary64)))))
(-.f64 #s(literal 1 binary64) (.f64 #s(literal 1/6 binary64) (.f64 th th)))
(+.f64 (.f64 (.f64 th th) #s(literal -1/6 binary64)) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (.f64 (.f64 th th) #s(literal -1/6 binary64)))
(.f64 (.f64 th th) #s(literal -1/6 binary64))
(.f64 #s(literal -1/6 binary64) (.f64 th th))
(.f64 th (.f64 th #s(literal -1/6 binary64)))
(*.f64 (pow.f64 th #s(literal 1 binary64)) (pow.f64 th #s(literal 1 binary64)))
(*.f64 (neg.f64 th) (neg.f64 th))
(*.f64 (fabs.f64 th) (fabs.f64 th))
(*.f64 th th)
(pow.f64 th #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 th) #s(literal 2 binary64)))
(+.f64 (cosh.f64 (.f64 (log.f64 th) #s(literal 2 binary64))) (sinh.f64 (.f64 (log.f64 th) #s(literal 2 binary64))))
#s(literal -1/6 binary64)
#s(literal 1 binary64)
#s(approx (* (/ (sin ky) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx ( (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (/.f64 (sin.f64 th) (sin.f64 kx))) (sin.f64 ky)))
(.f64 #s(approx ( (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (/.f64 (sin.f64 th) (sin.f64 kx))) (sin.f64 ky))
(.f64 (sin.f64 ky) #s(approx ( (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (/.f64 (sin.f64 th) (sin.f64 kx))))
#s(approx (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (/.f64 (sin.f64 th) (sin.f64 kx)))
(/.f64 (neg.f64 (sin.f64 th)) (neg.f64 (sin.f64 kx)))
(/.f64 (sin.f64 th) (sin.f64 kx))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64)) ky) ky) #s(literal 1/3 binary64)) (.f64 ky ky)) #s(literal 1 binary64)) (*.f64 ky ky)))))) (sin.f64 th))
(.f64 (sin.f64 th) (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64)) ky) ky) #s(literal 1/3 binary64)) (.f64 ky ky)) #s(literal 1 binary64)) (*.f64 ky ky)))))))
(/.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64)) ky) ky) #s(literal 1/3 binary64)) (.f64 ky ky)) #s(literal 1 binary64)) (*.f64 ky ky))))))
(/.f64 (neg.f64 (sin.f64 ky)) (neg.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64)) ky) ky) #s(literal 1/3 binary64)) (.f64 ky ky)) #s(literal 1 binary64)) (.f64 ky ky)))))))
(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64)) ky) ky) #s(literal 1/3 binary64)) (.f64 ky ky)) #s(literal 1 binary64)) (.f64 ky ky))))))
(pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64)) ky) ky) #s(literal 1/3 binary64)) (.f64 ky ky)) #s(literal 1 binary64)) (.f64 ky ky)))) #s(literal 1/2 binary64))
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64)) ky) ky) #s(literal 1/3 binary64)) (.f64 ky ky)) #s(literal 1 binary64)) (.f64 ky ky)))))
(exp.f64 (.f64 (log.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64)) ky) ky) #s(literal 1/3 binary64)) (.f64 ky ky)) #s(literal 1 binary64)) (*.f64 ky ky))))) #s(literal 1/2 binary64)))
(/.f64 (-.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (.f64 #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64)) ky) ky) #s(literal 1/3 binary64)) (.f64 ky ky)) #s(literal 1 binary64)) (.f64 ky ky))) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64)) ky) ky) #s(literal 1/3 binary64)) (.f64 ky ky)) #s(literal 1 binary64)) (.f64 ky ky))))) (-.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64)) ky) ky) #s(literal 1/3 binary64)) (.f64 ky ky)) #s(literal 1 binary64)) (*.f64 ky ky)))))
(/.f64 (+.f64 (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64)) ky) ky) #s(literal 1/3 binary64)) (.f64 ky ky)) #s(literal 1 binary64)) (.f64 ky ky))) #s(literal 3 binary64))) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (-.f64 (.f64 #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64)) ky) ky) #s(literal 1/3 binary64)) (.f64 ky ky)) #s(literal 1 binary64)) (.f64 ky ky))) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64)) ky) ky) #s(literal 1/3 binary64)) (.f64 ky ky)) #s(literal 1 binary64)) (.f64 ky ky)))) (.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64)) ky) ky) #s(literal 1/3 binary64)) (.f64 ky ky)) #s(literal 1 binary64)) (.f64 ky ky)))))))
(-.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1/2 binary64)) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64)) ky) ky) #s(literal 1/3 binary64)) (.f64 ky ky)) #s(literal 1 binary64)) (.f64 ky ky)))))
(+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64)) ky) ky) #s(literal 1/3 binary64)) (.f64 ky ky)) #s(literal 1 binary64)) (.f64 ky ky))))
(+.f64 #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64)) 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)))
(*.f64 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) (pow.f64 (sin.f64 kx) #s(literal 1 binary64)))
(*.f64 (sin.f64 kx) (sin.f64 kx))
(pow.f64 (sin.f64 kx) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (*.f64 #s(literal 2 binary64) kx))) #s(literal 2 binary64))
(/.f64 (-.f64 #s(literal 1/4 binary64) (.f64 (.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1/2 binary64)) (.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1/2 binary64)))) (.f64 (cos.f64 kx) (cos.f64 kx)))
(/.f64 (-.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (+.f64 #s(literal 1/4 binary64) (+.f64 (.f64 (.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1/2 binary64)) (.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1/2 binary64))) (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1/2 binary64))))))
(-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1/2 binary64)))
(exp.f64 (*.f64 (log.f64 (sin.f64 kx)) #s(literal 2 binary64)))
(+.f64 (cosh.f64 (.f64 (log.f64 (sin.f64 kx)) #s(literal 2 binary64))) (sinh.f64 (.f64 (log.f64 (sin.f64 kx)) #s(literal 2 binary64))))
(+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))
#s(literal 1/2 binary64)
(.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1/2 binary64))
(.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))
(sin.f64 (+.f64 (neg.f64 (*.f64 #s(literal 2 binary64) kx)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (*.f64 #s(literal 2 binary64) 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 (neg.f64 (*.f64 #s(literal 2 binary64) kx))))
(cos.f64 (neg.f64 (*.f64 #s(literal 2 binary64) kx)))
(cos.f64 (*.f64 #s(literal 2 binary64) kx))
(+.f64 (.f64 (sin.f64 (.f64 #s(literal 2 binary64) kx)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(*.f64 #s(literal 2 binary64) kx)
(*.f64 kx #s(literal 2 binary64))
(+.f64 kx kx)
#s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64)) ky) ky) #s(literal 1/3 binary64)) (.f64 ky ky)) #s(literal 1 binary64)) (.f64 ky ky)))
(.f64 (.f64 (+.f64 (.f64 (-.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64)) ky) ky) #s(literal 1/3 binary64)) (.f64 ky ky)) #s(literal 1 binary64)) ky) ky)
(.f64 (+.f64 (.f64 (-.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64)) ky) ky) #s(literal 1/3 binary64)) (.f64 ky ky)) #s(literal 1 binary64)) (.f64 ky ky))
(.f64 (.f64 ky ky) (+.f64 (.f64 (-.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64)) ky) ky) #s(literal 1/3 binary64)) (.f64 ky ky)) #s(literal 1 binary64)))
(+.f64 (.f64 #s(literal 1 binary64) (.f64 ky ky)) (.f64 (.f64 (-.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64)) ky) ky) #s(literal 1/3 binary64)) (.f64 ky ky)) (.f64 ky ky)))
(+.f64 (.f64 (.f64 ky ky) #s(literal 1 binary64)) (.f64 (.f64 ky ky) (.f64 (-.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64)) ky) ky) #s(literal 1/3 binary64)) (.f64 ky ky))))
(/.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 (-.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64)) ky) ky) #s(literal 1/3 binary64)) (.f64 ky ky)) (.f64 (-.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64)) ky) ky) #s(literal 1/3 binary64)) (.f64 ky ky)))) (-.f64 #s(literal 1 binary64) (.f64 (-.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64)) ky) ky) #s(literal 1/3 binary64)) (*.f64 ky ky))))
(/.f64 (-.f64 (.f64 (.f64 (-.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64)) ky) ky) #s(literal 1/3 binary64)) (.f64 ky ky)) (.f64 (-.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64)) ky) ky) #s(literal 1/3 binary64)) (.f64 ky ky))) #s(literal 1 binary64)) (-.f64 (.f64 (-.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64)) ky) ky) #s(literal 1/3 binary64)) (*.f64 ky ky)) #s(literal 1 binary64)))
(/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (.f64 (-.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64)) ky) ky) #s(literal 1/3 binary64)) (.f64 ky ky)) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (-.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64)) ky) ky) #s(literal 1/3 binary64)) (.f64 ky ky)) (.f64 (-.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64)) ky) ky) #s(literal 1/3 binary64)) (.f64 ky ky))) (.f64 #s(literal 1 binary64) (.f64 (-.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64)) ky) ky) #s(literal 1/3 binary64)) (.f64 ky ky))))))
(/.f64 (+.f64 (pow.f64 (.f64 (-.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64)) ky) ky) #s(literal 1/3 binary64)) (.f64 ky ky)) #s(literal 3 binary64)) #s(literal 1 binary64)) (+.f64 (.f64 (.f64 (-.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64)) ky) ky) #s(literal 1/3 binary64)) (.f64 ky ky)) (.f64 (-.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64)) ky) ky) #s(literal 1/3 binary64)) (.f64 ky ky))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (-.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64)) ky) ky) #s(literal 1/3 binary64)) (.f64 ky ky)) #s(literal 1 binary64)))))
(-.f64 #s(literal 1 binary64) (.f64 (neg.f64 (.f64 ky ky)) (-.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64)) ky) ky) #s(literal 1/3 binary64))))
(+.f64 (.f64 (-.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64)) ky) ky) #s(literal 1/3 binary64)) (.f64 ky ky)) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (.f64 (-.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64)) ky) ky) #s(literal 1/3 binary64)) (.f64 ky ky)))
(.f64 (.f64 (-.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64)) ky) ky) #s(literal 1/3 binary64)) ky) ky)
(.f64 (-.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64)) ky) ky) #s(literal 1/3 binary64)) (.f64 ky ky))
(.f64 (.f64 ky ky) (-.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64)) ky) ky) #s(literal 1/3 binary64)))
(/.f64 (-.f64 (.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64)) ky) ky) (.f64 (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64)) ky) ky)) #s(literal 1/9 binary64)) (+.f64 (.f64 (.f64 (+.f64 (.f64 (*.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64)) ky) ky) #s(literal 1/3 binary64)))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64)) ky) ky) #s(literal 3 binary64)) #s(literal 1/27 binary64)) (+.f64 (.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64)) ky) ky) (.f64 (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64)) ky) ky)) (+.f64 #s(literal 1/9 binary64) (.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64)) ky) ky) #s(literal 1/3 binary64)))))
(-.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64)) ky) ky) #s(literal 1/3 binary64))
(.f64 (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64)) ky) ky)
(.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64)) (.f64 ky ky))
(.f64 (.f64 ky ky) (+.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64)))
(+.f64 (.f64 (.f64 ky ky) #s(literal 2/45 binary64)) (.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) (.f64 ky ky)))
(+.f64 (.f64 (.f64 ky ky) #s(literal 2/45 binary64)) (.f64 (.f64 ky ky) (.f64 (.f64 ky ky) #s(literal -1/315 binary64))))
(/.f64 (-.f64 (.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) (.f64 (.f64 ky ky) #s(literal -1/315 binary64))) #s(literal 4/2025 binary64)) (-.f64 (.f64 (*.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64)))
(/.f64 (-.f64 #s(literal 4/2025 binary64) (.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) (.f64 (.f64 ky ky) #s(literal -1/315 binary64)))) (-.f64 #s(literal 2/45 binary64) (.f64 (*.f64 ky ky) #s(literal -1/315 binary64))))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 3 binary64)) #s(literal 8/91125 binary64)) (+.f64 (.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) (.f64 (.f64 ky ky) #s(literal -1/315 binary64))) (-.f64 #s(literal 4/2025 binary64) (.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64)))))
(/.f64 (+.f64 #s(literal 8/91125 binary64) (pow.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 3 binary64))) (+.f64 #s(literal 4/2025 binary64) (-.f64 (.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) (.f64 (.f64 ky ky) #s(literal -1/315 binary64))) (.f64 #s(literal 2/45 binary64) (.f64 (.f64 ky ky) #s(literal -1/315 binary64))))))
(-.f64 #s(literal 2/45 binary64) (.f64 #s(literal 1/315 binary64) (.f64 ky ky)))
(+.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64))
(+.f64 #s(literal 2/45 binary64) (.f64 (.f64 ky ky) #s(literal -1/315 binary64)))
(.f64 (.f64 ky ky) #s(literal -1/315 binary64))
(.f64 #s(literal -1/315 binary64) (.f64 ky ky))
(.f64 ky (.f64 ky #s(literal -1/315 binary64)))
(*.f64 (pow.f64 ky #s(literal 1 binary64)) (pow.f64 ky #s(literal 1 binary64)))
(*.f64 (neg.f64 ky) (neg.f64 ky))
(*.f64 (fabs.f64 ky) (fabs.f64 ky))
(*.f64 ky ky)
(pow.f64 ky #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 ky) #s(literal 2 binary64)))
(+.f64 (cosh.f64 (.f64 (log.f64 ky) #s(literal 2 binary64))) (sinh.f64 (.f64 (log.f64 ky) #s(literal 2 binary64))))
#s(literal -1/315 binary64)
#s(literal 2/45 binary64)
#s(literal 1/3 binary64)
(.f64 #s(approx (/ (sin ky) (sqrt (+ (- 1/2 ( 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) (*.f64 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (pow.f64 (sin.f64 ky) #s(literal -1 binary64))) (sin.f64 ky))) (sin.f64 th))
(.f64 (sin.f64 th) #s(approx (/ (sin ky) (sqrt (+ (- 1/2 ( 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) (*.f64 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (pow.f64 (sin.f64 ky) #s(literal -1 binary64))) (sin.f64 ky))))
#s(approx (/ (sin ky) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) (*.f64 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (pow.f64 (sin.f64 ky) #s(literal -1 binary64))) (sin.f64 ky)))
(*.f64 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (pow.f64 (sin.f64 ky) #s(literal -1 binary64))) (sin.f64 ky))
(*.f64 (sin.f64 ky) #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (pow.f64 (sin.f64 ky) #s(literal -1 binary64))))
#s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (pow.f64 (sin.f64 ky) #s(literal -1 binary64)))
(*.f64 (pow.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) #s(literal -1/4 binary64)) (pow.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) #s(literal -1/4 binary64)))
(pow.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) #s(literal -1/2 binary64))
(pow.f64 (sin.f64 ky) #s(literal -1 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (sin.f64 ky)))
(/.f64 #s(literal 1 binary64) (sin.f64 ky))
(exp.f64 (*.f64 (log.f64 (sin.f64 ky)) #s(literal -1 binary64)))
(exp.f64 (*.f64 (log.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal -1/2 binary64)))
(+.f64 (cosh.f64 (.f64 (log.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (sinh.f64 (.f64 (log.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal -1/2 binary64))))
#s(literal -1/2 binary64)
#s(approx (* (/ (sin ky) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) (sin th)) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (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 (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) (sin th)) (+.f64 (.f64 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 kx kx)) (.f64 (.f64 (-.f64 (.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 1/3 binary64)) (.f64 #s(literal -3/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 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) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) (sin th)) (+.f64 (.f64 (+.f64 (.f64 (-.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (sin.f64 th)) (+.f64 (+.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal -8 binary64)) (.f64 #s(literal 2/3 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 binary64)))) (.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 2/45 binary64))) (.f64 (/.f64 (-.f64 (.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 1/3 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))) #s(literal -1/2 binary64))))) (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (-.f64 (.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 1/3 binary64)) (.f64 #s(literal -3/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 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) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) #s(literal 1 binary64))
#s(approx (/ (sin ky) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 1 binary64)))
#s(approx (/ (sin ky) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (.f64 (-.f64 (.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 1/3 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))) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)))) (.f64 kx kx)) #s(literal 1 binary64)))
#s(approx (/ (sin ky) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) (+.f64 (.f64 (-.f64 (.f64 (-.f64 (.f64 (.f64 (.f64 (.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (+.f64 (+.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal -8 binary64)) (.f64 #s(literal 2/3 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 binary64)))) (.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 2/45 binary64))) (.f64 (/.f64 (-.f64 (.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 1/3 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))) #s(literal -1/2 binary64)))) #s(literal -1/2 binary64)) (.f64 #s(literal -1/2 binary64) (.f64 (-.f64 (.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 1/3 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))))) (.f64 kx kx)) (.f64 (pow.f64 (sin.f64 ky) #s(literal -2 binary64)) #s(literal 1/2 binary64))) (.f64 kx kx)) #s(literal 1 binary64)))
#s(approx (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin ky)) #s(literal 1 binary64))
#s(approx (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin ky)) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 1 binary64)))
#s(approx (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin ky)) (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (.f64 (-.f64 (.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 1/3 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))) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)))) (.f64 kx kx)) #s(literal 1 binary64)))
#s(approx (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin ky)) (+.f64 (.f64 (-.f64 (.f64 (-.f64 (.f64 (.f64 (.f64 (.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (+.f64 (+.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal -8 binary64)) (.f64 #s(literal 2/3 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 binary64)))) (.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 2/45 binary64))) (.f64 (/.f64 (-.f64 (.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 1/3 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))) #s(literal -1/2 binary64)))) #s(literal -1/2 binary64)) (.f64 #s(literal -1/2 binary64) (.f64 (-.f64 (.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 1/3 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))))) (.f64 kx kx)) (.f64 (pow.f64 (sin.f64 ky) #s(literal -2 binary64)) #s(literal 1/2 binary64))) (.f64 kx kx)) #s(literal 1 binary64)))
#s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (pow.f64 (sin.f64 ky) #s(literal -1 binary64)))
#s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 3 binary64))) (pow.f64 (sin.f64 ky) #s(literal -1 binary64))))
#s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (.f64 (-.f64 (.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 1/3 binary64)) (.f64 #s(literal -3/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 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 ky) 2) (pow (sin kx) 2)) -1/2) (+.f64 (.f64 (-.f64 (.f64 (-.f64 (.f64 (.f64 (.f64 (.f64 kx kx) (sin.f64 ky)) (+.f64 (+.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal -8 binary64)) (.f64 #s(literal 2/3 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 binary64)))) (.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 2/45 binary64))) (.f64 (/.f64 (-.f64 (.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 1/3 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))) #s(literal -1/2 binary64)))) #s(literal -1/2 binary64)) (.f64 #s(literal -1/2 binary64) (.f64 (-.f64 (.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 1/3 binary64)) (.f64 #s(literal -3/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 binary64)))) (sin.f64 ky)))) (.f64 kx kx)) (.f64 (pow.f64 (sin.f64 ky) #s(literal -3 binary64)) #s(literal 1/2 binary64))) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal -1 binary64))))
#s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/4) (*.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal -1 binary64))) #s(literal 1 binary64)))
#s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/4) (-.f64 (.f64 #s(literal -1/4 binary64) (.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal -5 binary64))) (.f64 kx kx))) (.f64 #s(literal -1 binary64) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal -1 binary64))))))
#s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/4) (+.f64 (.f64 (-.f64 (.f64 #s(literal -1/4 binary64) (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal -5 binary64)))) (.f64 #s(literal -1 binary64) (.f64 (.f64 (-.f64 (.f64 (-.f64 (.f64 (.f64 #s(literal 24 binary64) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (+.f64 (pow.f64 (sin.f64 ky) #s(literal -6 binary64)) (.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 1/3 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)))))) (.f64 kx kx)) (.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal -1 binary64))) #s(literal 1 binary64))))
#s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/4) (+.f64 (.f64 (+.f64 (.f64 (.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 (.f64 (-.f64 (.f64 (.f64 #s(literal 24 binary64) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (+.f64 (pow.f64 (sin.f64 ky) #s(literal -6 binary64)) (.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 1/3 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 (+.f64 (.f64 (-.f64 (+.f64 (.f64 #s(literal 720 binary64) (+.f64 (pow.f64 (sin.f64 ky) #s(literal -6 binary64)) (.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 1/3 binary64)))) (.f64 (.f64 #s(literal -720 binary64) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (+.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal -8 binary64)) (.f64 #s(literal 2/3 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 binary64)))) (.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 2/45 binary64))))) (.f64 #s(literal 240 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 binary64)))) #s(literal 1/2880 binary64)) (.f64 (/.f64 (-.f64 (.f64 (.f64 #s(literal 24 binary64) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (+.f64 (pow.f64 (sin.f64 ky) #s(literal -6 binary64)) (.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 1/3 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 (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))
#s(approx (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)) (+.f64 (*.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
#s(approx (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)) (+.f64 (.f64 (+.f64 (.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 (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)) (+.f64 (.f64 (+.f64 (.f64 (-.f64 (.f64 (.f64 kx kx) #s(literal 2/45 binary64)) #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 (- 1/2 (* 1/2 (cos (* 2 kx)))) (*.f64 kx kx))
#s(approx (- 1/2 (* 1/2 (cos (* 2 kx)))) (.f64 (+.f64 (.f64 #s(literal -1/3 binary64) (.f64 kx kx)) #s(literal 1 binary64)) (.f64 kx kx)))
#s(approx (- 1/2 (* 1/2 (cos (* 2 kx)))) (.f64 (+.f64 (.f64 (-.f64 (.f64 (.f64 kx kx) #s(literal 2/45 binary64)) #s(literal 1/3 binary64)) (.f64 kx kx)) #s(literal 1 binary64)) (.f64 kx kx)))
#s(approx (- 1/2 (* 1/2 (cos (* 2 kx)))) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.f64 (.f64 kx kx) #s(literal -1/315 binary64)) #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 (+.f64 (.f64 (*.f64 kx kx) #s(literal -1/6 binary64)) #s(literal 1 binary64)) kx))
#s(approx (sin kx) (.f64 (+.f64 (.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 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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 ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (sin ky)) (sin.f64 th))
#s(approx (* (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (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 ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (sin ky)) (+.f64 (.f64 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 kx kx)) (.f64 (.f64 (-.f64 (.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 1/3 binary64)) (.f64 #s(literal -3/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 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 (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (sin ky)) (+.f64 (.f64 (+.f64 (.f64 (-.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (sin.f64 th)) (+.f64 (+.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal -8 binary64)) (.f64 #s(literal 2/3 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 binary64)))) (.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 2/45 binary64))) (.f64 (/.f64 (-.f64 (.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 1/3 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))) #s(literal -1/2 binary64))))) (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (-.f64 (.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 1/3 binary64)) (.f64 #s(literal -3/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 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 (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (/.f64 (sin.f64 th) (sin.f64 ky)))
#s(approx (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (+.f64 (.f64 (/.f64 (.f64 (*.f64 kx kx) (sin.f64 th)) (pow.f64 (sin.f64 ky) #s(literal 3 binary64))) #s(literal -1/2 binary64)) (/.f64 (sin.f64 th) (sin.f64 ky))))
#s(approx (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (+.f64 (.f64 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 kx kx)) (.f64 (.f64 (-.f64 (.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 1/3 binary64)) (.f64 #s(literal -3/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 binary64)))) (sin.f64 th)) (sin.f64 ky))) (/.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) (pow.f64 (sin.f64 ky) #s(literal 3 binary64)))) (.f64 kx kx)) (/.f64 (sin.f64 th) (sin.f64 ky))))
#s(approx (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (+.f64 (.f64 (+.f64 (.f64 (-.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (.f64 (sin.f64 th) (sin.f64 ky)) (+.f64 (+.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal -8 binary64)) (.f64 #s(literal 2/3 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 binary64)))) (.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 2/45 binary64))) (.f64 (/.f64 (-.f64 (.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 1/3 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))) #s(literal -1/2 binary64))))) (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (-.f64 (.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 1/3 binary64)) (.f64 #s(literal -3/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 binary64)))) (sin.f64 th)) (sin.f64 ky)))) (.f64 kx kx)) (/.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) (pow.f64 (sin.f64 ky) #s(literal 3 binary64)))) (.f64 kx kx)) (/.f64 (sin.f64 th) (sin.f64 ky))))
#s(approx (/ (sin th) (sin kx)) (/.f64 (sin.f64 th) kx))
#s(approx (/ (sin th) (sin kx)) (/.f64 (+.f64 (.f64 (.f64 #s(literal 1/6 binary64) (*.f64 kx kx)) (sin.f64 th)) (sin.f64 th)) kx))
#s(approx (/ (sin th) (sin kx)) (/.f64 (+.f64 (.f64 (-.f64 (.f64 (neg.f64 (.f64 kx kx)) (.f64 (sin.f64 th) #s(literal -7/360 binary64))) (.f64 #s(literal -1/6 binary64) (sin.f64 th))) (.f64 kx kx)) (sin.f64 th)) kx))
#s(approx (/ (sin th) (sin kx)) (/.f64 (+.f64 (.f64 (-.f64 (.f64 (-.f64 (.f64 (neg.f64 (.f64 kx kx)) (+.f64 (-.f64 (.f64 #s(literal 1/720 binary64) (sin.f64 th)) (.f64 #s(literal -1/6 binary64) (.f64 (sin.f64 th) #s(literal -7/360 binary64)))) (.f64 #s(literal -1/5040 binary64) (sin.f64 th)))) (.f64 (sin.f64 th) #s(literal -7/360 binary64))) (.f64 kx kx)) (.f64 #s(literal -1/6 binary64) (sin.f64 th))) (.f64 kx kx)) (sin.f64 th)) kx))
#s(approx (* (/ (sin ky) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) (sin th)) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (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 (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) (sin th)) (+.f64 (.f64 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 kx kx)) (.f64 (.f64 (-.f64 (.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 1/3 binary64)) (.f64 #s(literal -3/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 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) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) (sin th)) (+.f64 (.f64 (+.f64 (.f64 (-.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (.f64 (.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (sin.f64 th)) (+.f64 (+.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal -8 binary64)) (.f64 #s(literal 2/3 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 binary64)))) (.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 2/45 binary64))) (.f64 (/.f64 (-.f64 (.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 1/3 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))) #s(literal -1/2 binary64))))) (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (-.f64 (.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 1/3 binary64)) (.f64 #s(literal -3/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 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) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) #s(literal 1 binary64))
#s(approx (/ (sin ky) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 1 binary64)))
#s(approx (/ (sin ky) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (.f64 (-.f64 (.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 1/3 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))) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)))) (.f64 kx kx)) #s(literal 1 binary64)))
#s(approx (/ (sin ky) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) (+.f64 (.f64 (-.f64 (.f64 (-.f64 (.f64 (.f64 (.f64 (.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (+.f64 (+.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal -8 binary64)) (.f64 #s(literal 2/3 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 binary64)))) (.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 2/45 binary64))) (.f64 (/.f64 (-.f64 (.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 1/3 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))) #s(literal -1/2 binary64)))) #s(literal -1/2 binary64)) (.f64 #s(literal -1/2 binary64) (.f64 (-.f64 (.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 1/3 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))))) (.f64 kx kx)) (.f64 (pow.f64 (sin.f64 ky) #s(literal -2 binary64)) #s(literal 1/2 binary64))) (.f64 kx kx)) #s(literal 1 binary64)))
#s(approx (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2))) (sin.f64 ky))
#s(approx (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 kx kx)) (sin.f64 ky)) (sin.f64 ky)))
#s(approx (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2))) (+.f64 (.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sin.f64 ky)) (.f64 (/.f64 (.f64 (+.f64 (.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 kx kx)) (sin.f64 ky)))
#s(approx (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2))) (+.f64 (.f64 (+.f64 (.f64 (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64))) #s(literal 1/3 binary64))) (sin.f64 ky)) (.f64 #s(literal -1/2 binary64) (.f64 (.f64 kx kx) (/.f64 (-.f64 #s(literal 2/45 binary64) (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.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))))) (.f64 kx kx)) (/.f64 #s(literal 1/2 binary64) (sin.f64 ky))) (*.f64 kx kx)) (sin.f64 ky)))
#s(approx (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))
#s(approx (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)) (+.f64 (*.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
#s(approx (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)) (+.f64 (.f64 (+.f64 (.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 (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)) (+.f64 (.f64 (+.f64 (.f64 (-.f64 (.f64 (.f64 kx kx) #s(literal 2/45 binary64)) #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 (- 1/2 (* 1/2 (cos (* 2 kx)))) (*.f64 kx kx))
#s(approx (- 1/2 (* 1/2 (cos (* 2 kx)))) (.f64 (+.f64 (.f64 #s(literal -1/3 binary64) (.f64 kx kx)) #s(literal 1 binary64)) (.f64 kx kx)))
#s(approx (- 1/2 (* 1/2 (cos (* 2 kx)))) (.f64 (+.f64 (.f64 (-.f64 (.f64 (.f64 kx kx) #s(literal 2/45 binary64)) #s(literal 1/3 binary64)) (.f64 kx kx)) #s(literal 1 binary64)) (.f64 kx kx)))
#s(approx (- 1/2 (* 1/2 (cos (* 2 kx)))) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.f64 (.f64 kx kx) #s(literal -1/315 binary64)) #s(literal 2/45 binary64)) (.f64 kx kx)) #s(literal 1/3 binary64)) (.f64 kx kx)) #s(literal 1 binary64)) (.f64 kx kx)))
#s(approx (* 1/2 (cos (* 2 kx))) #s(literal 1/2 binary64))
#s(approx (* 1/2 (cos (* 2 kx))) (+.f64 (neg.f64 (*.f64 kx kx)) #s(literal 1/2 binary64)))
#s(approx (* 1/2 (cos (* 2 kx))) (+.f64 (.f64 (-.f64 (.f64 (.f64 kx kx) #s(literal 1/3 binary64)) #s(literal 1 binary64)) (.f64 kx kx)) #s(literal 1/2 binary64)))
#s(approx (* 1/2 (cos (* 2 kx))) (+.f64 (.f64 (-.f64 (.f64 (-.f64 #s(literal 1/3 binary64) (.f64 (.f64 kx kx) #s(literal 2/45 binary64))) (.f64 kx kx)) #s(literal 1 binary64)) (.f64 kx kx)) #s(literal 1/2 binary64)))
#s(approx (cos (* 2 kx)) #s(literal 1 binary64))
#s(approx (cos (* 2 kx)) (+.f64 (.f64 #s(literal -2 binary64) (.f64 kx kx)) #s(literal 1 binary64)))
#s(approx (cos (* 2 kx)) (+.f64 (.f64 (-.f64 (.f64 #s(literal 2/3 binary64) (.f64 kx kx)) #s(literal 2 binary64)) (.f64 kx kx)) #s(literal 1 binary64)))
#s(approx (cos (* 2 kx)) (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.f64 #s(literal -4/45 binary64) (.f64 kx kx)) #s(literal 2/3 binary64)) (.f64 kx kx)) #s(literal 2 binary64)) (.f64 kx kx)) #s(literal 1 binary64)))
#s(approx (* 2 kx) (*.f64 #s(literal 2 binary64) kx))
#s(approx (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin ky)) #s(literal 1 binary64))
#s(approx (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin ky)) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 1 binary64)))
#s(approx (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin ky)) (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (.f64 (-.f64 (.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 1/3 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))) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)))) (.f64 kx kx)) #s(literal 1 binary64)))
#s(approx (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin ky)) (+.f64 (.f64 (-.f64 (.f64 (-.f64 (.f64 (.f64 (.f64 (.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (+.f64 (+.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal -8 binary64)) (.f64 #s(literal 2/3 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 binary64)))) (.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 2/45 binary64))) (.f64 (/.f64 (-.f64 (.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 1/3 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))) #s(literal -1/2 binary64)))) #s(literal -1/2 binary64)) (.f64 #s(literal -1/2 binary64) (.f64 (-.f64 (.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 1/3 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))))) (.f64 kx kx)) (.f64 (pow.f64 (sin.f64 ky) #s(literal -2 binary64)) #s(literal 1/2 binary64))) (.f64 kx kx)) #s(literal 1 binary64)))
#s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (pow.f64 (sin.f64 ky) #s(literal -1 binary64)))
#s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 3 binary64))) (pow.f64 (sin.f64 ky) #s(literal -1 binary64))))
#s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (.f64 (-.f64 (.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 1/3 binary64)) (.f64 #s(literal -3/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 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 ky) 2) (pow (sin kx) 2)) -1/2) (+.f64 (.f64 (-.f64 (.f64 (-.f64 (.f64 (.f64 (.f64 (.f64 kx kx) (sin.f64 ky)) (+.f64 (+.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal -8 binary64)) (.f64 #s(literal 2/3 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 binary64)))) (.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 2/45 binary64))) (.f64 (/.f64 (-.f64 (.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 1/3 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))) #s(literal -1/2 binary64)))) #s(literal -1/2 binary64)) (.f64 #s(literal -1/2 binary64) (.f64 (-.f64 (.f64 (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) #s(literal 1/3 binary64)) (.f64 #s(literal -3/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 binary64)))) (sin.f64 ky)))) (.f64 kx kx)) (.f64 (pow.f64 (sin.f64 ky) #s(literal -3 binary64)) #s(literal 1/2 binary64))) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal -1 binary64))))
#s(approx (* (/ (sin ky) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) (sin th)) (.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #s(literal -1 binary64)) (.f64 (sin.f64 th) (sin.f64 ky))))
#s(approx (/ (sin ky) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) (*.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #s(literal -1 binary64)) (sin.f64 ky)))
#s(approx (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin ky)) (*.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #s(literal -1 binary64)) (sin.f64 ky)))
#s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #s(literal -1 binary64)))
#s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/4) (pow.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal -1 binary64)) #s(literal 1/4 binary64)))
#s(approx (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (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 (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))
#s(approx (sin kx) (sin.f64 kx))
#s(approx (* (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (sin ky)) (.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #s(literal -1 binary64)) (.f64 (sin.f64 th) (sin.f64 ky))))
#s(approx (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (*.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #s(literal -1 binary64)) (sin.f64 th)))
#s(approx (/ (sin th) (sin kx)) (/.f64 (sin.f64 th) (sin.f64 kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) (sin th)) (.f64 (pow.f64 (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1/2 binary64)))) #s(literal -1 binary64)) (.f64 (sin.f64 th) (sin.f64 ky))))
#s(approx (/ (sin ky) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) (.f64 (pow.f64 (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 (cos.f64 (*.f64 #s(literal 2 binary64) kx)) #s(literal 1/2 binary64)))) #s(literal -1 binary64)) (sin.f64 ky)))
#s(approx (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1/2 binary64)))))
#s(approx (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)) (-.f64 (+.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1/2 binary64))))
#s(approx (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))
#s(approx (* 1/2 (cos (* 2 kx))) (.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1/2 binary64)))
#s(approx (cos (* 2 kx)) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))
#s(approx (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin ky)) (*.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #s(literal -1 binary64)) (sin.f64 ky)))
#s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #s(literal -1 binary64)))
#s(approx (* (/ (sin ky) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (sin.f64 kx)))
#s(approx (* (/ (sin ky) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) (sin th)) (.f64 (+.f64 (.f64 (+.f64 (/.f64 (.f64 #s(literal -1/6 binary64) (sin.f64 th)) (sin.f64 kx)) (/.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 (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) (sin th)) (.f64 (+.f64 (.f64 (+.f64 (+.f64 (/.f64 (.f64 #s(literal -1/6 binary64) (sin.f64 th)) (sin.f64 kx)) (/.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))) (.f64 (+.f64 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 kx)) (.f64 (-.f64 (.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64)) (.f64 #s(literal -3/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -6 binary64)))) (sin.f64 th))) (/.f64 (.f64 #s(literal 1/12 binary64) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal 1/120 binary64) (sin.f64 th)) (sin.f64 kx))) (.f64 ky ky))) (.f64 ky ky)) (/.f64 (sin.f64 th) (sin.f64 kx))) ky))
#s(approx (* (/ (sin ky) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) (sin th)) (.f64 (+.f64 (.f64 (+.f64 (+.f64 (/.f64 (.f64 #s(literal -1/6 binary64) (sin.f64 th)) (sin.f64 kx)) (/.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))) (.f64 (+.f64 (+.f64 (/.f64 (.f64 #s(literal 1/120 binary64) (sin.f64 th)) (sin.f64 kx)) (/.f64 (.f64 #s(literal 1/12 binary64) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))) (+.f64 (.f64 (+.f64 (+.f64 (+.f64 (/.f64 (.f64 #s(literal -1/5040 binary64) (sin.f64 th)) (sin.f64 kx)) (/.f64 (.f64 #s(literal -1/240 binary64) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))) (.f64 (.f64 #s(literal -1/12 binary64) (sin.f64 kx)) (.f64 (-.f64 (.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64)) (.f64 #s(literal -3/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -6 binary64)))) (sin.f64 th)))) (.f64 (.f64 (.f64 (sin.f64 kx) (sin.f64 th)) (+.f64 (+.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal -8 binary64)) (.f64 (pow.f64 (sin.f64 kx) #s(literal -6 binary64)) #s(literal 2/3 binary64))) (.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 2/45 binary64))) (.f64 (/.f64 (-.f64 (.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 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))) #s(literal -1/2 binary64)))) #s(literal -1/2 binary64))) (.f64 ky ky)) (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 kx)) (.f64 (-.f64 (.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64)) (.f64 #s(literal -3/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -6 binary64)))) (sin.f64 th))))) (.f64 ky ky))) (*.f64 ky ky)) (/.f64 (sin.f64 th) (sin.f64 kx))) ky))
#s(approx (/ (sin ky) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) (/.f64 ky (sin.f64 kx)))
#s(approx (/ (sin ky) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) (.f64 (+.f64 (neg.f64 (.f64 (-.f64 (/.f64 #s(literal 1/6 binary64) (sin.f64 kx)) (.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))) ky))
#s(approx (/ (sin ky) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) (.f64 (+.f64 (.f64 (-.f64 (-.f64 (.f64 (+.f64 (-.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 kx)) (-.f64 (.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 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)))) (/.f64 #s(literal 1/120 binary64) (sin.f64 kx))) (.f64 ky ky)) (/.f64 #s(literal 1/6 binary64) (sin.f64 kx))) (.f64 (pow.f64 (sin.f64 kx) #s(literal -3 binary64)) #s(literal 1/2 binary64))) (*.f64 ky ky)) (pow.f64 (sin.f64 kx) #s(literal -1 binary64))) ky))
#s(approx (/ (sin ky) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/120 binary64) (sin.f64 kx)) (.f64 (pow.f64 (sin.f64 kx) #s(literal -3 binary64)) #s(literal 1/12 binary64))) (+.f64 (.f64 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 kx)) (+.f64 (+.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal -8 binary64)) (.f64 (pow.f64 (sin.f64 kx) #s(literal -6 binary64)) #s(literal 2/3 binary64))) (.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 2/45 binary64))) (.f64 (/.f64 (-.f64 (.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 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))) #s(literal -1/2 binary64)))) (-.f64 (.f64 (.f64 #s(literal -1/12 binary64) (sin.f64 kx)) (-.f64 (.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64)) (.f64 #s(literal -3/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -6 binary64))))) (-.f64 (/.f64 #s(literal 1/5040 binary64) (sin.f64 kx)) (.f64 #s(literal -1/240 binary64) (pow.f64 (sin.f64 kx) #s(literal -3 binary64)))))) (.f64 ky ky)) (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 kx)) (-.f64 (.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64)) (.f64 #s(literal -3/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -6 binary64))))))) (.f64 ky ky)) (-.f64 (/.f64 #s(literal 1/6 binary64) (sin.f64 kx)) (.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))) ky))
#s(approx (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin ky)) (/.f64 ky (sin.f64 kx)))
#s(approx (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin ky)) (.f64 (+.f64 (neg.f64 (.f64 (-.f64 (/.f64 #s(literal 1/6 binary64) (sin.f64 kx)) (.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))) ky))
#s(approx (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin ky)) (.f64 (+.f64 (.f64 (-.f64 (-.f64 (.f64 (+.f64 (-.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 kx)) (-.f64 (.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 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)))) (/.f64 #s(literal 1/120 binary64) (sin.f64 kx))) (.f64 ky ky)) (/.f64 #s(literal 1/6 binary64) (sin.f64 kx))) (.f64 (pow.f64 (sin.f64 kx) #s(literal -3 binary64)) #s(literal 1/2 binary64))) (*.f64 ky ky)) (pow.f64 (sin.f64 kx) #s(literal -1 binary64))) ky))
#s(approx (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin ky)) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/120 binary64) (sin.f64 kx)) (.f64 (pow.f64 (sin.f64 kx) #s(literal -3 binary64)) #s(literal 1/12 binary64))) (+.f64 (.f64 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 kx)) (+.f64 (+.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal -8 binary64)) (.f64 (pow.f64 (sin.f64 kx) #s(literal -6 binary64)) #s(literal 2/3 binary64))) (.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 2/45 binary64))) (.f64 (/.f64 (-.f64 (.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 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))) #s(literal -1/2 binary64)))) (-.f64 (.f64 (.f64 #s(literal -1/12 binary64) (sin.f64 kx)) (-.f64 (.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64)) (.f64 #s(literal -3/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -6 binary64))))) (-.f64 (/.f64 #s(literal 1/5040 binary64) (sin.f64 kx)) (.f64 #s(literal -1/240 binary64) (pow.f64 (sin.f64 kx) #s(literal -3 binary64)))))) (.f64 ky ky)) (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 kx)) (-.f64 (.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64)) (.f64 #s(literal -3/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -6 binary64))))))) (.f64 ky ky)) (-.f64 (/.f64 #s(literal 1/6 binary64) (sin.f64 kx)) (.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))) ky))
#s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (pow.f64 (sin.f64 kx) #s(literal -1 binary64)))
#s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (pow.f64 (sin.f64 kx) #s(literal -1 binary64))))
#s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (.f64 (-.f64 (.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64)) (.f64 #s(literal -3/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -6 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 ky) 2) (pow (sin kx) 2)) -1/2) (+.f64 (.f64 (-.f64 (.f64 (-.f64 (.f64 (.f64 (.f64 (.f64 ky ky) (sin.f64 kx)) (+.f64 (+.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal -8 binary64)) (.f64 (pow.f64 (sin.f64 kx) #s(literal -6 binary64)) #s(literal 2/3 binary64))) (.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 2/45 binary64))) (.f64 (/.f64 (-.f64 (.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 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))) #s(literal -1/2 binary64)))) #s(literal -1/2 binary64)) (.f64 #s(literal -1/2 binary64) (.f64 (-.f64 (.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64)) (.f64 #s(literal -3/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -6 binary64)))) (sin.f64 kx)))) (.f64 ky ky)) (.f64 (pow.f64 (sin.f64 kx) #s(literal -3 binary64)) #s(literal 1/2 binary64))) (.f64 ky ky)) (pow.f64 (sin.f64 kx) #s(literal -1 binary64))))
#s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/4) (*.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal -1 binary64))) #s(literal 1 binary64)))
#s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/4) (-.f64 (.f64 #s(literal -1/4 binary64) (.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal -5 binary64))) (.f64 ky ky))) (.f64 #s(literal -1 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal -1 binary64))))))
#s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/4) (+.f64 (.f64 (-.f64 (.f64 #s(literal -1/4 binary64) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal -5 binary64)))) (.f64 #s(literal -1 binary64) (.f64 (.f64 (-.f64 (.f64 (-.f64 (.f64 (.f64 #s(literal 24 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (+.f64 (pow.f64 (sin.f64 kx) #s(literal -6 binary64)) (.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64)))) (.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 12 binary64))) #s(literal 1/96 binary64)) (.f64 #s(literal -1/32 binary64) (pow.f64 (sin.f64 kx) #s(literal -4 binary64)))) (.f64 ky ky)) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal -1 binary64)))))) (.f64 ky ky)) (.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal -1 binary64))) #s(literal 1 binary64))))
#s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/4) (+.f64 (.f64 (+.f64 (.f64 (.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 (.f64 (-.f64 (.f64 (.f64 #s(literal 24 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (+.f64 (pow.f64 (sin.f64 kx) #s(literal -6 binary64)) (.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64)))) (.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 12 binary64))) #s(literal 1/96 binary64)) (.f64 #s(literal -1/32 binary64) (pow.f64 (sin.f64 kx) #s(literal -4 binary64)))) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal -1 binary64)))) (.f64 (.f64 (-.f64 (+.f64 (.f64 (-.f64 (+.f64 (.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal -6 binary64)) (.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64))) #s(literal 720 binary64)) (.f64 (.f64 #s(literal -720 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (+.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal -8 binary64)) (.f64 (pow.f64 (sin.f64 kx) #s(literal -6 binary64)) #s(literal 2/3 binary64))) (.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 2/45 binary64))))) (.f64 (pow.f64 (sin.f64 kx) #s(literal -6 binary64)) #s(literal 240 binary64))) #s(literal 1/2880 binary64)) (.f64 (/.f64 (-.f64 (.f64 (.f64 #s(literal 24 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (+.f64 (pow.f64 (sin.f64 kx) #s(literal -6 binary64)) (.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64)))) (.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 12 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 (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))
#s(approx (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)) (+.f64 (*.f64 ky ky) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))
#s(approx (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)) (+.f64 (.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 (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)) (+.f64 (.f64 (+.f64 (.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 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/3 binary64)) #s(literal 1 binary64)) (.f64 ky ky)))
#s(approx (pow (sin ky) 2) (.f64 (+.f64 (.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 (+.f64 (.f64 (-.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64)) ky) ky) #s(literal 1/3 binary64)) (.f64 ky ky)) #s(literal 1 binary64)) (.f64 ky ky)))
#s(approx (sin ky) ky)
#s(approx (sin ky) (.f64 (+.f64 (.f64 (*.f64 ky ky) #s(literal -1/6 binary64)) #s(literal 1 binary64)) ky))
#s(approx (sin ky) (.f64 (+.f64 (.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 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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 ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (sin ky)) (/.f64 (*.f64 (sin.f64 th) ky) (sin.f64 kx)))
#s(approx (* (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (sin ky)) (.f64 (+.f64 (.f64 (+.f64 (/.f64 (.f64 #s(literal -1/6 binary64) (sin.f64 th)) (sin.f64 kx)) (/.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 (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (sin ky)) (.f64 (+.f64 (.f64 (+.f64 (+.f64 (/.f64 (.f64 #s(literal -1/6 binary64) (sin.f64 th)) (sin.f64 kx)) (/.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))) (.f64 (+.f64 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 kx)) (.f64 (-.f64 (.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64)) (.f64 #s(literal -3/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -6 binary64)))) (sin.f64 th))) (/.f64 (.f64 #s(literal 1/12 binary64) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal 1/120 binary64) (sin.f64 th)) (sin.f64 kx))) (.f64 ky ky))) (.f64 ky ky)) (/.f64 (sin.f64 th) (sin.f64 kx))) ky))
#s(approx (* (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (sin ky)) (.f64 (+.f64 (.f64 (+.f64 (+.f64 (/.f64 (.f64 #s(literal -1/6 binary64) (sin.f64 th)) (sin.f64 kx)) (/.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))) (.f64 (+.f64 (+.f64 (/.f64 (.f64 #s(literal 1/120 binary64) (sin.f64 th)) (sin.f64 kx)) (/.f64 (.f64 #s(literal 1/12 binary64) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))) (+.f64 (.f64 (+.f64 (+.f64 (+.f64 (/.f64 (.f64 #s(literal -1/5040 binary64) (sin.f64 th)) (sin.f64 kx)) (/.f64 (.f64 #s(literal -1/240 binary64) (sin.f64 th)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))) (.f64 (.f64 #s(literal -1/12 binary64) (sin.f64 kx)) (.f64 (-.f64 (.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64)) (.f64 #s(literal -3/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -6 binary64)))) (sin.f64 th)))) (.f64 (.f64 (.f64 (sin.f64 kx) (sin.f64 th)) (+.f64 (+.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal -8 binary64)) (.f64 (pow.f64 (sin.f64 kx) #s(literal -6 binary64)) #s(literal 2/3 binary64))) (.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 2/45 binary64))) (.f64 (/.f64 (-.f64 (.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 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))) #s(literal -1/2 binary64)))) #s(literal -1/2 binary64))) (.f64 ky ky)) (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 kx)) (.f64 (-.f64 (.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64)) (.f64 #s(literal -3/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -6 binary64)))) (sin.f64 th))))) (.f64 ky ky))) (*.f64 ky ky)) (/.f64 (sin.f64 th) (sin.f64 kx))) ky))
#s(approx (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (/.f64 (sin.f64 th) (sin.f64 kx)))
#s(approx (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (+.f64 (.f64 (.f64 (*.f64 ky ky) (/.f64 (sin.f64 th) (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))) #s(literal -1/2 binary64)) (/.f64 (sin.f64 th) (sin.f64 kx))))
#s(approx (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (+.f64 (.f64 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 ky ky)) (.f64 (.f64 (-.f64 (.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64)) (.f64 #s(literal -3/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -6 binary64)))) (sin.f64 th)) (sin.f64 kx))) (/.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))))
#s(approx (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (+.f64 (.f64 (+.f64 (.f64 (-.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (.f64 (.f64 (sin.f64 kx) (sin.f64 th)) (+.f64 (+.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal -8 binary64)) (.f64 (pow.f64 (sin.f64 kx) #s(literal -6 binary64)) #s(literal 2/3 binary64))) (.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 2/45 binary64))) (.f64 (/.f64 (-.f64 (.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 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))) #s(literal -1/2 binary64))))) (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (-.f64 (.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64)) (.f64 #s(literal -3/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -6 binary64)))) (sin.f64 th)) (sin.f64 kx)))) (.f64 ky ky)) (/.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))))
#s(approx (* (/ (sin ky) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) (sin th)) (.f64 (sqrt.f64 (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(literal -1 binary64))) (.f64 (sin.f64 th) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) (sin th)) (.f64 (+.f64 (.f64 (+.f64 (.f64 (.f64 #s(literal -1/6 binary64) (sin.f64 th)) (sqrt.f64 (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(literal -1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) (sqrt.f64 (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(literal -3 binary64))))) (.f64 ky ky)) (.f64 (sqrt.f64 (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(literal -1 binary64))) (sin.f64 th))) ky))
#s(approx (* (/ (sin ky) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) (sin th)) (.f64 (+.f64 (.f64 (+.f64 (+.f64 (.f64 (.f64 #s(literal -1/6 binary64) (sin.f64 th)) (sqrt.f64 (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(literal -1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) (sqrt.f64 (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(literal -3 binary64))))) (.f64 (+.f64 (+.f64 (.f64 (.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 (-.f64 (.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64)) (.f64 #s(literal -3/4 binary64) (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(literal -3 binary64)))) (sin.f64 th))) #s(literal 1/2 binary64)) (.f64 (.f64 #s(literal 1/12 binary64) (sin.f64 th)) (sqrt.f64 (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(literal -3 binary64))))) (.f64 (.f64 #s(literal 1/120 binary64) (sin.f64 th)) (sqrt.f64 (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(literal -1 binary64))))) (.f64 ky ky))) (.f64 ky ky)) (*.f64 (sqrt.f64 (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(literal -1 binary64))) (sin.f64 th))) ky))
#s(approx (* (/ (sin ky) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) (sin th)) (.f64 (+.f64 (.f64 (+.f64 (+.f64 (.f64 (.f64 #s(literal -1/6 binary64) (sin.f64 th)) (sqrt.f64 (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(literal -1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 th)) (sqrt.f64 (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(literal -3 binary64))))) (.f64 (+.f64 (+.f64 (.f64 (.f64 #s(literal 1/120 binary64) (sin.f64 th)) (sqrt.f64 (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(literal -1 binary64)))) (.f64 (.f64 #s(literal 1/12 binary64) (sin.f64 th)) (sqrt.f64 (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(literal -3 binary64))))) (+.f64 (.f64 (+.f64 (+.f64 (+.f64 (.f64 (.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 (-.f64 (.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64)) (.f64 #s(literal -3/4 binary64) (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(literal -3 binary64)))) (sin.f64 th))) #s(literal -1/12 binary64)) (.f64 (.f64 #s(literal -1/240 binary64) (sin.f64 th)) (sqrt.f64 (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(literal -3 binary64))))) (.f64 (.f64 #s(literal -1/5040 binary64) (sin.f64 th)) (sqrt.f64 (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(literal -1 binary64))))) (.f64 (.f64 (sin.f64 th) (.f64 (+.f64 (+.f64 (+.f64 (.f64 (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(literal -3 binary64)) #s(literal 2/3 binary64)) (pow.f64 (sin.f64 kx) #s(literal -8 binary64))) (.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 2/45 binary64))) (.f64 (/.f64 (-.f64 (.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64)) (.f64 #s(literal -3/4 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 -1/2 binary64))) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) #s(literal -1/2 binary64))) (.f64 ky ky)) (.f64 (.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (.f64 (-.f64 (.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64)) (.f64 #s(literal -3/4 binary64) (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(literal -3 binary64)))) (sin.f64 th))) #s(literal 1/2 binary64)))) (.f64 ky ky))) (.f64 ky ky)) (.f64 (sqrt.f64 (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(literal -1 binary64))) (sin.f64 th))) ky))
#s(approx (/ (sin ky) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) (*.f64 (sqrt.f64 (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(literal -1 binary64))) ky))
#s(approx (/ (sin ky) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) (.f64 (+.f64 (.f64 (+.f64 (.f64 (sqrt.f64 (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(literal -1 binary64))) #s(literal -1/6 binary64)) (.f64 (sqrt.f64 (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(literal -3 binary64))) #s(literal -1/2 binary64))) (*.f64 ky ky)) (sqrt.f64 (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(literal -1 binary64)))) ky))
#s(approx (/ (sin ky) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) (.f64 (+.f64 (.f64 (+.f64 (+.f64 (.f64 (+.f64 (+.f64 (.f64 (sqrt.f64 (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(literal -1 binary64))) #s(literal 1/120 binary64)) (.f64 (sqrt.f64 (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(literal -3 binary64))) #s(literal 1/12 binary64))) (.f64 (.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (-.f64 (.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64)) (.f64 #s(literal -3/4 binary64) (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(literal -3 binary64))))) #s(literal 1/2 binary64))) (.f64 ky ky)) (.f64 (sqrt.f64 (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(literal -1 binary64))) #s(literal -1/6 binary64))) (.f64 (sqrt.f64 (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(literal -3 binary64))) #s(literal -1/2 binary64))) (*.f64 ky ky)) (sqrt.f64 (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(literal -1 binary64)))) ky))
#s(approx (/ (sin ky) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) (.f64 (+.f64 (.f64 (+.f64 (+.f64 (.f64 (sqrt.f64 (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(literal -1 binary64))) #s(literal -1/6 binary64)) (.f64 (sqrt.f64 (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(literal -3 binary64))) #s(literal -1/2 binary64))) (.f64 (+.f64 (+.f64 (.f64 (sqrt.f64 (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(literal -1 binary64))) #s(literal 1/120 binary64)) (.f64 (sqrt.f64 (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(literal -3 binary64))) #s(literal 1/12 binary64))) (+.f64 (.f64 (+.f64 (+.f64 (+.f64 (.f64 (sqrt.f64 (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(literal -1 binary64))) #s(literal -1/5040 binary64)) (.f64 (sqrt.f64 (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(literal -3 binary64))) #s(literal -1/240 binary64))) (.f64 (.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (-.f64 (.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64)) (.f64 #s(literal -3/4 binary64) (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(literal -3 binary64))))) #s(literal -1/12 binary64))) (.f64 (.f64 (+.f64 (+.f64 (+.f64 (.f64 (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(literal -3 binary64)) #s(literal 2/3 binary64)) (pow.f64 (sin.f64 kx) #s(literal -8 binary64))) (.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 2/45 binary64))) (.f64 (/.f64 (-.f64 (.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64)) (.f64 #s(literal -3/4 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 -1/2 binary64))) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))) #s(literal -1/2 binary64))) (.f64 ky ky)) (.f64 (.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (-.f64 (.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64)) (.f64 #s(literal -3/4 binary64) (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(literal -3 binary64))))) #s(literal 1/2 binary64)))) (.f64 ky ky))) (.f64 ky ky)) (sqrt.f64 (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(literal -1 binary64)))) ky))
#s(approx (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2))) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))
#s(approx (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2))) (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (*.f64 ky ky)) (sqrt.f64 (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(literal -1 binary64)))) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
#s(approx (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2))) (+.f64 (.f64 (-.f64 (.f64 (.f64 (.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 1/3 binary64)) (.f64 ky ky)) (sqrt.f64 (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(literal -1 binary64)))) #s(literal -1/2 binary64)) (.f64 #s(literal -1/2 binary64) (sqrt.f64 (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(literal -1 binary64))))) (*.f64 ky ky)) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
#s(approx (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2))) (+.f64 (.f64 (+.f64 (.f64 (-.f64 (.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 1/3 binary64))) (sqrt.f64 (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(literal -1 binary64)))) (.f64 #s(literal -1/2 binary64) (.f64 (.f64 ky ky) (.f64 (-.f64 #s(literal 2/45 binary64) (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal 1/3 binary64))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(literal -1 binary64))))))) (.f64 ky ky)) (.f64 (sqrt.f64 (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(literal -1 binary64))) #s(literal 1/2 binary64))) (.f64 ky ky)) (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
#s(approx (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))
#s(approx (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)) (-.f64 (+.f64 (.f64 ky ky) #s(literal 1/2 binary64)) (.f64 (cos.f64 (*.f64 #s(literal 2 binary64) kx)) #s(literal 1/2 binary64))))
#s(approx (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)) (-.f64 (+.f64 (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/3 binary64)) #s(literal 1 binary64)) (.f64 ky ky)) #s(literal 1/2 binary64)) (.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1/2 binary64))))
#s(approx (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)) (-.f64 (+.f64 (.f64 (+.f64 (.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(literal 1/2 binary64)) (.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1/2 binary64))))
#s(approx (* (+ (* (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* ky ky)) 1) (* ky ky)) (*.f64 ky ky))
#s(approx (* (+ (* (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* ky ky)) 1) (* ky ky)) (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/3 binary64)) #s(literal 1 binary64)) (.f64 ky ky)))
#s(approx (* (+ (* (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* ky ky)) 1) (* ky ky)) (.f64 (+.f64 (.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 (* (+ (* (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* ky ky)) 1) (* ky ky)) (.f64 (+.f64 (.f64 (-.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64)) ky) ky) #s(literal 1/3 binary64)) (.f64 ky ky)) #s(literal 1 binary64)) (.f64 ky ky)))
#s(approx (+ (* (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* ky ky)) 1) #s(literal 1 binary64))
#s(approx (+ (* (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* ky ky)) 1) (+.f64 (.f64 (.f64 ky ky) #s(literal -1/3 binary64)) #s(literal 1 binary64)))
#s(approx (+ (* (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* ky ky)) 1) (+.f64 (.f64 (-.f64 (.f64 (.f64 ky ky) #s(literal 2/45 binary64)) #s(literal 1/3 binary64)) (.f64 ky ky)) #s(literal 1 binary64)))
#s(approx (+ (* (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* ky ky)) 1) (+.f64 (.f64 (-.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64)) ky) ky) #s(literal 1/3 binary64)) (.f64 ky ky)) #s(literal 1 binary64)))
#s(approx (* (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* ky ky)) (.f64 (.f64 ky ky) #s(literal -1/3 binary64)))
#s(approx (* (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* ky ky)) (.f64 (-.f64 (.f64 (.f64 ky ky) #s(literal 2/45 binary64)) #s(literal 1/3 binary64)) (.f64 ky ky)))
#s(approx (* (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* ky ky)) (.f64 (-.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64)) ky) ky) #s(literal 1/3 binary64)) (.f64 ky ky)))
#s(approx (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) #s(literal -1/3 binary64))
#s(approx (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (-.f64 (.f64 (.f64 ky ky) #s(literal 2/45 binary64)) #s(literal 1/3 binary64)))
#s(approx (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (-.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64)) ky) ky) #s(literal 1/3 binary64)))
#s(approx (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) (.f64 (.f64 ky ky) #s(literal 2/45 binary64)))
#s(approx (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) (.f64 (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64)) ky) ky))
#s(approx (+ (* (* ky ky) -1/315) 2/45) #s(literal 2/45 binary64))
#s(approx (+ (* (* ky ky) -1/315) 2/45) (+.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64)))
#s(approx (* (* ky ky) -1/315) (.f64 (.f64 ky ky) #s(literal -1/315 binary64)))
#s(approx (* ky ky) (*.f64 ky ky))
#s(approx (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin ky)) (/.f64 ky (sin.f64 kx)))
#s(approx (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin ky)) (.f64 (+.f64 (neg.f64 (.f64 (-.f64 (/.f64 #s(literal 1/6 binary64) (sin.f64 kx)) (.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))) ky))
#s(approx (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin ky)) (.f64 (+.f64 (.f64 (-.f64 (-.f64 (.f64 (+.f64 (-.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 kx)) (-.f64 (.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 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)))) (/.f64 #s(literal 1/120 binary64) (sin.f64 kx))) (.f64 ky ky)) (/.f64 #s(literal 1/6 binary64) (sin.f64 kx))) (.f64 (pow.f64 (sin.f64 kx) #s(literal -3 binary64)) #s(literal 1/2 binary64))) (*.f64 ky ky)) (pow.f64 (sin.f64 kx) #s(literal -1 binary64))) ky))
#s(approx (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin ky)) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/120 binary64) (sin.f64 kx)) (.f64 (pow.f64 (sin.f64 kx) #s(literal -3 binary64)) #s(literal 1/12 binary64))) (+.f64 (.f64 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 kx)) (+.f64 (+.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal -8 binary64)) (.f64 (pow.f64 (sin.f64 kx) #s(literal -6 binary64)) #s(literal 2/3 binary64))) (.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 2/45 binary64))) (.f64 (/.f64 (-.f64 (.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 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))) #s(literal -1/2 binary64)))) (-.f64 (.f64 (.f64 #s(literal -1/12 binary64) (sin.f64 kx)) (-.f64 (.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64)) (.f64 #s(literal -3/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -6 binary64))))) (-.f64 (/.f64 #s(literal 1/5040 binary64) (sin.f64 kx)) (.f64 #s(literal -1/240 binary64) (pow.f64 (sin.f64 kx) #s(literal -3 binary64)))))) (.f64 ky ky)) (.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 kx)) (-.f64 (.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64)) (.f64 #s(literal -3/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -6 binary64))))))) (.f64 ky ky)) (-.f64 (/.f64 #s(literal 1/6 binary64) (sin.f64 kx)) (.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))) ky))
#s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (pow.f64 (sin.f64 kx) #s(literal -1 binary64)))
#s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 ky ky)) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (pow.f64 (sin.f64 kx) #s(literal -1 binary64))))
#s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (.f64 (-.f64 (.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64)) (.f64 #s(literal -3/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -6 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 ky) 2) (pow (sin kx) 2)) -1/2) (+.f64 (.f64 (-.f64 (.f64 (-.f64 (.f64 (.f64 (.f64 (.f64 ky ky) (sin.f64 kx)) (+.f64 (+.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal -8 binary64)) (.f64 (pow.f64 (sin.f64 kx) #s(literal -6 binary64)) #s(literal 2/3 binary64))) (.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 2/45 binary64))) (.f64 (/.f64 (-.f64 (.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 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))) #s(literal -1/2 binary64)))) #s(literal -1/2 binary64)) (.f64 #s(literal -1/2 binary64) (.f64 (-.f64 (.f64 (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) #s(literal 1/3 binary64)) (.f64 #s(literal -3/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -6 binary64)))) (sin.f64 kx)))) (.f64 ky ky)) (.f64 (pow.f64 (sin.f64 kx) #s(literal -3 binary64)) #s(literal 1/2 binary64))) (.f64 ky ky)) (pow.f64 (sin.f64 kx) #s(literal -1 binary64))))
#s(approx (pow (pow (sin ky) 2) -1/2) (pow.f64 ky #s(literal -1 binary64)))
#s(approx (pow (pow (sin ky) 2) -1/2) (/.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 ky ky) #s(literal -1/6 binary64))) ky))
#s(approx (pow (pow (sin ky) 2) -1/2) (/.f64 (+.f64 (.f64 (+.f64 (.f64 #s(literal 7/360 binary64) (.f64 ky ky)) #s(literal 1/6 binary64)) (.f64 ky ky)) #s(literal 1 binary64)) ky))
#s(approx (pow (pow (sin ky) 2) -1/2) (/.f64 (+.f64 (.f64 (+.f64 (.f64 (+.f64 (.f64 #s(literal 31/15120 binary64) (.f64 ky ky)) #s(literal 7/360 binary64)) (.f64 ky ky)) #s(literal 1/6 binary64)) (.f64 ky ky)) #s(literal 1 binary64)) ky))
#s(approx (pow (sin ky) 2) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))
#s(approx (sin ky) (sin.f64 ky))
#s(approx (* (+ (* (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* ky ky)) 1) (* ky ky)) (*.f64 (pow.f64 ky #s(literal 8 binary64)) #s(literal -1/315 binary64)))
#s(approx (* (+ (* (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* ky ky)) 1) (* ky ky)) (.f64 (-.f64 (.f64 (pow.f64 ky #s(literal -2 binary64)) #s(literal 2/45 binary64)) #s(literal 1/315 binary64)) (pow.f64 ky #s(literal 8 binary64))))
#s(approx (* (+ (* (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* ky ky)) 1) (* ky ky)) (.f64 (-.f64 (-.f64 (.f64 (pow.f64 ky #s(literal -2 binary64)) #s(literal 2/45 binary64)) #s(literal 1/315 binary64)) (/.f64 #s(literal 1/3 binary64) (pow.f64 ky #s(literal 4 binary64)))) (pow.f64 ky #s(literal 8 binary64))))
#s(approx (* (+ (* (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* ky ky)) 1) (* ky ky)) (.f64 (-.f64 (+.f64 (pow.f64 ky #s(literal -6 binary64)) (.f64 (pow.f64 ky #s(literal -2 binary64)) #s(literal 2/45 binary64))) (+.f64 (/.f64 #s(literal 1/3 binary64) (pow.f64 ky #s(literal 4 binary64))) #s(literal 1/315 binary64))) (pow.f64 ky #s(literal 8 binary64))))
#s(approx (+ (* (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* ky ky)) 1) (*.f64 (pow.f64 ky #s(literal 6 binary64)) #s(literal -1/315 binary64)))
#s(approx (+ (* (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* ky ky)) 1) (.f64 (pow.f64 ky #s(literal 6 binary64)) (-.f64 (.f64 (pow.f64 ky #s(literal -2 binary64)) #s(literal 2/45 binary64)) #s(literal 1/315 binary64))))
#s(approx (+ (* (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* ky ky)) 1) (.f64 (pow.f64 ky #s(literal 6 binary64)) (-.f64 (-.f64 (.f64 (pow.f64 ky #s(literal -2 binary64)) #s(literal 2/45 binary64)) #s(literal 1/315 binary64)) (/.f64 #s(literal 1/3 binary64) (pow.f64 ky #s(literal 4 binary64))))))
#s(approx (+ (* (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* ky ky)) 1) (.f64 (-.f64 (+.f64 (pow.f64 ky #s(literal -6 binary64)) (.f64 (pow.f64 ky #s(literal -2 binary64)) #s(literal 2/45 binary64))) (+.f64 (/.f64 #s(literal 1/3 binary64) (pow.f64 ky #s(literal 4 binary64))) #s(literal 1/315 binary64))) (pow.f64 ky #s(literal 6 binary64))))
#s(approx (* (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* ky ky)) (*.f64 (pow.f64 ky #s(literal 6 binary64)) #s(literal -1/315 binary64)))
#s(approx (* (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* ky ky)) (.f64 (pow.f64 ky #s(literal 6 binary64)) (-.f64 (.f64 (pow.f64 ky #s(literal -2 binary64)) #s(literal 2/45 binary64)) #s(literal 1/315 binary64))))
#s(approx (* (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (* ky ky)) (.f64 (pow.f64 ky #s(literal 6 binary64)) (-.f64 (-.f64 (.f64 (pow.f64 ky #s(literal -2 binary64)) #s(literal 2/45 binary64)) #s(literal 1/315 binary64)) (/.f64 #s(literal 1/3 binary64) (pow.f64 ky #s(literal 4 binary64))))))
#s(approx (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (*.f64 (pow.f64 ky #s(literal 4 binary64)) #s(literal -1/315 binary64)))
#s(approx (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (.f64 (pow.f64 ky #s(literal 4 binary64)) (-.f64 (.f64 (pow.f64 ky #s(literal -2 binary64)) #s(literal 2/45 binary64)) #s(literal 1/315 binary64))))
#s(approx (- (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) 1/3) (.f64 (-.f64 (-.f64 (.f64 (pow.f64 ky #s(literal -2 binary64)) #s(literal 2/45 binary64)) #s(literal 1/315 binary64)) (/.f64 #s(literal 1/3 binary64) (pow.f64 ky #s(literal 4 binary64)))) (pow.f64 ky #s(literal 4 binary64))))
#s(approx (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) (*.f64 (pow.f64 ky #s(literal 4 binary64)) #s(literal -1/315 binary64)))
#s(approx (* (+ (* (* ky ky) -1/315) 2/45) (* ky ky)) (.f64 (pow.f64 ky #s(literal 4 binary64)) (-.f64 (.f64 (pow.f64 ky #s(literal -2 binary64)) #s(literal 2/45 binary64)) #s(literal 1/315 binary64))))
#s(approx (+ (* (* ky ky) -1/315) 2/45) (.f64 (.f64 ky ky) #s(literal -1/315 binary64)))
#s(approx (+ (* (* ky ky) -1/315) 2/45) (.f64 (-.f64 (.f64 (pow.f64 ky #s(literal -2 binary64)) #s(literal 2/45 binary64)) #s(literal 1/315 binary64)) (*.f64 ky ky)))
#s(approx (pow (pow (sin ky) 2) -1/2) (pow.f64 (sin.f64 ky) #s(literal -1 binary64)))
#s(approx (* (/ (sin ky) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) (sin th)) (.f64 (.f64 th (sin.f64 ky)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #s(literal -1 binary64))))
#s(approx (* (/ (sin ky) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) (sin th)) (.f64 (+.f64 (.f64 (.f64 #s(literal -1/6 binary64) (.f64 (.f64 th th) (sin.f64 ky))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #s(literal -1 binary64))) (.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #s(literal -1 binary64)) (sin.f64 ky))) th))
#s(approx (* (/ (sin ky) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) (sin th)) (.f64 (+.f64 (.f64 (+.f64 (.f64 (.f64 #s(literal 1/120 binary64) (.f64 (.f64 th th) (sin.f64 ky))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #s(literal -1 binary64))) (.f64 (.f64 #s(literal -1/6 binary64) (sin.f64 ky)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #s(literal -1 binary64)))) (.f64 th th)) (.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #s(literal -1 binary64)) (sin.f64 ky))) th))
#s(approx (* (/ (sin ky) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) (sin th)) (.f64 (+.f64 (.f64 (+.f64 (.f64 (+.f64 (.f64 (.f64 #s(literal 1/120 binary64) (sin.f64 ky)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #s(literal -1 binary64))) (.f64 (.f64 #s(literal -1/5040 binary64) (.f64 (.f64 th th) (sin.f64 ky))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #s(literal -1 binary64)))) (.f64 th th)) (.f64 (.f64 #s(literal -1/6 binary64) (sin.f64 ky)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #s(literal -1 binary64)))) (.f64 th th)) (.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #s(literal -1 binary64)) (sin.f64 ky))) th))
#s(approx (sin th) th)
#s(approx (sin th) (.f64 (+.f64 (.f64 (*.f64 th th) #s(literal -1/6 binary64)) #s(literal 1 binary64)) th))
#s(approx (sin th) (.f64 (+.f64 (.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 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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 (* (+ (* (* th th) -1/6) 1) th) th)
#s(approx (* (+ (* (* th th) -1/6) 1) th) (.f64 (+.f64 (.f64 (*.f64 th th) #s(literal -1/6 binary64)) #s(literal 1 binary64)) th))
#s(approx (+ (* (* th th) -1/6) 1) #s(literal 1 binary64))
#s(approx (+ (* (* th th) -1/6) 1) (+.f64 (.f64 (.f64 th th) #s(literal -1/6 binary64)) #s(literal 1 binary64)))
#s(approx (* (* th th) -1/6) (.f64 (.f64 th th) #s(literal -1/6 binary64)))
#s(approx (* th th) (*.f64 th th))
#s(approx (* (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (sin ky)) (.f64 (.f64 th (sin.f64 ky)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #s(literal -1 binary64))))
#s(approx (* (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (sin ky)) (.f64 (+.f64 (.f64 (.f64 #s(literal -1/6 binary64) (.f64 (.f64 th th) (sin.f64 ky))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #s(literal -1 binary64))) (.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #s(literal -1 binary64)) (sin.f64 ky))) th))
#s(approx (* (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (sin ky)) (.f64 (+.f64 (.f64 (+.f64 (.f64 (.f64 #s(literal 1/120 binary64) (.f64 (.f64 th th) (sin.f64 ky))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #s(literal -1 binary64))) (.f64 (.f64 #s(literal -1/6 binary64) (sin.f64 ky)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #s(literal -1 binary64)))) (.f64 th th)) (.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #s(literal -1 binary64)) (sin.f64 ky))) th))
#s(approx (* (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (sin ky)) (.f64 (+.f64 (.f64 (+.f64 (.f64 (+.f64 (.f64 (.f64 #s(literal 1/120 binary64) (sin.f64 ky)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #s(literal -1 binary64))) (.f64 (.f64 #s(literal -1/5040 binary64) (.f64 (.f64 th th) (sin.f64 ky))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #s(literal -1 binary64)))) (.f64 th th)) (.f64 (.f64 #s(literal -1/6 binary64) (sin.f64 ky)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #s(literal -1 binary64)))) (.f64 th th)) (.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #s(literal -1 binary64)) (sin.f64 ky))) th))
#s(approx (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (*.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #s(literal -1 binary64)) th))
#s(approx (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (.f64 (+.f64 (.f64 (.f64 (.f64 th th) #s(literal -1/6 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #s(literal -1 binary64))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #s(literal -1 binary64))) th))
#s(approx (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (.f64 (+.f64 (.f64 (+.f64 (.f64 (.f64 (.f64 th th) #s(literal 1/120 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #s(literal -1 binary64))) (.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #s(literal -1 binary64)) #s(literal -1/6 binary64))) (*.f64 th th)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #s(literal -1 binary64))) th))
#s(approx (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (.f64 (+.f64 (.f64 (+.f64 (.f64 (-.f64 (.f64 (.f64 (.f64 th th) #s(literal -1/5040 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #s(literal -1 binary64))) (.f64 #s(literal -1/120 binary64) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #s(literal -1 binary64)))) (.f64 th th)) (.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #s(literal -1 binary64)) #s(literal -1/6 binary64))) (.f64 th th)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #s(literal -1 binary64))) th))
#s(approx (/ (sin th) (sin kx)) (/.f64 th (sin.f64 kx)))
#s(approx (/ (sin th) (sin kx)) (.f64 (+.f64 (/.f64 (.f64 (*.f64 th th) #s(literal -1/6 binary64)) (sin.f64 kx)) (pow.f64 (sin.f64 kx) #s(literal -1 binary64))) th))
#s(approx (/ (sin th) (sin kx)) (.f64 (+.f64 (.f64 (-.f64 (/.f64 (.f64 (.f64 th th) #s(literal 1/120 binary64)) (sin.f64 kx)) (/.f64 #s(literal 1/6 binary64) (sin.f64 kx))) (*.f64 th th)) (pow.f64 (sin.f64 kx) #s(literal -1 binary64))) th))
#s(approx (/ (sin th) (sin kx)) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (/.f64 (.f64 (.f64 th th) #s(literal -1/5040 binary64)) (sin.f64 kx)) (/.f64 #s(literal 1/120 binary64) (sin.f64 kx))) (.f64 th th)) (/.f64 #s(literal 1/6 binary64) (sin.f64 kx))) (*.f64 th th)) (pow.f64 (sin.f64 kx) #s(literal -1 binary64))) th))
#s(approx (* (/ (sin ky) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) (sin th)) (.f64 (.f64 th (sin.f64 ky)) (pow.f64 (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1/2 binary64)))) #s(literal -1 binary64))))
#s(approx (* (/ (sin ky) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) (sin th)) (.f64 (+.f64 (.f64 (.f64 #s(literal -1/6 binary64) (.f64 (.f64 th th) (sin.f64 ky))) (pow.f64 (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1/2 binary64)))) #s(literal -1 binary64))) (.f64 (pow.f64 (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1/2 binary64)))) #s(literal -1 binary64)) (sin.f64 ky))) th))
#s(approx (* (/ (sin ky) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) (sin th)) (.f64 (+.f64 (.f64 (+.f64 (.f64 (.f64 #s(literal 1/120 binary64) (.f64 (.f64 th th) (sin.f64 ky))) (pow.f64 (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1/2 binary64)))) #s(literal -1 binary64))) (.f64 (.f64 #s(literal -1/6 binary64) (sin.f64 ky)) (pow.f64 (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))) (.f64 th th)) (.f64 (pow.f64 (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1/2 binary64)))) #s(literal -1 binary64)) (sin.f64 ky))) th))
#s(approx (* (/ (sin ky) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) (sin th)) (.f64 (+.f64 (.f64 (+.f64 (.f64 (+.f64 (.f64 (.f64 #s(literal 1/120 binary64) (sin.f64 ky)) (pow.f64 (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1/2 binary64)))) #s(literal -1 binary64))) (.f64 (.f64 #s(literal -1/5040 binary64) (.f64 (.f64 th th) (sin.f64 ky))) (pow.f64 (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))) (.f64 th th)) (.f64 (.f64 #s(literal -1/6 binary64) (sin.f64 ky)) (pow.f64 (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))) (.f64 th th)) (.f64 (pow.f64 (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1/2 binary64)))) #s(literal -1 binary64)) (sin.f64 ky))) th))
#s(approx (sin th) (sin.f64 th))
#s(approx (* (+ (* (* th th) -1/6) 1) th) (*.f64 (pow.f64 th #s(literal 3 binary64)) #s(literal -1/6 binary64)))
#s(approx (* (+ (* (* th th) -1/6) 1) th) (*.f64 (-.f64 (pow.f64 th #s(literal -2 binary64)) #s(literal 1/6 binary64)) (pow.f64 th #s(literal 3 binary64))))
#s(approx (+ (* (* th th) -1/6) 1) (.f64 (.f64 th th) #s(literal -1/6 binary64)))
#s(approx (+ (* (* th th) -1/6) 1) (.f64 (-.f64 (pow.f64 th #s(literal -2 binary64)) #s(literal 1/6 binary64)) (.f64 th th)))
#s(approx (* (+ (* (* th th) -1/6) 1) th) (neg.f64 (*.f64 (-.f64 #s(literal 1/6 binary64) (pow.f64 th #s(literal -2 binary64))) (pow.f64 th #s(literal 3 binary64)))))

eval71.0ms (1%)

Memory: 8.3MiB live, 151.8MiB allocated; 15ms collecting garbage
Compiler: Compiled 26 018 to 3 184 computations (87.8% saved)

prune80.0ms (1.1%)

Memory

-9.2MiB live, 183.0MiB allocated; 10ms collecting garbage

Pruning

68 alts after pruning (63 fresh and 5 done)

	Pruned	Kept	Total
New	486	22	508
Fresh	7	41	48
Picked	3	2	5
Done	1	3	4
Total	497	68	565

Accuracy

99.9%

Counts

565 → 68

Alt Table

Click to see full alt table

Status	Accuracy	Program
	43.4%	(/.f64 (*.f64 (sin.f64 ky) #s(approx (sin th) th)) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
	19.3%	(*.f64 (/.f64 (sin.f64 ky) (/.f64 (sqrt.f64 (-.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 binary64)))) (sqrt.f64 (-.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))) #s(approx (sin th) th))
	31.7%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64)) ky) ky) #s(literal 1/3 binary64)) (.f64 ky ky)) #s(literal 1 binary64)) (.f64 ky ky))) #s(literal 3 binary64))) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (-.f64 (.f64 #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64)) ky) ky) #s(literal 1/3 binary64)) (.f64 ky ky)) #s(literal 1 binary64)) (.f64 ky ky))) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64)) ky) ky) #s(literal 1/3 binary64)) (.f64 ky ky)) #s(literal 1 binary64)) (.f64 ky ky)))) (.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64)) ky) ky) #s(literal 1/3 binary64)) (.f64 ky ky)) #s(literal 1 binary64)) (*.f64 ky ky))))))))) (sin.f64 th))
	24.2%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) #s(approx (sin th) th))
	85.3%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
	40.6%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(approx (sin th) th))
	17.0%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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 th) th))
	42.0%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 (+.f64 (.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))))) (sin.f64 th))
	52.7%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
	29.6%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(approx (sin th) th))
	27.7%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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)))))) (sin.f64 th))
✓	39.9%	(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
	18.1%	(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(approx (sin th) th))
	41.9%	(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 th))
	30.3%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (sin.f64 th))
	13.6%	(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (sin.f64 th))
	34.2%	(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sin.f64 kx))) (sin.f64 th))
	20.3%	(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sin.f64 kx))) #s(approx (sin th) th))
	42.2%	(.f64 (/.f64 (exp.f64 (.f64 (log.f64 (sin.f64 ky)) #s(literal 1 binary64))) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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)))))) (sin.f64 th))
	36.5%	(.f64 (/.f64 #s(approx (sin ky) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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)))))) (sin.f64 th))
	44.3%	(.f64 (/.f64 #s(approx (sin ky) ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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)))))) (sin.f64 th))
	35.9%	(.f64 (/.f64 #s(approx (sin ky) ky) (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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)))))) (sin.f64 th))
	31.4%	(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (sin.f64 kx))) (sin.f64 th))
	17.7%	(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 1 binary64))) (sin.f64 th))
	27.3%	(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (.f64 ky ky))) #s(literal 1 binary64))) (sin.f64 th))
	15.5%	(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 #s(approx (/ ( -1/2 (* kx kx)) (pow (sin ky) 2)) (/.f64 (+.f64 (.f64 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (+.f64 (-.f64 (.f64 #s(literal 2/135 binary64) (.f64 kx kx)) (.f64 #s(literal -1/3 binary64) (.f64 (.f64 kx kx) #s(literal -1/15 binary64)))) (.f64 #s(literal -1/315 binary64) (.f64 kx kx))) (.f64 ky ky)) (.f64 (.f64 kx kx) #s(literal -1/15 binary64)))) (.f64 ky ky)) (.f64 #s(literal -1/6 binary64) (.f64 kx kx))) (.f64 ky ky)) (.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (*.f64 ky ky))) #s(literal 1 binary64))) (sin.f64 th))
	41.9%	(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 (pow.f64 (pow.f64 #s(approx (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/4 binary64)) #s(literal 2 binary64)) (sin.f64 ky))) (sin.f64 th))
	45.4%	(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (sin.f64 ky))) #s(approx (sin th) th))
	85.2%	(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal -1/2 binary64)) (sin.f64 ky))) (sin.f64 th))
	48.6%	(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) #s(approx (pow (sin kx) 2) (.f64 (+.f64 (.f64 #s(literal -1/3 binary64) (.f64 kx kx)) #s(literal 1 binary64)) (.f64 kx kx)))) #s(literal -1/2 binary64)) (sin.f64 ky))) (sin.f64 th))
	32.9%	(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 (pow.f64 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/4) (*.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal -1 binary64))) #s(literal 1 binary64))) #s(literal 2 binary64)) (sin.f64 ky))) (sin.f64 th))
	28.0%	(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 (pow.f64 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/4) (*.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal -1 binary64))) #s(literal 1 binary64))) #s(literal 2 binary64)) (sin.f64 ky))) (sin.f64 th))
✓	39.8%	(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (pow.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) #s(literal -1/2 binary64))) (sin.f64 ky))) (sin.f64 th))
	18.1%	(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (pow.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) #s(literal -1/2 binary64))) (sin.f64 ky))) #s(approx (sin th) th))
	30.3%	(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (pow.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) #s(literal -1/2 binary64))) (sin.f64 ky))) (sin.f64 th))
	34.1%	(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (pow.f64 (sin.f64 kx) #s(literal -1 binary64))) (sin.f64 ky))) (sin.f64 th))
	16.9%	(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (pow.f64 #s(approx (sin ky) ky) #s(literal -1 binary64))) (sin.f64 ky))) (sin.f64 th))
	33.7%	(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) (sin.f64 ky))) (sin.f64 th))
	32.3%	(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (exp.f64 (*.f64 (log.f64 (sin.f64 ky)) #s(literal -1 binary64)))) (sin.f64 ky))) (sin.f64 th))
	16.5%	(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) #s(approx (pow (pow (sin ky) 2) -1/2) (/.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 ky ky) #s(literal -1/6 binary64))) ky))) (sin.f64 ky))) (sin.f64 th))
	18.6%	(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(approx (+ (/ ( -1/2 (* kx kx)) (pow (sin ky) 2)) 1) (/.f64 (+.f64 (.f64 (.f64 ky ky) (+.f64 (.f64 #s(literal -1/6 binary64) (.f64 kx kx)) #s(literal 1 binary64))) (.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (*.f64 ky ky)))) (sin.f64 th))
	2.6%	(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(approx (+ (/ ( -1/2 (* kx kx)) (pow (sin ky) 2)) 1) (/.f64 (.f64 (.f64 kx kx) #s(literal -1/2 binary64)) (*.f64 ky ky)))) (sin.f64 th))
	36.5%	(.f64 #s(approx (/ (sin ky) (sqrt (+ (- 1/2 ( 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) (*.f64 (sqrt.f64 (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(literal -1 binary64))) ky)) (sin.f64 th))
	29.2%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (sin.f64 kx)))
	84.4%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal -1/2 binary64)) (.f64 (sin.f64 th) (sin.f64 ky))))
	40.8%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (pow.f64 #s(approx (+ (pow (sin ky) 2) (pow (sin kx) 2)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (.f64 (sin.f64 th) (sin.f64 ky))))
	85.1%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal -1/2 binary64)) (sin.f64 th)) (sin.f64 ky)))
	39.7%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (.f64 (pow.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (sin.f64 th)) (sin.f64 ky)))
	41.9%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (.f64 (pow.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (sin.f64 th)) (sin.f64 ky)))
	34.1%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (.f64 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (pow.f64 (sin.f64 kx) #s(literal -1 binary64))) (sin.f64 th)) (sin.f64 ky)))
	40.9%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (pow.f64 (sin.f64 ky) #s(literal -1 binary64))) (.f64 (sin.f64 th) (sin.f64 ky))))
	31.9%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (pow.f64 (sin.f64 kx) #s(literal -1 binary64))) (.f64 (sin.f64 th) (sin.f64 ky))))
	33.7%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx ( (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (/.f64 (sin.f64 th) (sin.f64 ky))) (sin.f64 ky)))
✓	34.2%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx ( (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (/.f64 (sin.f64 th) (sin.f64 kx))) (sin.f64 ky)))
	31.5%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx ( (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (/.f64 (sin.f64 th) (sin.f64 kx))) #s(approx (sin ky) ky)))
	25.3%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx ( (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (/.f64 (sin.f64 th) #s(approx (sin kx) kx))) (sin.f64 ky)))
	20.2%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx ( (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (/.f64 #s(approx (sin th) th) (sin.f64 kx))) (sin.f64 ky)))
	45.4%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx ( (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (*.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64)) th)) (sin.f64 ky)))
	20.3%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx ( (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) #s(approx (/ (sin th) (sin kx)) (/.f64 (+.f64 (.f64 (.f64 #s(literal 1/6 binary64) (*.f64 kx kx)) (sin.f64 th)) (sin.f64 th)) kx))) (sin.f64 ky)))
✓	33.7%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th))
	14.1%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (.f64 (/.f64 (-.f64 (.f64 (.f64 (.f64 th th) #s(literal -1/6 binary64)) (.f64 (.f64 th th) #s(literal -1/6 binary64))) #s(literal 1 binary64)) (-.f64 (.f64 (.f64 th th) #s(literal -1/6 binary64)) #s(literal 1 binary64))) th)))
	14.6%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (.f64 (+.f64 (.f64 th (*.f64 th #s(literal -1/6 binary64))) #s(literal 1 binary64)) th)))
	8.4%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (.f64 #s(approx (+ ( (* th th) -1/6) 1) (.f64 (-.f64 (pow.f64 th #s(literal -2 binary64)) #s(literal 1/6 binary64)) (.f64 th th))) th)))
	12.5%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (.f64 #s(approx (+ ( (* th th) -1/6) 1) (.f64 (.f64 th th) #s(literal -1/6 binary64))) th)))
	7.5%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) #s(approx (* (+ (* (* th th) -1/6) 1) th) (*.f64 (-.f64 (pow.f64 th #s(literal -2 binary64)) #s(literal 1/6 binary64)) (pow.f64 th #s(literal 3 binary64))))))
✓	15.5%	#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) th))
	37.1%	#s(approx (* (/ (sin ky) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) (sin th)) (.f64 (.f64 th (sin.f64 ky)) (pow.f64 (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1/2 binary64)))) #s(literal -1 binary64))))
	35.7%	#s(approx (* (/ (sin ky) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) (sin th)) (.f64 (sqrt.f64 (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(literal -1 binary64))) (.f64 (sin.f64 th) ky)))

Compiler

Compiled 6 084 to 2 196 computations (63.9% saved)

regimes916.0ms (12.5%)

Memory

-103.5MiB live, 487.3MiB allocated; 1.2s collecting garbage

Counts

98 → 2

Calls

Call 1

Inputs
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (.f64 #s(approx (+ ( (* th th) -1/6) 1) (.f64 (.f64 th th) #s(literal -1/6 binary64))) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (.f64 (+.f64 (.f64 th (*.f64 th #s(literal -1/6 binary64))) #s(literal 1 binary64)) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (.f64 (+.f64 (.f64 (*.f64 th th) #s(literal -1/6 binary64)) #s(literal 1 binary64)) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (.f64 (/.f64 (-.f64 (.f64 (.f64 (.f64 th th) #s(literal -1/6 binary64)) (.f64 (.f64 th th) #s(literal -1/6 binary64))) #s(literal 1 binary64)) (-.f64 (.f64 (.f64 th th) #s(literal -1/6 binary64)) #s(literal 1 binary64))) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (.f64 #s(approx (+ ( (* th th) -1/6) 1) (.f64 (-.f64 (pow.f64 th #s(literal -2 binary64)) #s(literal 1/6 binary64)) (.f64 th th))) th)))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(approx (+ (/ ( -1/2 (* kx kx)) (pow (sin ky) 2)) 1) (/.f64 (.f64 (.f64 kx kx) #s(literal -1/2 binary64)) (*.f64 ky ky)))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (.f64 ky ky))) #s(literal 1 binary64))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(approx (+ (/ ( -1/2 (* kx kx)) (pow (sin ky) 2)) 1) (/.f64 (+.f64 (.f64 (.f64 ky ky) (+.f64 (.f64 #s(literal -1/6 binary64) (.f64 kx kx)) #s(literal 1 binary64))) (.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (*.f64 ky ky)))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) #s(approx (* (+ (* (* th th) -1/6) 1) th) (*.f64 (-.f64 (pow.f64 th #s(literal -2 binary64)) #s(literal 1/6 binary64)) (pow.f64 th #s(literal 3 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx ( (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (/.f64 #s(approx (sin th) th) (sin.f64 kx))) (sin.f64 ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx ( (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (/.f64 (sin.f64 th) #s(approx (sin kx) kx))) (sin.f64 ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx ( (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (/.f64 (sin.f64 th) (sin.f64 kx))) #s(approx (sin ky) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (sin.f64 kx)))
(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (sin.f64 kx))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sin.f64 kx))) #s(approx (sin th) th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) #s(approx (pow (sin ky) -1) (/.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 ky ky) #s(literal -1/6 binary64))) ky))) (sin.f64 ky))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) #s(approx (pow (pow (sin ky) 2) -1/2) (/.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 ky ky) #s(literal -1/6 binary64))) ky))) (sin.f64 ky))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 #s(approx (/ ( -1/2 (* kx kx)) (pow (sin ky) 2)) (/.f64 (+.f64 (.f64 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (+.f64 (-.f64 (.f64 #s(literal 2/135 binary64) (.f64 kx kx)) (.f64 #s(literal -1/3 binary64) (.f64 (.f64 kx kx) #s(literal -1/15 binary64)))) (.f64 #s(literal -1/315 binary64) (.f64 kx kx))) (.f64 ky ky)) (.f64 (.f64 kx kx) #s(literal -1/15 binary64)))) (.f64 ky ky)) (.f64 #s(literal -1/6 binary64) (.f64 kx kx))) (.f64 ky ky)) (.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (*.f64 ky ky))) #s(literal 1 binary64))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 1 binary64))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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)))))) (sin.f64 th))
(.f64 (/.f64 #s(approx (sin ky) ky) (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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)))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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 th) th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (pow.f64 #s(approx (sin ky) 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 #s(approx ( (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (/.f64 (sin.f64 th) (sin.f64 kx))) (sin.f64 ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx ( (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (/.f64 (sin.f64 th) (sin.f64 ky))) (sin.f64 ky)))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sin.f64 kx))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) (sin.f64 ky))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(approx (sin th) th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (*.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 1 binary64))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx ( (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) #s(approx (/ (sin th) (sin kx)) (/.f64 (+.f64 (.f64 (.f64 #s(literal 1/6 binary64) (*.f64 kx kx)) (sin.f64 th)) (sin.f64 th)) kx))) (sin.f64 ky)))
(.f64 (/.f64 #s(approx (sin ky) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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)))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(approx (sin th) th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) #s(approx (sin th) th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (*.f64 kx kx)) (sin.f64 ky)) (sin.f64 ky)))) #s(approx (sin th) th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/3 binary64)) #s(literal 1 binary64)) (*.f64 ky ky)))))) #s(approx (sin th) th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.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 (sin th) th))
(.f64 (/.f64 #s(approx (sin ky) ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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)))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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 th) th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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)))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (pow.f64 (sin.f64 kx) #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 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (pow.f64 (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 (.f64 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (pow.f64 (sin.f64 kx) #s(literal -1 binary64))) (sin.f64 th)) (sin.f64 ky)))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (pow.f64 (sin.f64 kx) #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 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (pow.f64 (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 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (pow.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) #s(literal -1/2 binary64))) (sin.f64 ky))) #s(approx (sin th) th))
#s(approx (* (/ (sin ky) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) (sin th)) (.f64 (sqrt.f64 (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(literal -1 binary64))) (.f64 (sin.f64 th) ky)))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (- 1/2 ( 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) (*.f64 (sqrt.f64 (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(literal -1 binary64))) ky)) (sin.f64 th))
(.f64 (/.f64 #s(approx (sin ky) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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)) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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)))))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (pow.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) #s(literal -1/2 binary64))) (sin.f64 ky))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) (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)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(approx (sin th) th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 (+.f64 (.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))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/3 binary64)) #s(literal 1 binary64)) (*.f64 ky ky)))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.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)))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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)))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (.f64 (pow.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (sin.f64 th)) (sin.f64 ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (.f64 (pow.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal -1/2 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 #s(approx (+ (pow (sin ky) 2) (pow (sin kx) 2)) (pow.f64 (sin.f64 kx) #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 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (pow.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) #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 (pow.f64 #s(approx (+ (pow (sin ky) 2) (pow (sin kx) 2)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #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 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (exp.f64 (*.f64 (log.f64 (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 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/4) (*.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal -1 binary64))) #s(literal 1 binary64))) #s(literal 2 binary64)) (sin.f64 ky))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 (pow.f64 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/4) (*.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal -1 binary64))) #s(literal 1 binary64))) #s(literal 2 binary64)) (sin.f64 ky))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) (/.f64 #s(literal 1 binary64) (pow.f64 #s(approx (+ (pow (sin ky) 2) (pow (sin kx) 2)) (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 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(approx (sin th) th))
(/.f64 (*.f64 (sin.f64 ky) #s(approx (sin th) th)) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
#s(approx (* (/ (sin ky) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) (sin th)) (.f64 (.f64 th (sin.f64 ky)) (pow.f64 (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1/2 binary64)))) #s(literal -1 binary64))))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) #s(approx (pow (sin kx) 2) (.f64 (+.f64 (.f64 #s(literal -1/3 binary64) (.f64 kx kx)) #s(literal 1 binary64)) (.f64 kx kx)))) #s(literal -1/2 binary64)) (sin.f64 ky))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 (pow.f64 (pow.f64 #s(approx (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/4 binary64)) #s(literal 2 binary64)) (sin.f64 ky))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx ( (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (*.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64)) th)) (sin.f64 ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (.f64 (sin.f64 ky) th) (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (.f64 #s(approx (sin th) th) (sin.f64 ky))))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (sin.f64 ky))) #s(approx (sin th) th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal -1/2 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 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #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 (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal -1/2 binary64)) (sin.f64 ky))) (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 th) (sin.f64 ky)) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 (+.f64 (neg.f64 (.f64 (-.f64 (/.f64 #s(literal 1/6 binary64) (sin.f64 kx)) (.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))) ky)) (sin.f64 th))
(.f64 (/.f64 (exp.f64 (.f64 (log.f64 (sin.f64 ky)) #s(literal 1 binary64))) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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)))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 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 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #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 (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 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)))) (sin th)) (.f64 (+.f64 (.f64 (+.f64 (/.f64 (.f64 #s(literal -1/6 binary64) (sin.f64 th)) (sin.f64 kx)) (/.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))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 (pow.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/4 binary64)) #s(literal 2 binary64)) (sin.f64 ky))) (sin.f64 th))
(.f64 (/.f64 (exp.f64 (.f64 (log.f64 (sin.f64 ky)) #s(literal 1 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 (sqrt.f64 (-.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (sin.f64 kx) #s(literal 4 binary64)))) (sqrt.f64 (-.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))) #s(approx (sin th) th))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 (sin.f64 ky) #s(literal 4 binary64))) (-.f64 (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 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64)) ky) ky) #s(literal 1/3 binary64)) (.f64 ky ky)) #s(literal 1 binary64)) (.f64 ky ky))) #s(literal 3 binary64))) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (-.f64 (.f64 #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64)) ky) ky) #s(literal 1/3 binary64)) (.f64 ky ky)) #s(literal 1 binary64)) (.f64 ky ky))) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64)) ky) ky) #s(literal 1/3 binary64)) (.f64 ky ky)) #s(literal 1 binary64)) (.f64 ky ky)))) (.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/315 binary64)) #s(literal 2/45 binary64)) ky) ky) #s(literal 1/3 binary64)) (.f64 ky ky)) #s(literal 1 binary64)) (*.f64 ky ky))))))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (/.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 6 binary64)) (pow.f64 (sin.f64 ky) #s(literal 6 binary64)))) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 (.f64 (sin.f64 kx) (sin.f64 ky)) #s(literal 2 binary64))))))) (sin.f64 th))

Outputs

(*.f64 (/.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))

#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 #s(approx (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (/.f64 (sin.f64 th) #s(approx (sin kx) kx))) (sin.f64 ky)))

Calls

9 calls:

667.0ms	(sin.f64 th)
63.0ms	kx
28.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))
26.0ms	th
26.0ms	(sin.f64 kx)

Results

Accuracy	Segments	Branch
93.6%	1	`(sin.f64 th)`
93.6%	1	`(sin.f64 kx)`
93.6%	1	`(pow.f64 (sin.f64 kx) #s(literal 2 binary64))`
93.6%	1	`(sin.f64 ky)`
97.2%	2	`(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))`
96.8%	2	`(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))`
93.6%	1	`kx`
96.3%	2	`ky`
93.6%	1	`th`

Compiler

Compiled 42 to 51 computations (-21.4% saved)

regimes377.0ms (5.1%)

Memory

6.4MiB live, 450.8MiB allocated; 214ms collecting garbage

Counts

84 → 3

Calls

Call 1

Inputs
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (.f64 #s(approx (+ ( (* th th) -1/6) 1) (.f64 (.f64 th th) #s(literal -1/6 binary64))) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (.f64 (+.f64 (.f64 th (*.f64 th #s(literal -1/6 binary64))) #s(literal 1 binary64)) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (.f64 (+.f64 (.f64 (*.f64 th th) #s(literal -1/6 binary64)) #s(literal 1 binary64)) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (.f64 (/.f64 (-.f64 (.f64 (.f64 (.f64 th th) #s(literal -1/6 binary64)) (.f64 (.f64 th th) #s(literal -1/6 binary64))) #s(literal 1 binary64)) (-.f64 (.f64 (.f64 th th) #s(literal -1/6 binary64)) #s(literal 1 binary64))) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (.f64 #s(approx (+ ( (* th th) -1/6) 1) (.f64 (-.f64 (pow.f64 th #s(literal -2 binary64)) #s(literal 1/6 binary64)) (.f64 th th))) th)))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(approx (+ (/ ( -1/2 (* kx kx)) (pow (sin ky) 2)) 1) (/.f64 (.f64 (.f64 kx kx) #s(literal -1/2 binary64)) (*.f64 ky ky)))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (.f64 ky ky))) #s(literal 1 binary64))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(approx (+ (/ ( -1/2 (* kx kx)) (pow (sin ky) 2)) 1) (/.f64 (+.f64 (.f64 (.f64 ky ky) (+.f64 (.f64 #s(literal -1/6 binary64) (.f64 kx kx)) #s(literal 1 binary64))) (.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (*.f64 ky ky)))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) #s(approx (* (+ (* (* th th) -1/6) 1) th) (*.f64 (-.f64 (pow.f64 th #s(literal -2 binary64)) #s(literal 1/6 binary64)) (pow.f64 th #s(literal 3 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx ( (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (/.f64 #s(approx (sin th) th) (sin.f64 kx))) (sin.f64 ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx ( (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (/.f64 (sin.f64 th) #s(approx (sin kx) kx))) (sin.f64 ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx ( (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (/.f64 (sin.f64 th) (sin.f64 kx))) #s(approx (sin ky) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (sin.f64 kx)))
(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (sin.f64 kx))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sin.f64 kx))) #s(approx (sin th) th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) #s(approx (pow (sin ky) -1) (/.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 ky ky) #s(literal -1/6 binary64))) ky))) (sin.f64 ky))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) #s(approx (pow (pow (sin ky) 2) -1/2) (/.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 ky ky) #s(literal -1/6 binary64))) ky))) (sin.f64 ky))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 #s(approx (/ ( -1/2 (* kx kx)) (pow (sin ky) 2)) (/.f64 (+.f64 (.f64 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (+.f64 (-.f64 (.f64 #s(literal 2/135 binary64) (.f64 kx kx)) (.f64 #s(literal -1/3 binary64) (.f64 (.f64 kx kx) #s(literal -1/15 binary64)))) (.f64 #s(literal -1/315 binary64) (.f64 kx kx))) (.f64 ky ky)) (.f64 (.f64 kx kx) #s(literal -1/15 binary64)))) (.f64 ky ky)) (.f64 #s(literal -1/6 binary64) (.f64 kx kx))) (.f64 ky ky)) (.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (*.f64 ky ky))) #s(literal 1 binary64))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 1 binary64))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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)))))) (sin.f64 th))
(.f64 (/.f64 #s(approx (sin ky) ky) (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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)))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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 th) th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (pow.f64 #s(approx (sin ky) 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 #s(approx ( (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (/.f64 (sin.f64 th) (sin.f64 kx))) (sin.f64 ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx ( (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (/.f64 (sin.f64 th) (sin.f64 ky))) (sin.f64 ky)))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sin.f64 kx))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) (sin.f64 ky))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(approx (sin th) th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (*.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 1 binary64))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx ( (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) #s(approx (/ (sin th) (sin kx)) (/.f64 (+.f64 (.f64 (.f64 #s(literal 1/6 binary64) (*.f64 kx kx)) (sin.f64 th)) (sin.f64 th)) kx))) (sin.f64 ky)))
(.f64 (/.f64 #s(approx (sin ky) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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)))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(approx (sin th) th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) #s(approx (sin th) th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (*.f64 kx kx)) (sin.f64 ky)) (sin.f64 ky)))) #s(approx (sin th) th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/3 binary64)) #s(literal 1 binary64)) (*.f64 ky ky)))))) #s(approx (sin th) th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.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 (sin th) th))
(.f64 (/.f64 #s(approx (sin ky) ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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)))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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 th) th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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)))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (pow.f64 (sin.f64 kx) #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 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (pow.f64 (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 (.f64 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (pow.f64 (sin.f64 kx) #s(literal -1 binary64))) (sin.f64 th)) (sin.f64 ky)))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (pow.f64 (sin.f64 kx) #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 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (pow.f64 (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 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (pow.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) #s(literal -1/2 binary64))) (sin.f64 ky))) #s(approx (sin th) th))
#s(approx (* (/ (sin ky) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) (sin th)) (.f64 (sqrt.f64 (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(literal -1 binary64))) (.f64 (sin.f64 th) ky)))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (- 1/2 ( 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) (*.f64 (sqrt.f64 (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(literal -1 binary64))) ky)) (sin.f64 th))
(.f64 (/.f64 #s(approx (sin ky) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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)) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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)))))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (pow.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) #s(literal -1/2 binary64))) (sin.f64 ky))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) (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)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(approx (sin th) th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 (+.f64 (.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))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/3 binary64)) #s(literal 1 binary64)) (*.f64 ky ky)))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.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)))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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)))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (.f64 (pow.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (sin.f64 th)) (sin.f64 ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (.f64 (pow.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal -1/2 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 #s(approx (+ (pow (sin ky) 2) (pow (sin kx) 2)) (pow.f64 (sin.f64 kx) #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 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (pow.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) #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 (pow.f64 #s(approx (+ (pow (sin ky) 2) (pow (sin kx) 2)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #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 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (exp.f64 (*.f64 (log.f64 (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 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/4) (*.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal -1 binary64))) #s(literal 1 binary64))) #s(literal 2 binary64)) (sin.f64 ky))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 (pow.f64 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/4) (*.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal -1 binary64))) #s(literal 1 binary64))) #s(literal 2 binary64)) (sin.f64 ky))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) (/.f64 #s(literal 1 binary64) (pow.f64 #s(approx (+ (pow (sin ky) 2) (pow (sin kx) 2)) (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 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(approx (sin th) th))
(/.f64 (*.f64 (sin.f64 ky) #s(approx (sin th) th)) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
#s(approx (* (/ (sin ky) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) (sin th)) (.f64 (.f64 th (sin.f64 ky)) (pow.f64 (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1/2 binary64)))) #s(literal -1 binary64))))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) #s(approx (pow (sin kx) 2) (.f64 (+.f64 (.f64 #s(literal -1/3 binary64) (.f64 kx kx)) #s(literal 1 binary64)) (.f64 kx kx)))) #s(literal -1/2 binary64)) (sin.f64 ky))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 (pow.f64 (pow.f64 #s(approx (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/4 binary64)) #s(literal 2 binary64)) (sin.f64 ky))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx ( (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (*.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64)) th)) (sin.f64 ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (.f64 (sin.f64 ky) th) (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (.f64 #s(approx (sin th) th) (sin.f64 ky))))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (sin.f64 ky))) #s(approx (sin th) th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal -1/2 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 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #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 (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) #s(literal -1/2 binary64)) (sin.f64 ky))) (sin.f64 th))

Outputs

#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 #s(approx (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (/.f64 (sin.f64 th) (sin.f64 kx))) #s(approx (sin ky) ky)))

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

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

Calls

9 calls:

87.0ms	(sin.f64 th)
60.0ms	th
38.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))
36.0ms	(sin.f64 kx)
35.0ms	(pow.f64 (sin.f64 kx) #s(literal 2 binary64))

Results

Accuracy	Segments	Branch
90.1%	3	`(sin.f64 th)`
93.6%	2	`kx`
95.2%	4	`(sin.f64 kx)`
90.1%	2	`th`
93.6%	2	`(pow.f64 (sin.f64 kx) #s(literal 2 binary64))`
96.3%	4	`(sin.f64 ky)`
96.3%	3	`ky`
88.4%	2	`(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))`
97.0%	4	`(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))`

Compiler

Compiled 42 to 51 computations (-21.4% saved)

regimes207.0ms (2.8%)

Memory

22.3MiB live, 211.1MiB allocated; 46ms collecting garbage

Counts

75 → 5

Calls

Call 1

Inputs
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (.f64 #s(approx (+ ( (* th th) -1/6) 1) (.f64 (.f64 th th) #s(literal -1/6 binary64))) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (.f64 (+.f64 (.f64 th (*.f64 th #s(literal -1/6 binary64))) #s(literal 1 binary64)) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (.f64 (+.f64 (.f64 (*.f64 th th) #s(literal -1/6 binary64)) #s(literal 1 binary64)) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (.f64 (/.f64 (-.f64 (.f64 (.f64 (.f64 th th) #s(literal -1/6 binary64)) (.f64 (.f64 th th) #s(literal -1/6 binary64))) #s(literal 1 binary64)) (-.f64 (.f64 (.f64 th th) #s(literal -1/6 binary64)) #s(literal 1 binary64))) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (.f64 #s(approx (+ ( (* th th) -1/6) 1) (.f64 (-.f64 (pow.f64 th #s(literal -2 binary64)) #s(literal 1/6 binary64)) (.f64 th th))) th)))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(approx (+ (/ ( -1/2 (* kx kx)) (pow (sin ky) 2)) 1) (/.f64 (.f64 (.f64 kx kx) #s(literal -1/2 binary64)) (*.f64 ky ky)))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (.f64 ky ky))) #s(literal 1 binary64))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(approx (+ (/ ( -1/2 (* kx kx)) (pow (sin ky) 2)) 1) (/.f64 (+.f64 (.f64 (.f64 ky ky) (+.f64 (.f64 #s(literal -1/6 binary64) (.f64 kx kx)) #s(literal 1 binary64))) (.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (*.f64 ky ky)))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) #s(approx (* (+ (* (* th th) -1/6) 1) th) (*.f64 (-.f64 (pow.f64 th #s(literal -2 binary64)) #s(literal 1/6 binary64)) (pow.f64 th #s(literal 3 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx ( (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (/.f64 #s(approx (sin th) th) (sin.f64 kx))) (sin.f64 ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx ( (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (/.f64 (sin.f64 th) #s(approx (sin kx) kx))) (sin.f64 ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx ( (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (/.f64 (sin.f64 th) (sin.f64 kx))) #s(approx (sin ky) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (sin.f64 kx)))
(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (sin.f64 kx))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sin.f64 kx))) #s(approx (sin th) th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) #s(approx (pow (sin ky) -1) (/.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 ky ky) #s(literal -1/6 binary64))) ky))) (sin.f64 ky))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) #s(approx (pow (pow (sin ky) 2) -1/2) (/.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 ky ky) #s(literal -1/6 binary64))) ky))) (sin.f64 ky))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 #s(approx (/ ( -1/2 (* kx kx)) (pow (sin ky) 2)) (/.f64 (+.f64 (.f64 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (+.f64 (-.f64 (.f64 #s(literal 2/135 binary64) (.f64 kx kx)) (.f64 #s(literal -1/3 binary64) (.f64 (.f64 kx kx) #s(literal -1/15 binary64)))) (.f64 #s(literal -1/315 binary64) (.f64 kx kx))) (.f64 ky ky)) (.f64 (.f64 kx kx) #s(literal -1/15 binary64)))) (.f64 ky ky)) (.f64 #s(literal -1/6 binary64) (.f64 kx kx))) (.f64 ky ky)) (.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (*.f64 ky ky))) #s(literal 1 binary64))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 1 binary64))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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)))))) (sin.f64 th))
(.f64 (/.f64 #s(approx (sin ky) ky) (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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)))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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 th) th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (pow.f64 #s(approx (sin ky) 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 #s(approx ( (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (/.f64 (sin.f64 th) (sin.f64 kx))) (sin.f64 ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx ( (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (/.f64 (sin.f64 th) (sin.f64 ky))) (sin.f64 ky)))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sin.f64 kx))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) (sin.f64 ky))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(approx (sin th) th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (*.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 1 binary64))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx ( (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) #s(approx (/ (sin th) (sin kx)) (/.f64 (+.f64 (.f64 (.f64 #s(literal 1/6 binary64) (*.f64 kx kx)) (sin.f64 th)) (sin.f64 th)) kx))) (sin.f64 ky)))
(.f64 (/.f64 #s(approx (sin ky) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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)))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(approx (sin th) th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) #s(approx (sin th) th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (*.f64 kx kx)) (sin.f64 ky)) (sin.f64 ky)))) #s(approx (sin th) th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/3 binary64)) #s(literal 1 binary64)) (*.f64 ky ky)))))) #s(approx (sin th) th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.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 (sin th) th))
(.f64 (/.f64 #s(approx (sin ky) ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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)))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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 th) th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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)))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (pow.f64 (sin.f64 kx) #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 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (pow.f64 (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 (.f64 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (pow.f64 (sin.f64 kx) #s(literal -1 binary64))) (sin.f64 th)) (sin.f64 ky)))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (pow.f64 (sin.f64 kx) #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 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (pow.f64 (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 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (pow.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) #s(literal -1/2 binary64))) (sin.f64 ky))) #s(approx (sin th) th))
#s(approx (* (/ (sin ky) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) (sin th)) (.f64 (sqrt.f64 (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(literal -1 binary64))) (.f64 (sin.f64 th) ky)))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (- 1/2 ( 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) (*.f64 (sqrt.f64 (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(literal -1 binary64))) ky)) (sin.f64 th))
(.f64 (/.f64 #s(approx (sin ky) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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)) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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)))))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (pow.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) #s(literal -1/2 binary64))) (sin.f64 ky))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) (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)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(approx (sin th) th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 (+.f64 (.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))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/3 binary64)) #s(literal 1 binary64)) (*.f64 ky ky)))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.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)))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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)))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (.f64 (pow.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (sin.f64 th)) (sin.f64 ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (.f64 (pow.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal -1/2 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 #s(approx (+ (pow (sin ky) 2) (pow (sin kx) 2)) (pow.f64 (sin.f64 kx) #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 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (pow.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) #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 (pow.f64 #s(approx (+ (pow (sin ky) 2) (pow (sin kx) 2)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #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 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (exp.f64 (*.f64 (log.f64 (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 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/4) (*.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal -1 binary64))) #s(literal 1 binary64))) #s(literal 2 binary64)) (sin.f64 ky))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 (pow.f64 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/4) (*.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal -1 binary64))) #s(literal 1 binary64))) #s(literal 2 binary64)) (sin.f64 ky))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) (/.f64 #s(literal 1 binary64) (pow.f64 #s(approx (+ (pow (sin ky) 2) (pow (sin kx) 2)) (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 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(approx (sin th) th))
(/.f64 (*.f64 (sin.f64 ky) #s(approx (sin th) th)) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))))
#s(approx (* (/ (sin ky) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) (sin th)) (.f64 (.f64 th (sin.f64 ky)) (pow.f64 (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) #s(literal 1/2 binary64)))) #s(literal -1 binary64))))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) #s(approx (pow (sin kx) 2) (.f64 (+.f64 (.f64 #s(literal -1/3 binary64) (.f64 kx kx)) #s(literal 1 binary64)) (.f64 kx kx)))) #s(literal -1/2 binary64)) (sin.f64 ky))) (sin.f64 th))

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

Calls

9 calls:

38.0ms	ky
36.0ms	(sin.f64 th)
20.0ms	(sin.f64 kx)
20.0ms	kx
18.0ms	th

Results

Accuracy	Segments	Branch
74.8%	6	`(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))`
71.0%	4	`(sin.f64 th)`
71.2%	3	`th`
73.4%	3	`(sin.f64 kx)`
76.0%	4	`(sin.f64 ky)`
73.4%	2	`kx`
73.4%	2	`(pow.f64 (sin.f64 kx) #s(literal 2 binary64))`
84.2%	5	`(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))`
76.3%	3	`ky`

Compiler

Compiled 42 to 51 computations (-21.4% saved)

regimes22.0ms (0.3%)

Memory

-16.6MiB live, 32.7MiB allocated; 2ms collecting garbage

Counts

72 → 5

Calls

Call 1

Inputs
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (.f64 #s(approx (+ ( (* th th) -1/6) 1) (.f64 (.f64 th th) #s(literal -1/6 binary64))) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (.f64 (+.f64 (.f64 th (*.f64 th #s(literal -1/6 binary64))) #s(literal 1 binary64)) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (.f64 (+.f64 (.f64 (*.f64 th th) #s(literal -1/6 binary64)) #s(literal 1 binary64)) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (.f64 (/.f64 (-.f64 (.f64 (.f64 (.f64 th th) #s(literal -1/6 binary64)) (.f64 (.f64 th th) #s(literal -1/6 binary64))) #s(literal 1 binary64)) (-.f64 (.f64 (.f64 th th) #s(literal -1/6 binary64)) #s(literal 1 binary64))) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (.f64 #s(approx (+ ( (* th th) -1/6) 1) (.f64 (-.f64 (pow.f64 th #s(literal -2 binary64)) #s(literal 1/6 binary64)) (.f64 th th))) th)))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(approx (+ (/ ( -1/2 (* kx kx)) (pow (sin ky) 2)) 1) (/.f64 (.f64 (.f64 kx kx) #s(literal -1/2 binary64)) (*.f64 ky ky)))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (.f64 ky ky))) #s(literal 1 binary64))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(approx (+ (/ ( -1/2 (* kx kx)) (pow (sin ky) 2)) 1) (/.f64 (+.f64 (.f64 (.f64 ky ky) (+.f64 (.f64 #s(literal -1/6 binary64) (.f64 kx kx)) #s(literal 1 binary64))) (.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (*.f64 ky ky)))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) #s(approx (* (+ (* (* th th) -1/6) 1) th) (*.f64 (-.f64 (pow.f64 th #s(literal -2 binary64)) #s(literal 1/6 binary64)) (pow.f64 th #s(literal 3 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx ( (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (/.f64 #s(approx (sin th) th) (sin.f64 kx))) (sin.f64 ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx ( (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (/.f64 (sin.f64 th) #s(approx (sin kx) kx))) (sin.f64 ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx ( (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (/.f64 (sin.f64 th) (sin.f64 kx))) #s(approx (sin ky) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (sin.f64 kx)))
(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (sin.f64 kx))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sin.f64 kx))) #s(approx (sin th) th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) #s(approx (pow (sin ky) -1) (/.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 ky ky) #s(literal -1/6 binary64))) ky))) (sin.f64 ky))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) #s(approx (pow (pow (sin ky) 2) -1/2) (/.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 ky ky) #s(literal -1/6 binary64))) ky))) (sin.f64 ky))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 #s(approx (/ ( -1/2 (* kx kx)) (pow (sin ky) 2)) (/.f64 (+.f64 (.f64 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (+.f64 (-.f64 (.f64 #s(literal 2/135 binary64) (.f64 kx kx)) (.f64 #s(literal -1/3 binary64) (.f64 (.f64 kx kx) #s(literal -1/15 binary64)))) (.f64 #s(literal -1/315 binary64) (.f64 kx kx))) (.f64 ky ky)) (.f64 (.f64 kx kx) #s(literal -1/15 binary64)))) (.f64 ky ky)) (.f64 #s(literal -1/6 binary64) (.f64 kx kx))) (.f64 ky ky)) (.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (*.f64 ky ky))) #s(literal 1 binary64))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 1 binary64))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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)))))) (sin.f64 th))
(.f64 (/.f64 #s(approx (sin ky) ky) (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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)))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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 th) th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (pow.f64 #s(approx (sin ky) 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 #s(approx ( (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (/.f64 (sin.f64 th) (sin.f64 kx))) (sin.f64 ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx ( (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (/.f64 (sin.f64 th) (sin.f64 ky))) (sin.f64 ky)))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sin.f64 kx))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) (sin.f64 ky))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(approx (sin th) th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (*.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 1 binary64))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx ( (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) #s(approx (/ (sin th) (sin kx)) (/.f64 (+.f64 (.f64 (.f64 #s(literal 1/6 binary64) (*.f64 kx kx)) (sin.f64 th)) (sin.f64 th)) kx))) (sin.f64 ky)))
(.f64 (/.f64 #s(approx (sin ky) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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)))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(approx (sin th) th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) #s(approx (sin th) th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (*.f64 kx kx)) (sin.f64 ky)) (sin.f64 ky)))) #s(approx (sin th) th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/3 binary64)) #s(literal 1 binary64)) (*.f64 ky ky)))))) #s(approx (sin th) th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.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 (sin th) th))
(.f64 (/.f64 #s(approx (sin ky) ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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)))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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 th) th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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)))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (pow.f64 (sin.f64 kx) #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 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (pow.f64 (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 (.f64 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (pow.f64 (sin.f64 kx) #s(literal -1 binary64))) (sin.f64 th)) (sin.f64 ky)))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (pow.f64 (sin.f64 kx) #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 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (pow.f64 (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 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (pow.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) #s(literal -1/2 binary64))) (sin.f64 ky))) #s(approx (sin th) th))
#s(approx (* (/ (sin ky) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) (sin th)) (.f64 (sqrt.f64 (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(literal -1 binary64))) (.f64 (sin.f64 th) ky)))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (- 1/2 ( 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) (*.f64 (sqrt.f64 (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(literal -1 binary64))) ky)) (sin.f64 th))
(.f64 (/.f64 #s(approx (sin ky) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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)) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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)))))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (pow.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) #s(literal -1/2 binary64))) (sin.f64 ky))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) (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)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(approx (sin th) th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 (+.f64 (.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))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/3 binary64)) #s(literal 1 binary64)) (*.f64 ky ky)))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.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)))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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)))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (.f64 (pow.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (sin.f64 th)) (sin.f64 ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (.f64 (pow.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal -1/2 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 #s(approx (+ (pow (sin ky) 2) (pow (sin kx) 2)) (pow.f64 (sin.f64 kx) #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 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (pow.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) #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 (pow.f64 #s(approx (+ (pow (sin ky) 2) (pow (sin kx) 2)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #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 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (exp.f64 (*.f64 (log.f64 (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 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/4) (*.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal -1 binary64))) #s(literal 1 binary64))) #s(literal 2 binary64)) (sin.f64 ky))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 (pow.f64 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/4) (*.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal -1 binary64))) #s(literal 1 binary64))) #s(literal 2 binary64)) (sin.f64 ky))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) (/.f64 #s(literal 1 binary64) (pow.f64 #s(approx (+ (pow (sin ky) 2) (pow (sin kx) 2)) (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 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(approx (sin th) th))

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

Calls

1 calls:

17.0ms

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

Results

Accuracy	Segments	Branch
84.2%	5	`(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))`

Compiler

Compiled 13 to 11 computations (15.4% saved)

regimes22.0ms (0.3%)

Memory

-16.0MiB live, 30.3MiB allocated; 2ms collecting garbage

Counts

71 → 5

Calls

Call 1

Inputs
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (.f64 #s(approx (+ ( (* th th) -1/6) 1) (.f64 (.f64 th th) #s(literal -1/6 binary64))) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (.f64 (+.f64 (.f64 th (*.f64 th #s(literal -1/6 binary64))) #s(literal 1 binary64)) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (.f64 (+.f64 (.f64 (*.f64 th th) #s(literal -1/6 binary64)) #s(literal 1 binary64)) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (.f64 (/.f64 (-.f64 (.f64 (.f64 (.f64 th th) #s(literal -1/6 binary64)) (.f64 (.f64 th th) #s(literal -1/6 binary64))) #s(literal 1 binary64)) (-.f64 (.f64 (.f64 th th) #s(literal -1/6 binary64)) #s(literal 1 binary64))) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (.f64 #s(approx (+ ( (* th th) -1/6) 1) (.f64 (-.f64 (pow.f64 th #s(literal -2 binary64)) #s(literal 1/6 binary64)) (.f64 th th))) th)))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(approx (+ (/ ( -1/2 (* kx kx)) (pow (sin ky) 2)) 1) (/.f64 (.f64 (.f64 kx kx) #s(literal -1/2 binary64)) (*.f64 ky ky)))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (.f64 ky ky))) #s(literal 1 binary64))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(approx (+ (/ ( -1/2 (* kx kx)) (pow (sin ky) 2)) 1) (/.f64 (+.f64 (.f64 (.f64 ky ky) (+.f64 (.f64 #s(literal -1/6 binary64) (.f64 kx kx)) #s(literal 1 binary64))) (.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (*.f64 ky ky)))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) #s(approx (* (+ (* (* th th) -1/6) 1) th) (*.f64 (-.f64 (pow.f64 th #s(literal -2 binary64)) #s(literal 1/6 binary64)) (pow.f64 th #s(literal 3 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx ( (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (/.f64 #s(approx (sin th) th) (sin.f64 kx))) (sin.f64 ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx ( (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (/.f64 (sin.f64 th) #s(approx (sin kx) kx))) (sin.f64 ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx ( (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (/.f64 (sin.f64 th) (sin.f64 kx))) #s(approx (sin ky) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (sin.f64 kx)))
(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (sin.f64 kx))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sin.f64 kx))) #s(approx (sin th) th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) #s(approx (pow (sin ky) -1) (/.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 ky ky) #s(literal -1/6 binary64))) ky))) (sin.f64 ky))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) #s(approx (pow (pow (sin ky) 2) -1/2) (/.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 ky ky) #s(literal -1/6 binary64))) ky))) (sin.f64 ky))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 #s(approx (/ ( -1/2 (* kx kx)) (pow (sin ky) 2)) (/.f64 (+.f64 (.f64 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (+.f64 (-.f64 (.f64 #s(literal 2/135 binary64) (.f64 kx kx)) (.f64 #s(literal -1/3 binary64) (.f64 (.f64 kx kx) #s(literal -1/15 binary64)))) (.f64 #s(literal -1/315 binary64) (.f64 kx kx))) (.f64 ky ky)) (.f64 (.f64 kx kx) #s(literal -1/15 binary64)))) (.f64 ky ky)) (.f64 #s(literal -1/6 binary64) (.f64 kx kx))) (.f64 ky ky)) (.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (*.f64 ky ky))) #s(literal 1 binary64))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 1 binary64))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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)))))) (sin.f64 th))
(.f64 (/.f64 #s(approx (sin ky) ky) (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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)))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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 th) th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (pow.f64 #s(approx (sin ky) 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 #s(approx ( (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (/.f64 (sin.f64 th) (sin.f64 kx))) (sin.f64 ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx ( (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (/.f64 (sin.f64 th) (sin.f64 ky))) (sin.f64 ky)))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sin.f64 kx))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) (sin.f64 ky))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(approx (sin th) th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (*.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 1 binary64))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx ( (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) #s(approx (/ (sin th) (sin kx)) (/.f64 (+.f64 (.f64 (.f64 #s(literal 1/6 binary64) (*.f64 kx kx)) (sin.f64 th)) (sin.f64 th)) kx))) (sin.f64 ky)))
(.f64 (/.f64 #s(approx (sin ky) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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)))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(approx (sin th) th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) #s(approx (sin th) th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (*.f64 kx kx)) (sin.f64 ky)) (sin.f64 ky)))) #s(approx (sin th) th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/3 binary64)) #s(literal 1 binary64)) (*.f64 ky ky)))))) #s(approx (sin th) th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.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 (sin th) th))
(.f64 (/.f64 #s(approx (sin ky) ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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)))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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 th) th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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)))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (pow.f64 (sin.f64 kx) #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 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (pow.f64 (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 (.f64 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (pow.f64 (sin.f64 kx) #s(literal -1 binary64))) (sin.f64 th)) (sin.f64 ky)))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (pow.f64 (sin.f64 kx) #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 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (pow.f64 (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 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (pow.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) #s(literal -1/2 binary64))) (sin.f64 ky))) #s(approx (sin th) th))
#s(approx (* (/ (sin ky) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) (sin th)) (.f64 (sqrt.f64 (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(literal -1 binary64))) (.f64 (sin.f64 th) ky)))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (- 1/2 ( 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) (*.f64 (sqrt.f64 (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(literal -1 binary64))) ky)) (sin.f64 th))
(.f64 (/.f64 #s(approx (sin ky) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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)) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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)))))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (pow.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) #s(literal -1/2 binary64))) (sin.f64 ky))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) (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)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(approx (sin th) th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 (+.f64 (.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))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/3 binary64)) #s(literal 1 binary64)) (*.f64 ky ky)))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.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)))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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)))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (.f64 (pow.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (sin.f64 th)) (sin.f64 ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 (.f64 (pow.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal -1/2 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 #s(approx (+ (pow (sin ky) 2) (pow (sin kx) 2)) (pow.f64 (sin.f64 kx) #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 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (pow.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) #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 (pow.f64 #s(approx (+ (pow (sin ky) 2) (pow (sin kx) 2)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) #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 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (exp.f64 (*.f64 (log.f64 (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 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/4) (*.f64 (sqrt.f64 (pow.f64 (sin.f64 kx) #s(literal -1 binary64))) #s(literal 1 binary64))) #s(literal 2 binary64)) (sin.f64 ky))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 (pow.f64 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/4) (*.f64 (sqrt.f64 (pow.f64 (sin.f64 ky) #s(literal -1 binary64))) #s(literal 1 binary64))) #s(literal 2 binary64)) (sin.f64 ky))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) (/.f64 #s(literal 1 binary64) (pow.f64 #s(approx (+ (pow (sin ky) 2) (pow (sin kx) 2)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (sin.f64 th))

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

Calls

1 calls:

18.0ms

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

Results

Accuracy	Segments	Branch
84.2%	5	`(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))`

Compiler

Compiled 13 to 11 computations (15.4% saved)

regimes32.0ms (0.4%)

Memory

-3.5MiB live, 42.9MiB allocated; 2ms collecting garbage

Counts

57 → 3

Calls

Call 1

Inputs
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (.f64 #s(approx (+ ( (* th th) -1/6) 1) (.f64 (.f64 th th) #s(literal -1/6 binary64))) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (.f64 (+.f64 (.f64 th (*.f64 th #s(literal -1/6 binary64))) #s(literal 1 binary64)) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (.f64 (+.f64 (.f64 (*.f64 th th) #s(literal -1/6 binary64)) #s(literal 1 binary64)) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (.f64 (/.f64 (-.f64 (.f64 (.f64 (.f64 th th) #s(literal -1/6 binary64)) (.f64 (.f64 th th) #s(literal -1/6 binary64))) #s(literal 1 binary64)) (-.f64 (.f64 (.f64 th th) #s(literal -1/6 binary64)) #s(literal 1 binary64))) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (.f64 #s(approx (+ ( (* th th) -1/6) 1) (.f64 (-.f64 (pow.f64 th #s(literal -2 binary64)) #s(literal 1/6 binary64)) (.f64 th th))) th)))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(approx (+ (/ ( -1/2 (* kx kx)) (pow (sin ky) 2)) 1) (/.f64 (.f64 (.f64 kx kx) #s(literal -1/2 binary64)) (*.f64 ky ky)))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (.f64 ky ky))) #s(literal 1 binary64))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(approx (+ (/ ( -1/2 (* kx kx)) (pow (sin ky) 2)) 1) (/.f64 (+.f64 (.f64 (.f64 ky ky) (+.f64 (.f64 #s(literal -1/6 binary64) (.f64 kx kx)) #s(literal 1 binary64))) (.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (*.f64 ky ky)))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) #s(approx (* (+ (* (* th th) -1/6) 1) th) (*.f64 (-.f64 (pow.f64 th #s(literal -2 binary64)) #s(literal 1/6 binary64)) (pow.f64 th #s(literal 3 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx ( (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (/.f64 #s(approx (sin th) th) (sin.f64 kx))) (sin.f64 ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx ( (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (/.f64 (sin.f64 th) #s(approx (sin kx) kx))) (sin.f64 ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx ( (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (/.f64 (sin.f64 th) (sin.f64 kx))) #s(approx (sin ky) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (sin.f64 kx)))
(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (sin.f64 kx))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sin.f64 kx))) #s(approx (sin th) th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) #s(approx (pow (sin ky) -1) (/.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 ky ky) #s(literal -1/6 binary64))) ky))) (sin.f64 ky))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) #s(approx (pow (pow (sin ky) 2) -1/2) (/.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 ky ky) #s(literal -1/6 binary64))) ky))) (sin.f64 ky))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 #s(approx (/ ( -1/2 (* kx kx)) (pow (sin ky) 2)) (/.f64 (+.f64 (.f64 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (+.f64 (-.f64 (.f64 #s(literal 2/135 binary64) (.f64 kx kx)) (.f64 #s(literal -1/3 binary64) (.f64 (.f64 kx kx) #s(literal -1/15 binary64)))) (.f64 #s(literal -1/315 binary64) (.f64 kx kx))) (.f64 ky ky)) (.f64 (.f64 kx kx) #s(literal -1/15 binary64)))) (.f64 ky ky)) (.f64 #s(literal -1/6 binary64) (.f64 kx kx))) (.f64 ky ky)) (.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (*.f64 ky ky))) #s(literal 1 binary64))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 1 binary64))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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)))))) (sin.f64 th))
(.f64 (/.f64 #s(approx (sin ky) ky) (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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)))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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 th) th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (pow.f64 #s(approx (sin ky) 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 #s(approx ( (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (/.f64 (sin.f64 th) (sin.f64 kx))) (sin.f64 ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx ( (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (/.f64 (sin.f64 th) (sin.f64 ky))) (sin.f64 ky)))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sin.f64 kx))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) (sin.f64 ky))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(approx (sin th) th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (*.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 1 binary64))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx ( (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) #s(approx (/ (sin th) (sin kx)) (/.f64 (+.f64 (.f64 (.f64 #s(literal 1/6 binary64) (*.f64 kx kx)) (sin.f64 th)) (sin.f64 th)) kx))) (sin.f64 ky)))
(.f64 (/.f64 #s(approx (sin ky) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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)))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(approx (sin th) th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) #s(approx (sin th) th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (*.f64 kx kx)) (sin.f64 ky)) (sin.f64 ky)))) #s(approx (sin th) th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/3 binary64)) #s(literal 1 binary64)) (*.f64 ky ky)))))) #s(approx (sin th) th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.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 (sin th) th))
(.f64 (/.f64 #s(approx (sin ky) ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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)))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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 th) th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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)))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (pow.f64 (sin.f64 kx) #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 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (pow.f64 (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 (.f64 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (pow.f64 (sin.f64 kx) #s(literal -1 binary64))) (sin.f64 th)) (sin.f64 ky)))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (pow.f64 (sin.f64 kx) #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 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (pow.f64 (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 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (pow.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) #s(literal -1/2 binary64))) (sin.f64 ky))) #s(approx (sin th) th))
#s(approx (* (/ (sin ky) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) (sin th)) (.f64 (sqrt.f64 (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(literal -1 binary64))) (.f64 (sin.f64 th) ky)))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (- 1/2 ( 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) (*.f64 (sqrt.f64 (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(literal -1 binary64))) ky)) (sin.f64 th))
(.f64 (/.f64 #s(approx (sin ky) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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)) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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)))))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (pow.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) #s(literal -1/2 binary64))) (sin.f64 ky))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) (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)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (sin.f64 th))

Outputs

#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 #s(approx (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (/.f64 (sin.f64 th) (sin.f64 kx))) #s(approx (sin ky) ky)))

(*.f64 (/.f64 #s(approx (sin ky) (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (+.f64 (*.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)) #s(approx (pow (sin ky) 2) (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (+.f64 (*.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)))))) (sin.f64 th))

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

Calls

2 calls:

15.0ms	ky
14.0ms	(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))

Results

Accuracy	Segments	Branch
76.3%	3	`ky`
76.2%	3	`(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))`

Compiler

Compiled 14 to 14 computations (0% saved)

regimes31.0ms (0.4%)

Memory

-9.2MiB live, 40.9MiB allocated; 3ms collecting garbage

Counts

54 → 3

Calls

Call 1

Inputs
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (.f64 #s(approx (+ ( (* th th) -1/6) 1) (.f64 (.f64 th th) #s(literal -1/6 binary64))) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (.f64 (+.f64 (.f64 th (*.f64 th #s(literal -1/6 binary64))) #s(literal 1 binary64)) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (.f64 (+.f64 (.f64 (*.f64 th th) #s(literal -1/6 binary64)) #s(literal 1 binary64)) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (.f64 (/.f64 (-.f64 (.f64 (.f64 (.f64 th th) #s(literal -1/6 binary64)) (.f64 (.f64 th th) #s(literal -1/6 binary64))) #s(literal 1 binary64)) (-.f64 (.f64 (.f64 th th) #s(literal -1/6 binary64)) #s(literal 1 binary64))) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (.f64 #s(approx (+ ( (* th th) -1/6) 1) (.f64 (-.f64 (pow.f64 th #s(literal -2 binary64)) #s(literal 1/6 binary64)) (.f64 th th))) th)))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(approx (+ (/ ( -1/2 (* kx kx)) (pow (sin ky) 2)) 1) (/.f64 (.f64 (.f64 kx kx) #s(literal -1/2 binary64)) (*.f64 ky ky)))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (.f64 ky ky))) #s(literal 1 binary64))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(approx (+ (/ ( -1/2 (* kx kx)) (pow (sin ky) 2)) 1) (/.f64 (+.f64 (.f64 (.f64 ky ky) (+.f64 (.f64 #s(literal -1/6 binary64) (.f64 kx kx)) #s(literal 1 binary64))) (.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (*.f64 ky ky)))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) #s(approx (* (+ (* (* th th) -1/6) 1) th) (*.f64 (-.f64 (pow.f64 th #s(literal -2 binary64)) #s(literal 1/6 binary64)) (pow.f64 th #s(literal 3 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx ( (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (/.f64 #s(approx (sin th) th) (sin.f64 kx))) (sin.f64 ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx ( (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (/.f64 (sin.f64 th) #s(approx (sin kx) kx))) (sin.f64 ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx ( (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (/.f64 (sin.f64 th) (sin.f64 kx))) #s(approx (sin ky) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (sin.f64 kx)))
(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (sin.f64 kx))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sin.f64 kx))) #s(approx (sin th) th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) #s(approx (pow (sin ky) -1) (/.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 ky ky) #s(literal -1/6 binary64))) ky))) (sin.f64 ky))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) #s(approx (pow (pow (sin ky) 2) -1/2) (/.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 ky ky) #s(literal -1/6 binary64))) ky))) (sin.f64 ky))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 #s(approx (/ ( -1/2 (* kx kx)) (pow (sin ky) 2)) (/.f64 (+.f64 (.f64 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (+.f64 (-.f64 (.f64 #s(literal 2/135 binary64) (.f64 kx kx)) (.f64 #s(literal -1/3 binary64) (.f64 (.f64 kx kx) #s(literal -1/15 binary64)))) (.f64 #s(literal -1/315 binary64) (.f64 kx kx))) (.f64 ky ky)) (.f64 (.f64 kx kx) #s(literal -1/15 binary64)))) (.f64 ky ky)) (.f64 #s(literal -1/6 binary64) (.f64 kx kx))) (.f64 ky ky)) (.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (*.f64 ky ky))) #s(literal 1 binary64))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 1 binary64))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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)))))) (sin.f64 th))
(.f64 (/.f64 #s(approx (sin ky) ky) (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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)))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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 th) th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (pow.f64 #s(approx (sin ky) 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 #s(approx ( (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (/.f64 (sin.f64 th) (sin.f64 kx))) (sin.f64 ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx ( (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (/.f64 (sin.f64 th) (sin.f64 ky))) (sin.f64 ky)))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sin.f64 kx))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) (sin.f64 ky))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(approx (sin th) th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (*.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 1 binary64))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx ( (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) #s(approx (/ (sin th) (sin kx)) (/.f64 (+.f64 (.f64 (.f64 #s(literal 1/6 binary64) (*.f64 kx kx)) (sin.f64 th)) (sin.f64 th)) kx))) (sin.f64 ky)))
(.f64 (/.f64 #s(approx (sin ky) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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)))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(approx (sin th) th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) #s(approx (sin th) th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (*.f64 kx kx)) (sin.f64 ky)) (sin.f64 ky)))) #s(approx (sin th) th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/3 binary64)) #s(literal 1 binary64)) (*.f64 ky ky)))))) #s(approx (sin th) th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.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 (sin th) th))
(.f64 (/.f64 #s(approx (sin ky) ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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)))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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 th) th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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)))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (pow.f64 (sin.f64 kx) #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 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (pow.f64 (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 (.f64 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (pow.f64 (sin.f64 kx) #s(literal -1 binary64))) (sin.f64 th)) (sin.f64 ky)))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (pow.f64 (sin.f64 kx) #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 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (pow.f64 (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 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (pow.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) #s(literal -1/2 binary64))) (sin.f64 ky))) #s(approx (sin th) th))
#s(approx (* (/ (sin ky) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) (sin th)) (.f64 (sqrt.f64 (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(literal -1 binary64))) (.f64 (sin.f64 th) ky)))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (- 1/2 ( 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) (*.f64 (sqrt.f64 (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(literal -1 binary64))) ky)) (sin.f64 th))
(.f64 (/.f64 #s(approx (sin ky) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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)) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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)))))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (pow.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) #s(literal -1/2 binary64))) (sin.f64 ky))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 th))

Outputs

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

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

#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th))

Calls

2 calls:

14.0ms	ky
13.0ms	(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))

Results

Accuracy	Segments	Branch
76.2%	3	`(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))`
76.1%	3	`ky`

Compiler

Compiled 14 to 14 computations (0% saved)

regimes29.0ms (0.4%)

Memory

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

Counts

53 → 3

Calls

Call 1

Inputs
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (.f64 #s(approx (+ ( (* th th) -1/6) 1) (.f64 (.f64 th th) #s(literal -1/6 binary64))) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (.f64 (+.f64 (.f64 th (*.f64 th #s(literal -1/6 binary64))) #s(literal 1 binary64)) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (.f64 (+.f64 (.f64 (*.f64 th th) #s(literal -1/6 binary64)) #s(literal 1 binary64)) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (.f64 (/.f64 (-.f64 (.f64 (.f64 (.f64 th th) #s(literal -1/6 binary64)) (.f64 (.f64 th th) #s(literal -1/6 binary64))) #s(literal 1 binary64)) (-.f64 (.f64 (.f64 th th) #s(literal -1/6 binary64)) #s(literal 1 binary64))) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (.f64 #s(approx (+ ( (* th th) -1/6) 1) (.f64 (-.f64 (pow.f64 th #s(literal -2 binary64)) #s(literal 1/6 binary64)) (.f64 th th))) th)))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(approx (+ (/ ( -1/2 (* kx kx)) (pow (sin ky) 2)) 1) (/.f64 (.f64 (.f64 kx kx) #s(literal -1/2 binary64)) (*.f64 ky ky)))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (.f64 ky ky))) #s(literal 1 binary64))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(approx (+ (/ ( -1/2 (* kx kx)) (pow (sin ky) 2)) 1) (/.f64 (+.f64 (.f64 (.f64 ky ky) (+.f64 (.f64 #s(literal -1/6 binary64) (.f64 kx kx)) #s(literal 1 binary64))) (.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (*.f64 ky ky)))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) #s(approx (* (+ (* (* th th) -1/6) 1) th) (*.f64 (-.f64 (pow.f64 th #s(literal -2 binary64)) #s(literal 1/6 binary64)) (pow.f64 th #s(literal 3 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx ( (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (/.f64 #s(approx (sin th) th) (sin.f64 kx))) (sin.f64 ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx ( (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (/.f64 (sin.f64 th) #s(approx (sin kx) kx))) (sin.f64 ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx ( (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (/.f64 (sin.f64 th) (sin.f64 kx))) #s(approx (sin ky) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (sin.f64 kx)))
(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (sin.f64 kx))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sin.f64 kx))) #s(approx (sin th) th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) #s(approx (pow (sin ky) -1) (/.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 ky ky) #s(literal -1/6 binary64))) ky))) (sin.f64 ky))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) #s(approx (pow (pow (sin ky) 2) -1/2) (/.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 ky ky) #s(literal -1/6 binary64))) ky))) (sin.f64 ky))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 #s(approx (/ ( -1/2 (* kx kx)) (pow (sin ky) 2)) (/.f64 (+.f64 (.f64 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (+.f64 (-.f64 (.f64 #s(literal 2/135 binary64) (.f64 kx kx)) (.f64 #s(literal -1/3 binary64) (.f64 (.f64 kx kx) #s(literal -1/15 binary64)))) (.f64 #s(literal -1/315 binary64) (.f64 kx kx))) (.f64 ky ky)) (.f64 (.f64 kx kx) #s(literal -1/15 binary64)))) (.f64 ky ky)) (.f64 #s(literal -1/6 binary64) (.f64 kx kx))) (.f64 ky ky)) (.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (*.f64 ky ky))) #s(literal 1 binary64))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 1 binary64))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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)))))) (sin.f64 th))
(.f64 (/.f64 #s(approx (sin ky) ky) (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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)))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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 th) th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (pow.f64 #s(approx (sin ky) 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 #s(approx ( (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (/.f64 (sin.f64 th) (sin.f64 kx))) (sin.f64 ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx ( (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (/.f64 (sin.f64 th) (sin.f64 ky))) (sin.f64 ky)))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sin.f64 kx))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) (sin.f64 ky))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(approx (sin th) th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (*.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 1 binary64))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx ( (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) #s(approx (/ (sin th) (sin kx)) (/.f64 (+.f64 (.f64 (.f64 #s(literal 1/6 binary64) (*.f64 kx kx)) (sin.f64 th)) (sin.f64 th)) kx))) (sin.f64 ky)))
(.f64 (/.f64 #s(approx (sin ky) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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)))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(approx (sin th) th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) #s(approx (sin th) th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (*.f64 kx kx)) (sin.f64 ky)) (sin.f64 ky)))) #s(approx (sin th) th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/3 binary64)) #s(literal 1 binary64)) (*.f64 ky ky)))))) #s(approx (sin th) th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.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 (sin th) th))
(.f64 (/.f64 #s(approx (sin ky) ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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)))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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 th) th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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)))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (pow.f64 (sin.f64 kx) #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 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (pow.f64 (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 (.f64 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (pow.f64 (sin.f64 kx) #s(literal -1 binary64))) (sin.f64 th)) (sin.f64 ky)))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (pow.f64 (sin.f64 kx) #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 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (pow.f64 (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 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (pow.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) #s(literal -1/2 binary64))) (sin.f64 ky))) #s(approx (sin th) th))
#s(approx (* (/ (sin ky) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) (sin th)) (.f64 (sqrt.f64 (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(literal -1 binary64))) (.f64 (sin.f64 th) ky)))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (- 1/2 ( 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) (*.f64 (sqrt.f64 (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(literal -1 binary64))) ky)) (sin.f64 th))
(.f64 (/.f64 #s(approx (sin ky) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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)) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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)))))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (pow.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) #s(literal -1/2 binary64))) (sin.f64 ky))) (sin.f64 th))

Outputs

#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 #s(approx (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (/.f64 (sin.f64 th) (sin.f64 kx))) #s(approx (sin ky) ky)))

(*.f64 (/.f64 #s(approx (sin ky) (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (+.f64 (*.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)) #s(approx (pow (sin ky) 2) (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (+.f64 (*.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)))))) (sin.f64 th))

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

Calls

2 calls:

13.0ms	ky
13.0ms	(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))

Results

Accuracy	Segments	Branch
76.1%	3	`ky`
75.7%	3	`(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))`

Compiler

Compiled 14 to 14 computations (0% saved)

regimes17.0ms (0.2%)

Memory

-23.5MiB live, 22.6MiB allocated; 2ms collecting garbage

Counts

51 → 3

Calls

Call 1

Inputs
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (.f64 #s(approx (+ ( (* th th) -1/6) 1) (.f64 (.f64 th th) #s(literal -1/6 binary64))) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (.f64 (+.f64 (.f64 th (*.f64 th #s(literal -1/6 binary64))) #s(literal 1 binary64)) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (.f64 (+.f64 (.f64 (*.f64 th th) #s(literal -1/6 binary64)) #s(literal 1 binary64)) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (.f64 (/.f64 (-.f64 (.f64 (.f64 (.f64 th th) #s(literal -1/6 binary64)) (.f64 (.f64 th th) #s(literal -1/6 binary64))) #s(literal 1 binary64)) (-.f64 (.f64 (.f64 th th) #s(literal -1/6 binary64)) #s(literal 1 binary64))) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (.f64 #s(approx (+ ( (* th th) -1/6) 1) (.f64 (-.f64 (pow.f64 th #s(literal -2 binary64)) #s(literal 1/6 binary64)) (.f64 th th))) th)))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(approx (+ (/ ( -1/2 (* kx kx)) (pow (sin ky) 2)) 1) (/.f64 (.f64 (.f64 kx kx) #s(literal -1/2 binary64)) (*.f64 ky ky)))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (.f64 ky ky))) #s(literal 1 binary64))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(approx (+ (/ ( -1/2 (* kx kx)) (pow (sin ky) 2)) 1) (/.f64 (+.f64 (.f64 (.f64 ky ky) (+.f64 (.f64 #s(literal -1/6 binary64) (.f64 kx kx)) #s(literal 1 binary64))) (.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (*.f64 ky ky)))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) #s(approx (* (+ (* (* th th) -1/6) 1) th) (*.f64 (-.f64 (pow.f64 th #s(literal -2 binary64)) #s(literal 1/6 binary64)) (pow.f64 th #s(literal 3 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx ( (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (/.f64 #s(approx (sin th) th) (sin.f64 kx))) (sin.f64 ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx ( (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (/.f64 (sin.f64 th) #s(approx (sin kx) kx))) (sin.f64 ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx ( (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (/.f64 (sin.f64 th) (sin.f64 kx))) #s(approx (sin ky) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (sin.f64 kx)))
(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (sin.f64 kx))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sin.f64 kx))) #s(approx (sin th) th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) #s(approx (pow (sin ky) -1) (/.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 ky ky) #s(literal -1/6 binary64))) ky))) (sin.f64 ky))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) #s(approx (pow (pow (sin ky) 2) -1/2) (/.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 ky ky) #s(literal -1/6 binary64))) ky))) (sin.f64 ky))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 #s(approx (/ ( -1/2 (* kx kx)) (pow (sin ky) 2)) (/.f64 (+.f64 (.f64 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (+.f64 (-.f64 (.f64 #s(literal 2/135 binary64) (.f64 kx kx)) (.f64 #s(literal -1/3 binary64) (.f64 (.f64 kx kx) #s(literal -1/15 binary64)))) (.f64 #s(literal -1/315 binary64) (.f64 kx kx))) (.f64 ky ky)) (.f64 (.f64 kx kx) #s(literal -1/15 binary64)))) (.f64 ky ky)) (.f64 #s(literal -1/6 binary64) (.f64 kx kx))) (.f64 ky ky)) (.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (*.f64 ky ky))) #s(literal 1 binary64))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 1 binary64))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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)))))) (sin.f64 th))
(.f64 (/.f64 #s(approx (sin ky) ky) (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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)))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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 th) th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (pow.f64 #s(approx (sin ky) 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 #s(approx ( (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (/.f64 (sin.f64 th) (sin.f64 kx))) (sin.f64 ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx ( (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (/.f64 (sin.f64 th) (sin.f64 ky))) (sin.f64 ky)))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sin.f64 kx))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) (sin.f64 ky))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(approx (sin th) th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (*.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 1 binary64))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx ( (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) #s(approx (/ (sin th) (sin kx)) (/.f64 (+.f64 (.f64 (.f64 #s(literal 1/6 binary64) (*.f64 kx kx)) (sin.f64 th)) (sin.f64 th)) kx))) (sin.f64 ky)))
(.f64 (/.f64 #s(approx (sin ky) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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)))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(approx (sin th) th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) #s(approx (sin th) th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (*.f64 kx kx)) (sin.f64 ky)) (sin.f64 ky)))) #s(approx (sin th) th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/3 binary64)) #s(literal 1 binary64)) (*.f64 ky ky)))))) #s(approx (sin th) th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.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 (sin th) th))
(.f64 (/.f64 #s(approx (sin ky) ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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)))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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 th) th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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)))))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (pow.f64 (sin.f64 kx) #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 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (pow.f64 (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 (.f64 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (pow.f64 (sin.f64 kx) #s(literal -1 binary64))) (sin.f64 th)) (sin.f64 ky)))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (pow.f64 (sin.f64 kx) #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 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (pow.f64 (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 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (pow.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) #s(literal -1/2 binary64))) (sin.f64 ky))) #s(approx (sin th) th))
#s(approx (* (/ (sin ky) (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) (sin th)) (.f64 (sqrt.f64 (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(literal -1 binary64))) (.f64 (sin.f64 th) ky)))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (- 1/2 ( 1/2 (cos (* 2 kx)))) (pow (sin ky) 2)))) (*.f64 (sqrt.f64 (pow.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(literal -1 binary64))) ky)) (sin.f64 th))

Outputs

#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 #s(approx (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (/.f64 (sin.f64 th) (sin.f64 kx))) #s(approx (sin ky) ky)))

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

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

Calls

1 calls:

14.0ms

ky

Results

Accuracy	Segments	Branch
75.7%	3	`ky`

Compiler

Compiled 1 to 3 computations (-200% saved)

regimes65.0ms (0.9%)

Memory

2.5MiB live, 95.4MiB allocated; 4ms collecting garbage

Counts

40 → 3

Calls

Call 1

Inputs
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (.f64 #s(approx (+ ( (* th th) -1/6) 1) (.f64 (.f64 th th) #s(literal -1/6 binary64))) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (.f64 (+.f64 (.f64 th (*.f64 th #s(literal -1/6 binary64))) #s(literal 1 binary64)) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (.f64 (+.f64 (.f64 (*.f64 th th) #s(literal -1/6 binary64)) #s(literal 1 binary64)) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (.f64 (/.f64 (-.f64 (.f64 (.f64 (.f64 th th) #s(literal -1/6 binary64)) (.f64 (.f64 th th) #s(literal -1/6 binary64))) #s(literal 1 binary64)) (-.f64 (.f64 (.f64 th th) #s(literal -1/6 binary64)) #s(literal 1 binary64))) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (.f64 #s(approx (+ ( (* th th) -1/6) 1) (.f64 (-.f64 (pow.f64 th #s(literal -2 binary64)) #s(literal 1/6 binary64)) (.f64 th th))) th)))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(approx (+ (/ ( -1/2 (* kx kx)) (pow (sin ky) 2)) 1) (/.f64 (.f64 (.f64 kx kx) #s(literal -1/2 binary64)) (*.f64 ky ky)))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (.f64 ky ky))) #s(literal 1 binary64))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(approx (+ (/ ( -1/2 (* kx kx)) (pow (sin ky) 2)) 1) (/.f64 (+.f64 (.f64 (.f64 ky ky) (+.f64 (.f64 #s(literal -1/6 binary64) (.f64 kx kx)) #s(literal 1 binary64))) (.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (*.f64 ky ky)))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) #s(approx (* (+ (* (* th th) -1/6) 1) th) (*.f64 (-.f64 (pow.f64 th #s(literal -2 binary64)) #s(literal 1/6 binary64)) (pow.f64 th #s(literal 3 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx ( (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (/.f64 #s(approx (sin th) th) (sin.f64 kx))) (sin.f64 ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx ( (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (/.f64 (sin.f64 th) #s(approx (sin kx) kx))) (sin.f64 ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx ( (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (/.f64 (sin.f64 th) (sin.f64 kx))) #s(approx (sin ky) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (sin.f64 kx)))
(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (sin.f64 kx))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sin.f64 kx))) #s(approx (sin th) th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) #s(approx (pow (sin ky) -1) (/.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 ky ky) #s(literal -1/6 binary64))) ky))) (sin.f64 ky))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) #s(approx (pow (pow (sin ky) 2) -1/2) (/.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 ky ky) #s(literal -1/6 binary64))) ky))) (sin.f64 ky))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 #s(approx (/ ( -1/2 (* kx kx)) (pow (sin ky) 2)) (/.f64 (+.f64 (.f64 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (+.f64 (-.f64 (.f64 #s(literal 2/135 binary64) (.f64 kx kx)) (.f64 #s(literal -1/3 binary64) (.f64 (.f64 kx kx) #s(literal -1/15 binary64)))) (.f64 #s(literal -1/315 binary64) (.f64 kx kx))) (.f64 ky ky)) (.f64 (.f64 kx kx) #s(literal -1/15 binary64)))) (.f64 ky ky)) (.f64 #s(literal -1/6 binary64) (.f64 kx kx))) (.f64 ky ky)) (.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (*.f64 ky ky))) #s(literal 1 binary64))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 1 binary64))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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)))))) (sin.f64 th))
(.f64 (/.f64 #s(approx (sin ky) ky) (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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)))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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 th) th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (pow.f64 #s(approx (sin ky) 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 #s(approx ( (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (/.f64 (sin.f64 th) (sin.f64 kx))) (sin.f64 ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx ( (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (/.f64 (sin.f64 th) (sin.f64 ky))) (sin.f64 ky)))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sin.f64 kx))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) (sin.f64 ky))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(approx (sin th) th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (*.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 1 binary64))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx ( (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) #s(approx (/ (sin th) (sin kx)) (/.f64 (+.f64 (.f64 (.f64 #s(literal 1/6 binary64) (*.f64 kx kx)) (sin.f64 th)) (sin.f64 th)) kx))) (sin.f64 ky)))
(.f64 (/.f64 #s(approx (sin ky) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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)))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(approx (sin th) th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) #s(approx (sin th) th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (*.f64 kx kx)) (sin.f64 ky)) (sin.f64 ky)))) #s(approx (sin th) th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (.f64 ky ky) #s(literal -1/3 binary64)) #s(literal 1 binary64)) (*.f64 ky ky)))))) #s(approx (sin th) th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.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 (sin th) th))

Outputs

(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (sin.f64 kx))) (sin.f64 th))

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

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

Calls

6 calls:

12.0ms	(sin.f64 kx)
11.0ms	kx
10.0ms	(sin.f64 ky)
10.0ms	ky
10.0ms	(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))

Results

Accuracy	Segments	Branch
59.6%	3	`(sin.f64 kx)`
71.6%	4	`(sin.f64 ky)`
59.9%	4	`(pow.f64 (sin.f64 kx) #s(literal 2 binary64))`
59.9%	4	`kx`
69.1%	4	`(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))`
71.7%	3	`ky`

Compiler

Compiled 23 to 31 computations (-34.8% saved)

regimes61.0ms (0.8%)

Memory

-14.7MiB live, 80.7MiB allocated; 6ms collecting garbage

Counts

36 → 4

Calls

Call 1

Inputs
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (.f64 #s(approx (+ ( (* th th) -1/6) 1) (.f64 (.f64 th th) #s(literal -1/6 binary64))) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (.f64 (+.f64 (.f64 th (*.f64 th #s(literal -1/6 binary64))) #s(literal 1 binary64)) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (.f64 (+.f64 (.f64 (*.f64 th th) #s(literal -1/6 binary64)) #s(literal 1 binary64)) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (.f64 (/.f64 (-.f64 (.f64 (.f64 (.f64 th th) #s(literal -1/6 binary64)) (.f64 (.f64 th th) #s(literal -1/6 binary64))) #s(literal 1 binary64)) (-.f64 (.f64 (.f64 th th) #s(literal -1/6 binary64)) #s(literal 1 binary64))) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (.f64 #s(approx (+ ( (* th th) -1/6) 1) (.f64 (-.f64 (pow.f64 th #s(literal -2 binary64)) #s(literal 1/6 binary64)) (.f64 th th))) th)))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(approx (+ (/ ( -1/2 (* kx kx)) (pow (sin ky) 2)) 1) (/.f64 (.f64 (.f64 kx kx) #s(literal -1/2 binary64)) (*.f64 ky ky)))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (.f64 ky ky))) #s(literal 1 binary64))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(approx (+ (/ ( -1/2 (* kx kx)) (pow (sin ky) 2)) 1) (/.f64 (+.f64 (.f64 (.f64 ky ky) (+.f64 (.f64 #s(literal -1/6 binary64) (.f64 kx kx)) #s(literal 1 binary64))) (.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (*.f64 ky ky)))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) #s(approx (* (+ (* (* th th) -1/6) 1) th) (*.f64 (-.f64 (pow.f64 th #s(literal -2 binary64)) #s(literal 1/6 binary64)) (pow.f64 th #s(literal 3 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx ( (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (/.f64 #s(approx (sin th) th) (sin.f64 kx))) (sin.f64 ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx ( (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (/.f64 (sin.f64 th) #s(approx (sin kx) kx))) (sin.f64 ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx ( (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (/.f64 (sin.f64 th) (sin.f64 kx))) #s(approx (sin ky) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (sin.f64 kx)))
(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (sin.f64 kx))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sin.f64 kx))) #s(approx (sin th) th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) #s(approx (pow (sin ky) -1) (/.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 ky ky) #s(literal -1/6 binary64))) ky))) (sin.f64 ky))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) #s(approx (pow (pow (sin ky) 2) -1/2) (/.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 ky ky) #s(literal -1/6 binary64))) ky))) (sin.f64 ky))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 #s(approx (/ ( -1/2 (* kx kx)) (pow (sin ky) 2)) (/.f64 (+.f64 (.f64 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (+.f64 (-.f64 (.f64 #s(literal 2/135 binary64) (.f64 kx kx)) (.f64 #s(literal -1/3 binary64) (.f64 (.f64 kx kx) #s(literal -1/15 binary64)))) (.f64 #s(literal -1/315 binary64) (.f64 kx kx))) (.f64 ky ky)) (.f64 (.f64 kx kx) #s(literal -1/15 binary64)))) (.f64 ky ky)) (.f64 #s(literal -1/6 binary64) (.f64 kx kx))) (.f64 ky ky)) (.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (*.f64 ky ky))) #s(literal 1 binary64))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 1 binary64))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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)))))) (sin.f64 th))
(.f64 (/.f64 #s(approx (sin ky) ky) (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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)))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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 th) th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (pow.f64 #s(approx (sin ky) 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 #s(approx ( (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (/.f64 (sin.f64 th) (sin.f64 kx))) (sin.f64 ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx ( (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (/.f64 (sin.f64 th) (sin.f64 ky))) (sin.f64 ky)))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sin.f64 kx))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) (sin.f64 ky))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(approx (sin th) th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (*.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 1 binary64))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx ( (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) #s(approx (/ (sin th) (sin kx)) (/.f64 (+.f64 (.f64 (.f64 #s(literal 1/6 binary64) (*.f64 kx kx)) (sin.f64 th)) (sin.f64 th)) kx))) (sin.f64 ky)))
(.f64 (/.f64 #s(approx (sin ky) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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)))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(approx (sin th) th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) #s(approx (sin th) th))

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

Calls

6 calls:

11.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))
9.0ms	(sin.f64 ky)
9.0ms	(sin.f64 th)
9.0ms	ky
9.0ms	th

Results

Accuracy	Segments	Branch
64.8%	4	`(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))`
49.0%	3	`(sin.f64 th)`
67.3%	4	`(sin.f64 ky)`
56.3%	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))`
50.0%	3	`th`
62.6%	3	`ky`

Compiler

Compiled 35 to 38 computations (-8.6% saved)

regimes10.0ms (0.1%)

Memory

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

Counts

30 → 3

Calls

Call 1

Inputs
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (.f64 #s(approx (+ ( (* th th) -1/6) 1) (.f64 (.f64 th th) #s(literal -1/6 binary64))) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (.f64 (+.f64 (.f64 th (*.f64 th #s(literal -1/6 binary64))) #s(literal 1 binary64)) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (.f64 (+.f64 (.f64 (*.f64 th th) #s(literal -1/6 binary64)) #s(literal 1 binary64)) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (.f64 (/.f64 (-.f64 (.f64 (.f64 (.f64 th th) #s(literal -1/6 binary64)) (.f64 (.f64 th th) #s(literal -1/6 binary64))) #s(literal 1 binary64)) (-.f64 (.f64 (.f64 th th) #s(literal -1/6 binary64)) #s(literal 1 binary64))) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (.f64 #s(approx (+ ( (* th th) -1/6) 1) (.f64 (-.f64 (pow.f64 th #s(literal -2 binary64)) #s(literal 1/6 binary64)) (.f64 th th))) th)))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(approx (+ (/ ( -1/2 (* kx kx)) (pow (sin ky) 2)) 1) (/.f64 (.f64 (.f64 kx kx) #s(literal -1/2 binary64)) (*.f64 ky ky)))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (.f64 ky ky))) #s(literal 1 binary64))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(approx (+ (/ ( -1/2 (* kx kx)) (pow (sin ky) 2)) 1) (/.f64 (+.f64 (.f64 (.f64 ky ky) (+.f64 (.f64 #s(literal -1/6 binary64) (.f64 kx kx)) #s(literal 1 binary64))) (.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (*.f64 ky ky)))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) #s(approx (* (+ (* (* th th) -1/6) 1) th) (*.f64 (-.f64 (pow.f64 th #s(literal -2 binary64)) #s(literal 1/6 binary64)) (pow.f64 th #s(literal 3 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx ( (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (/.f64 #s(approx (sin th) th) (sin.f64 kx))) (sin.f64 ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx ( (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (/.f64 (sin.f64 th) #s(approx (sin kx) kx))) (sin.f64 ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx ( (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (/.f64 (sin.f64 th) (sin.f64 kx))) #s(approx (sin ky) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (sin.f64 kx)))
(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (sin.f64 kx))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sin.f64 kx))) #s(approx (sin th) th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) #s(approx (pow (sin ky) -1) (/.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 ky ky) #s(literal -1/6 binary64))) ky))) (sin.f64 ky))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) #s(approx (pow (pow (sin ky) 2) -1/2) (/.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 ky ky) #s(literal -1/6 binary64))) ky))) (sin.f64 ky))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 #s(approx (/ ( -1/2 (* kx kx)) (pow (sin ky) 2)) (/.f64 (+.f64 (.f64 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (+.f64 (-.f64 (.f64 #s(literal 2/135 binary64) (.f64 kx kx)) (.f64 #s(literal -1/3 binary64) (.f64 (.f64 kx kx) #s(literal -1/15 binary64)))) (.f64 #s(literal -1/315 binary64) (.f64 kx kx))) (.f64 ky ky)) (.f64 (.f64 kx kx) #s(literal -1/15 binary64)))) (.f64 ky ky)) (.f64 #s(literal -1/6 binary64) (.f64 kx kx))) (.f64 ky ky)) (.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (*.f64 ky ky))) #s(literal 1 binary64))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 1 binary64))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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)))))) (sin.f64 th))
(.f64 (/.f64 #s(approx (sin ky) ky) (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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)))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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 th) th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (pow.f64 #s(approx (sin ky) 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 #s(approx ( (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (/.f64 (sin.f64 th) (sin.f64 kx))) (sin.f64 ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx ( (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (/.f64 (sin.f64 th) (sin.f64 ky))) (sin.f64 ky)))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sin.f64 kx))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (/.f64 #s(literal 1 binary64) (sin.f64 ky))) (sin.f64 ky))) (sin.f64 th))

Outputs

(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sin.f64 kx))) (sin.f64 th))

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

#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th))

Calls

1 calls:

8.0ms

(sin.f64 ky)

Results

Accuracy	Segments	Branch
63.5%	3	`(sin.f64 ky)`

Compiler

Compiled 2 to 4 computations (-100% saved)

regimes9.0ms (0.1%)

Memory

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

Counts

28 → 3

Calls

Call 1

Inputs
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (.f64 #s(approx (+ ( (* th th) -1/6) 1) (.f64 (.f64 th th) #s(literal -1/6 binary64))) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (.f64 (+.f64 (.f64 th (*.f64 th #s(literal -1/6 binary64))) #s(literal 1 binary64)) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (.f64 (+.f64 (.f64 (*.f64 th th) #s(literal -1/6 binary64)) #s(literal 1 binary64)) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (.f64 (/.f64 (-.f64 (.f64 (.f64 (.f64 th th) #s(literal -1/6 binary64)) (.f64 (.f64 th th) #s(literal -1/6 binary64))) #s(literal 1 binary64)) (-.f64 (.f64 (.f64 th th) #s(literal -1/6 binary64)) #s(literal 1 binary64))) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (.f64 #s(approx (+ ( (* th th) -1/6) 1) (.f64 (-.f64 (pow.f64 th #s(literal -2 binary64)) #s(literal 1/6 binary64)) (.f64 th th))) th)))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(approx (+ (/ ( -1/2 (* kx kx)) (pow (sin ky) 2)) 1) (/.f64 (.f64 (.f64 kx kx) #s(literal -1/2 binary64)) (*.f64 ky ky)))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (.f64 ky ky))) #s(literal 1 binary64))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(approx (+ (/ ( -1/2 (* kx kx)) (pow (sin ky) 2)) 1) (/.f64 (+.f64 (.f64 (.f64 ky ky) (+.f64 (.f64 #s(literal -1/6 binary64) (.f64 kx kx)) #s(literal 1 binary64))) (.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (*.f64 ky ky)))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) #s(approx (* (+ (* (* th th) -1/6) 1) th) (*.f64 (-.f64 (pow.f64 th #s(literal -2 binary64)) #s(literal 1/6 binary64)) (pow.f64 th #s(literal 3 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx ( (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (/.f64 #s(approx (sin th) th) (sin.f64 kx))) (sin.f64 ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx ( (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (/.f64 (sin.f64 th) #s(approx (sin kx) kx))) (sin.f64 ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx ( (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (/.f64 (sin.f64 th) (sin.f64 kx))) #s(approx (sin ky) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (sin.f64 kx)))
(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (sin.f64 kx))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sin.f64 kx))) #s(approx (sin th) th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) #s(approx (pow (sin ky) -1) (/.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 ky ky) #s(literal -1/6 binary64))) ky))) (sin.f64 ky))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) #s(approx (pow (pow (sin ky) 2) -1/2) (/.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 ky ky) #s(literal -1/6 binary64))) ky))) (sin.f64 ky))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 #s(approx (/ ( -1/2 (* kx kx)) (pow (sin ky) 2)) (/.f64 (+.f64 (.f64 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (+.f64 (-.f64 (.f64 #s(literal 2/135 binary64) (.f64 kx kx)) (.f64 #s(literal -1/3 binary64) (.f64 (.f64 kx kx) #s(literal -1/15 binary64)))) (.f64 #s(literal -1/315 binary64) (.f64 kx kx))) (.f64 ky ky)) (.f64 (.f64 kx kx) #s(literal -1/15 binary64)))) (.f64 ky ky)) (.f64 #s(literal -1/6 binary64) (.f64 kx kx))) (.f64 ky ky)) (.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (*.f64 ky ky))) #s(literal 1 binary64))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 1 binary64))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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)))))) (sin.f64 th))
(.f64 (/.f64 #s(approx (sin ky) ky) (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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)))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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 th) th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (pow.f64 #s(approx (sin ky) 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 #s(approx ( (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (/.f64 (sin.f64 th) (sin.f64 kx))) (sin.f64 ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx ( (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (/.f64 (sin.f64 th) (sin.f64 ky))) (sin.f64 ky)))

Outputs

#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 #s(approx (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (/.f64 (sin.f64 th) (sin.f64 kx))) (sin.f64 ky)))

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

#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th))

Calls

1 calls:

8.0ms

(sin.f64 ky)

Results

Accuracy	Segments	Branch
63.5%	3	`(sin.f64 ky)`

Compiler

Compiled 2 to 4 computations (-100% saved)

regimes24.0ms (0.3%)

Memory

-14.0MiB live, 32.3MiB allocated; 3ms collecting garbage

Counts

26 → 3

Calls

Call 1

Inputs
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (.f64 #s(approx (+ ( (* th th) -1/6) 1) (.f64 (.f64 th th) #s(literal -1/6 binary64))) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (.f64 (+.f64 (.f64 th (*.f64 th #s(literal -1/6 binary64))) #s(literal 1 binary64)) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (.f64 (+.f64 (.f64 (*.f64 th th) #s(literal -1/6 binary64)) #s(literal 1 binary64)) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (.f64 (/.f64 (-.f64 (.f64 (.f64 (.f64 th th) #s(literal -1/6 binary64)) (.f64 (.f64 th th) #s(literal -1/6 binary64))) #s(literal 1 binary64)) (-.f64 (.f64 (.f64 th th) #s(literal -1/6 binary64)) #s(literal 1 binary64))) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (.f64 #s(approx (+ ( (* th th) -1/6) 1) (.f64 (-.f64 (pow.f64 th #s(literal -2 binary64)) #s(literal 1/6 binary64)) (.f64 th th))) th)))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(approx (+ (/ ( -1/2 (* kx kx)) (pow (sin ky) 2)) 1) (/.f64 (.f64 (.f64 kx kx) #s(literal -1/2 binary64)) (*.f64 ky ky)))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (.f64 ky ky))) #s(literal 1 binary64))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(approx (+ (/ ( -1/2 (* kx kx)) (pow (sin ky) 2)) 1) (/.f64 (+.f64 (.f64 (.f64 ky ky) (+.f64 (.f64 #s(literal -1/6 binary64) (.f64 kx kx)) #s(literal 1 binary64))) (.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (*.f64 ky ky)))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) #s(approx (* (+ (* (* th th) -1/6) 1) th) (*.f64 (-.f64 (pow.f64 th #s(literal -2 binary64)) #s(literal 1/6 binary64)) (pow.f64 th #s(literal 3 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx ( (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (/.f64 #s(approx (sin th) th) (sin.f64 kx))) (sin.f64 ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx ( (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (/.f64 (sin.f64 th) #s(approx (sin kx) kx))) (sin.f64 ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx ( (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (/.f64 (sin.f64 th) (sin.f64 kx))) #s(approx (sin ky) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (sin.f64 kx)))
(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (sin.f64 kx))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sin.f64 kx))) #s(approx (sin th) th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) #s(approx (pow (sin ky) -1) (/.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 ky ky) #s(literal -1/6 binary64))) ky))) (sin.f64 ky))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) #s(approx (pow (pow (sin ky) 2) -1/2) (/.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 ky ky) #s(literal -1/6 binary64))) ky))) (sin.f64 ky))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 #s(approx (/ ( -1/2 (* kx kx)) (pow (sin ky) 2)) (/.f64 (+.f64 (.f64 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (+.f64 (-.f64 (.f64 #s(literal 2/135 binary64) (.f64 kx kx)) (.f64 #s(literal -1/3 binary64) (.f64 (.f64 kx kx) #s(literal -1/15 binary64)))) (.f64 #s(literal -1/315 binary64) (.f64 kx kx))) (.f64 ky ky)) (.f64 (.f64 kx kx) #s(literal -1/15 binary64)))) (.f64 ky ky)) (.f64 #s(literal -1/6 binary64) (.f64 kx kx))) (.f64 ky ky)) (.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (*.f64 ky ky))) #s(literal 1 binary64))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 1 binary64))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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)))))) (sin.f64 th))
(.f64 (/.f64 #s(approx (sin ky) ky) (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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)))))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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 th) th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (pow.f64 #s(approx (sin ky) ky) #s(literal -1 binary64))) (sin.f64 ky))) (sin.f64 th))

Outputs

(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (sin.f64 kx))) (sin.f64 th))

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

#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th))

Calls

3 calls:

8.0ms	(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
7.0ms	(sin.f64 ky)
7.0ms	ky

Results

Accuracy	Segments	Branch
62.3%	3	`ky`
57.7%	2	`(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))`
62.3%	3	`(sin.f64 ky)`

Compiler

Compiled 16 to 18 computations (-12.5% saved)

regimes28.0ms (0.4%)

Memory

-6.0MiB live, 40.4MiB allocated; 2ms collecting garbage

Counts

23 → 2

Calls

Call 1

Inputs
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (.f64 #s(approx (+ ( (* th th) -1/6) 1) (.f64 (.f64 th th) #s(literal -1/6 binary64))) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (.f64 (+.f64 (.f64 th (*.f64 th #s(literal -1/6 binary64))) #s(literal 1 binary64)) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (.f64 (+.f64 (.f64 (*.f64 th th) #s(literal -1/6 binary64)) #s(literal 1 binary64)) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (.f64 (/.f64 (-.f64 (.f64 (.f64 (.f64 th th) #s(literal -1/6 binary64)) (.f64 (.f64 th th) #s(literal -1/6 binary64))) #s(literal 1 binary64)) (-.f64 (.f64 (.f64 th th) #s(literal -1/6 binary64)) #s(literal 1 binary64))) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (.f64 #s(approx (+ ( (* th th) -1/6) 1) (.f64 (-.f64 (pow.f64 th #s(literal -2 binary64)) #s(literal 1/6 binary64)) (.f64 th th))) th)))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(approx (+ (/ ( -1/2 (* kx kx)) (pow (sin ky) 2)) 1) (/.f64 (.f64 (.f64 kx kx) #s(literal -1/2 binary64)) (*.f64 ky ky)))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (.f64 ky ky))) #s(literal 1 binary64))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(approx (+ (/ ( -1/2 (* kx kx)) (pow (sin ky) 2)) 1) (/.f64 (+.f64 (.f64 (.f64 ky ky) (+.f64 (.f64 #s(literal -1/6 binary64) (.f64 kx kx)) #s(literal 1 binary64))) (.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (*.f64 ky ky)))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) #s(approx (* (+ (* (* th th) -1/6) 1) th) (*.f64 (-.f64 (pow.f64 th #s(literal -2 binary64)) #s(literal 1/6 binary64)) (pow.f64 th #s(literal 3 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx ( (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (/.f64 #s(approx (sin th) th) (sin.f64 kx))) (sin.f64 ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx ( (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (/.f64 (sin.f64 th) #s(approx (sin kx) kx))) (sin.f64 ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx ( (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (/.f64 (sin.f64 th) (sin.f64 kx))) #s(approx (sin ky) ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (/.f64 (*.f64 (sin.f64 th) ky) (sin.f64 kx)))
(*.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (sin.f64 kx))) (sin.f64 th))
(*.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sin.f64 kx))) #s(approx (sin th) th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (pow (sin ky) 2) (.f64 ky ky))))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) #s(approx (pow (sin ky) -1) (/.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 ky ky) #s(literal -1/6 binary64))) ky))) (sin.f64 ky))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 #s(approx (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) #s(approx (pow (pow (sin ky) 2) -1/2) (/.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 ky ky) #s(literal -1/6 binary64))) ky))) (sin.f64 ky))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 #s(approx (/ ( -1/2 (* kx kx)) (pow (sin ky) 2)) (/.f64 (+.f64 (.f64 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (+.f64 (-.f64 (.f64 #s(literal 2/135 binary64) (.f64 kx kx)) (.f64 #s(literal -1/3 binary64) (.f64 (.f64 kx kx) #s(literal -1/15 binary64)))) (.f64 #s(literal -1/315 binary64) (.f64 kx kx))) (.f64 ky ky)) (.f64 (.f64 kx kx) #s(literal -1/15 binary64)))) (.f64 ky ky)) (.f64 #s(literal -1/6 binary64) (.f64 kx kx))) (.f64 ky ky)) (.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (*.f64 ky ky))) #s(literal 1 binary64))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 1 binary64))) (sin.f64 th))
(.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 #s(approx (pow (sin kx) 2) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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)))))) (sin.f64 th))

Outputs

#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 #s(approx (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (/.f64 (sin.f64 th) (sin.f64 kx))) #s(approx (sin ky) ky)))

#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th))

Calls

4 calls:

7.0ms	(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
6.0ms	(sin.f64 ky)
6.0ms	(sin.f64 kx)
6.0ms	ky

Results

Accuracy	Segments	Branch
57.1%	2	`(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))`
48.8%	3	`(sin.f64 kx)`
52.1%	2	`(sin.f64 ky)`
52.1%	2	`ky`

Compiler

Compiled 18 to 22 computations (-22.2% saved)

regimes25.0ms (0.3%)

Memory

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

Counts

13 → 2

Calls

Call 1

Inputs
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (.f64 #s(approx (+ ( (* th th) -1/6) 1) (.f64 (.f64 th th) #s(literal -1/6 binary64))) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (.f64 (+.f64 (.f64 th (*.f64 th #s(literal -1/6 binary64))) #s(literal 1 binary64)) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (.f64 (+.f64 (.f64 (*.f64 th th) #s(literal -1/6 binary64)) #s(literal 1 binary64)) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (.f64 (/.f64 (-.f64 (.f64 (.f64 (.f64 th th) #s(literal -1/6 binary64)) (.f64 (.f64 th th) #s(literal -1/6 binary64))) #s(literal 1 binary64)) (-.f64 (.f64 (.f64 th th) #s(literal -1/6 binary64)) #s(literal 1 binary64))) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (.f64 #s(approx (+ ( (* th th) -1/6) 1) (.f64 (-.f64 (pow.f64 th #s(literal -2 binary64)) #s(literal 1/6 binary64)) (.f64 th th))) th)))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(approx (+ (/ ( -1/2 (* kx kx)) (pow (sin ky) 2)) 1) (/.f64 (.f64 (.f64 kx kx) #s(literal -1/2 binary64)) (*.f64 ky ky)))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (.f64 ky ky))) #s(literal 1 binary64))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(approx (+ (/ ( -1/2 (* kx kx)) (pow (sin ky) 2)) 1) (/.f64 (+.f64 (.f64 (.f64 ky ky) (+.f64 (.f64 #s(literal -1/6 binary64) (.f64 kx kx)) #s(literal 1 binary64))) (.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (*.f64 ky ky)))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) #s(approx (* (+ (* (* th th) -1/6) 1) th) (*.f64 (-.f64 (pow.f64 th #s(literal -2 binary64)) #s(literal 1/6 binary64)) (pow.f64 th #s(literal 3 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx ( (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (/.f64 #s(approx (sin th) th) (sin.f64 kx))) (sin.f64 ky)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx ( (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (/.f64 (sin.f64 th) #s(approx (sin kx) kx))) (sin.f64 ky)))

Outputs

#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 #s(approx (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (/.f64 (sin.f64 th) #s(approx (sin kx) kx))) (sin.f64 ky)))

#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th))

Calls

6 calls:

4.0ms	(sin.f64 ky)
4.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))
4.0ms	(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
4.0ms	kx
4.0ms	ky

Results

Accuracy	Segments	Branch
44.8%	3	`(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))`
47.9%	2	`(sin.f64 ky)`
47.3%	2	`ky`
41.5%	2	`kx`
41.5%	2	`(pow.f64 (sin.f64 kx) #s(literal 2 binary64))`
50.3%	2	`(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))`

Compiler

Compiled 37 to 40 computations (-8.1% saved)

regimes76.0ms (1%)

Memory

-22.6MiB live, 20.2MiB allocated; 78ms collecting garbage

Counts

12 → 2

Calls

Call 1

Inputs
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (.f64 #s(approx (+ ( (* th th) -1/6) 1) (.f64 (.f64 th th) #s(literal -1/6 binary64))) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (.f64 (+.f64 (.f64 th (*.f64 th #s(literal -1/6 binary64))) #s(literal 1 binary64)) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (.f64 (+.f64 (.f64 (*.f64 th th) #s(literal -1/6 binary64)) #s(literal 1 binary64)) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (.f64 (/.f64 (-.f64 (.f64 (.f64 (.f64 th th) #s(literal -1/6 binary64)) (.f64 (.f64 th th) #s(literal -1/6 binary64))) #s(literal 1 binary64)) (-.f64 (.f64 (.f64 th th) #s(literal -1/6 binary64)) #s(literal 1 binary64))) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (.f64 #s(approx (+ ( (* th th) -1/6) 1) (.f64 (-.f64 (pow.f64 th #s(literal -2 binary64)) #s(literal 1/6 binary64)) (.f64 th th))) th)))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(approx (+ (/ ( -1/2 (* kx kx)) (pow (sin ky) 2)) 1) (/.f64 (.f64 (.f64 kx kx) #s(literal -1/2 binary64)) (*.f64 ky ky)))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (.f64 ky ky))) #s(literal 1 binary64))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(approx (+ (/ ( -1/2 (* kx kx)) (pow (sin ky) 2)) 1) (/.f64 (+.f64 (.f64 (.f64 ky ky) (+.f64 (.f64 #s(literal -1/6 binary64) (.f64 kx kx)) #s(literal 1 binary64))) (.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (*.f64 ky ky)))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) #s(approx (* (+ (* (* th th) -1/6) 1) th) (*.f64 (-.f64 (pow.f64 th #s(literal -2 binary64)) #s(literal 1/6 binary64)) (pow.f64 th #s(literal 3 binary64))))))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx ( (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (/.f64 #s(approx (sin th) th) (sin.f64 kx))) (sin.f64 ky)))

Outputs

#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (*.f64 #s(approx (* (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (/.f64 #s(approx (sin th) th) (sin.f64 kx))) (sin.f64 ky)))

#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th))

Calls

3 calls:

4.0ms	(sin.f64 ky)
4.0ms	(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
4.0ms	th

Results

Accuracy	Segments	Branch
43.0%	2	`(sin.f64 ky)`
40.3%	2	`th`
47.7%	2	`(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))`

Compiler

Compiled 16 to 18 computations (-12.5% saved)

regimes25.0ms (0.3%)

Memory

-20.4MiB live, 32.8MiB allocated; 6ms collecting garbage

Counts

11 → 2

Calls

Call 1

Inputs
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (.f64 #s(approx (+ ( (* th th) -1/6) 1) (.f64 (.f64 th th) #s(literal -1/6 binary64))) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (.f64 (+.f64 (.f64 th (*.f64 th #s(literal -1/6 binary64))) #s(literal 1 binary64)) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (.f64 (+.f64 (.f64 (*.f64 th th) #s(literal -1/6 binary64)) #s(literal 1 binary64)) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (.f64 (/.f64 (-.f64 (.f64 (.f64 (.f64 th th) #s(literal -1/6 binary64)) (.f64 (.f64 th th) #s(literal -1/6 binary64))) #s(literal 1 binary64)) (-.f64 (.f64 (.f64 th th) #s(literal -1/6 binary64)) #s(literal 1 binary64))) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (.f64 #s(approx (+ ( (* th th) -1/6) 1) (.f64 (-.f64 (pow.f64 th #s(literal -2 binary64)) #s(literal 1/6 binary64)) (.f64 th th))) th)))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(approx (+ (/ ( -1/2 (* kx kx)) (pow (sin ky) 2)) 1) (/.f64 (.f64 (.f64 kx kx) #s(literal -1/2 binary64)) (*.f64 ky ky)))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 kx kx)) #s(approx (pow (sin ky) 2) (.f64 ky ky))) #s(literal 1 binary64))) (sin.f64 th))
(.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(approx (+ (/ ( -1/2 (* kx kx)) (pow (sin ky) 2)) 1) (/.f64 (+.f64 (.f64 (.f64 ky ky) (+.f64 (.f64 #s(literal -1/6 binary64) (.f64 kx kx)) #s(literal 1 binary64))) (.f64 (.f64 kx kx) #s(literal -1/2 binary64))) (*.f64 ky ky)))) (sin.f64 th))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) #s(approx (* (+ (* (* th th) -1/6) 1) th) (*.f64 (-.f64 (pow.f64 th #s(literal -2 binary64)) #s(literal 1/6 binary64)) (pow.f64 th #s(literal 3 binary64))))))

Outputs

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

#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th))

Calls

6 calls:

7.0ms	(sin.f64 ky)
3.0ms	ky
3.0ms	(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
3.0ms	(sin.f64 th)
3.0ms	(sin.f64 kx)

Results

Accuracy	Segments	Branch
38.4%	2	`(sin.f64 ky)`
42.5%	3	`(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))`
36.8%	2	`(sin.f64 kx)`
38.1%	2	`ky`
38.4%	3	`(sin.f64 th)`
42.2%	2	`(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))`

Compiler

Compiled 36 to 39 computations (-8.3% saved)

regimes19.0ms (0.3%)

Memory

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

Counts

5 → 2

Calls

Call 1

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

Outputs

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

#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) th))

Calls

9 calls:

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	(/.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)))))
2.0ms	(sin.f64 ky)
2.0ms	ky
2.0ms	kx

Results

Accuracy	Segments	Branch
21.3%	3	`(sin.f64 kx)`
19.5%	2	`(sin.f64 th)`
21.5%	2	`ky`
21.6%	2	`(sin.f64 ky)`
19.4%	2	`th`
24.8%	2	`(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))`
21.1%	2	`(pow.f64 (sin.f64 kx) #s(literal 2 binary64))`
21.1%	2	`kx`
24.2%	2	`(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))`

Compiler

Compiled 42 to 51 computations (-21.4% saved)

regimes11.0ms (0.2%)

Memory

-25.0MiB live, 21.6MiB allocated; 2ms collecting garbage

Accuracy

Total -0.0b remaining (-0%)

Threshold costs -0b (-0%)

Counts

1 → 1

Calls

Call 1

Inputs
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) th))

Outputs
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) th))

Calls

9 calls:

2.0ms	kx
1.0ms	(*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))
1.0ms	(/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
1.0ms	(sin.f64 ky)
1.0ms	ky

Results

Accuracy	Segments	Branch
15.5%	1	`th`
15.5%	1	`(sin.f64 th)`
15.5%	1	`(sin.f64 kx)`
15.5%	1	`(pow.f64 (sin.f64 kx) #s(literal 2 binary64))`
15.5%	1	`kx`
15.5%	1	`ky`
15.5%	1	`(sin.f64 ky)`
15.5%	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)))))`
15.5%	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))`

Compiler

Compiled 42 to 51 computations (-21.4% saved)

bsearch1.0ms (0%)

Memory

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

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	1.0	+inf

Compiler

Compiled 19 to 19 computations (0% saved)

bsearch42.0ms (0.6%)

Memory

1.8MiB live, 47.6MiB allocated; 2ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
18.0ms	1.0314094668836208e-33	1.1104529804879499e-32
21.0ms	3.376177235125605e-267	2.0826027575571635e-264

Samples

29.0ms

224×

valid

Compiler

Compiled 1 063 to 726 computations (31.7% saved)

Precisions

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

ival-sin: 12.0ms (52.8% of total)

ival-pow2: 4.0ms (17.6% of total)

ival-mult: 3.0ms (13.2% of total)

ival-div: 1.0ms (4.4% of total)

ival-add: 1.0ms (4.4% of total)

ival-sqrt: 1.0ms (4.4% of total)

adjust: 0.0ms (0% of total)

ival-assert: 0.0ms (0% of total)

ival-true: 0.0ms (0% of total)

bsearch1.0ms (0%)

Memory

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

Algorithm

4×	left-value

Steps

Time	Left	Right
0.0ms	0.9922559348859602	0.9978939972364322
0.0ms	0.2948833628562131	0.35037762955793433
0.0ms	-0.2864212011949075	4.180536945478153e-307
0.0ms	-0.9914661904329366	-0.9533098782433003

Compiler

Compiled 19 to 19 computations (0% saved)

bsearch1.0ms (0%)

Memory

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

Algorithm

4×	left-value

Steps

Time	Left	Right
0.0ms	0.9922559348859602	0.9978939972364322
0.0ms	0.2948833628562131	0.35037762955793433
0.0ms	-0.2864212011949075	4.180536945478153e-307
0.0ms	-0.9914661904329366	-0.9533098782433003

Compiler

Compiled 19 to 19 computations (0% saved)

bsearch1.0ms (0%)

Memory

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

Algorithm

4×	left-value

Steps

Time	Left	Right
0.0ms	0.9922559348859602	0.9978939972364322
0.0ms	0.2948833628562131	0.35037762955793433
0.0ms	-0.2864212011949075	4.180536945478153e-307
0.0ms	-0.9914661904329366	-0.9533098782433003

Compiler

Compiled 19 to 19 computations (0% saved)

bsearch19.0ms (0.3%)

Memory

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

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
16.0ms	0.06934077409203807	0.31713067819238544
2.0ms	3.376177235125605e-267	2.0826027575571635e-264

Samples

11.0ms

96×

valid

Compiler

Compiled 1 349 to 872 computations (35.4% saved)

Precisions

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

ival-sin: 5.0ms (56.7% of total)

ival-pow2: 2.0ms (22.7% of total)

ival-div: 1.0ms (11.3% of total)

ival-mult: 1.0ms (11.3% of total)

ival-sqrt: 1.0ms (11.3% of total)

ival-add: 0.0ms (0% of total)

adjust: 0.0ms (0% of total)

ival-assert: 0.0ms (0% of total)

ival-true: 0.0ms (0% of total)

bsearch1.0ms (0%)

Memory

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

Algorithm

2×	left-value

Steps

Time	Left	Right
0.0ms	0.6841000475409436	0.7247393242317571
0.0ms	-0.7113132653476364	-0.6964843741652932

Compiler

Compiled 19 to 19 computations (0% saved)

bsearch15.0ms (0.2%)

Memory

-34.4MiB live, 12.9MiB allocated; 6ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
12.0ms	0.06934077409203807	0.31713067819238544
2.0ms	3.376177235125605e-267	2.0826027575571635e-264

Samples

9.0ms

48×

valid

Compiler

Compiled 1 373 to 896 computations (34.7% saved)

Precisions

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

ival-sin: 2.0ms (44.8% of total)

ival-pow2: 1.0ms (22.4% of total)

ival-div: 0.0ms (0% of total)

ival-add: 0.0ms (0% of total)

ival-mult: 0.0ms (0% of total)

adjust: 0.0ms (0% of total)

ival-assert: 0.0ms (0% of total)

ival-true: 0.0ms (0% of total)

ival-sqrt: 0.0ms (0% of total)

bsearch28.0ms (0.4%)

Memory

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

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
24.0ms	2.8024111158712468e-11	0.0008506019476004978
1.0ms	3.376177235125605e-267	2.0826027575571635e-264

Samples

17.0ms

144×

valid

Compiler

Compiled 1 294 to 909 computations (29.8% saved)

Precisions

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

ival-sin: 8.0ms (58.7% of total)

ival-pow2: 3.0ms (22% of total)

ival-div: 1.0ms (7.3% of total)

ival-add: 1.0ms (7.3% of total)

ival-mult: 1.0ms (7.3% of total)

ival-sqrt: 1.0ms (7.3% of total)

adjust: 0.0ms (0% of total)

ival-assert: 0.0ms (0% of total)

ival-true: 0.0ms (0% of total)

bsearch26.0ms (0.4%)

Memory

-23.1MiB live, 22.8MiB allocated; 4ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
1.0ms	0.06934077409203807	0.31713067819238544
22.0ms	1.1332452323252468e-168	4.565971039731393e-166

Samples

16.0ms

128×

valid

Compiler

Compiled 1 261 to 874 computations (30.7% saved)

Precisions

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

ival-sin: 8.0ms (61.7% of total)

ival-pow2: 2.0ms (15.4% of total)

ival-div: 1.0ms (7.7% of total)

ival-add: 1.0ms (7.7% of total)

ival-mult: 1.0ms (7.7% of total)

ival-sqrt: 1.0ms (7.7% of total)

adjust: 0.0ms (0% of total)

ival-assert: 0.0ms (0% of total)

ival-true: 0.0ms (0% of total)

bsearch1.0ms (0%)

Memory

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

Algorithm

3×	left-value

Steps

Time	Left	Right
0.0ms	2.8024111158712468e-11	0.0008506018450287273
0.0ms	1.1332452323252468e-168	4.565971039731393e-166
0.0ms	-0.13545466992910865	-0.09904562393426912

Compiler

Compiled 18 to 18 computations (0% saved)

bsearch1.0ms (0%)

Memory

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

Algorithm

2×	left-value

Steps

Time	Left	Right
0.0ms	2.8024111158712468e-11	0.0008506018450287273
0.0ms	1.1332452323252468e-168	4.565971039731393e-166

Compiler

Compiled 18 to 18 computations (0% saved)

bsearch1.0ms (0%)

Memory

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

Algorithm

2×	left-value

Steps

Time	Left	Right
0.0ms	2.8024111158712468e-11	0.0008506018450287273
0.0ms	4.042836498026555e-162	1.36979880148746e-158

Compiler

Compiled 18 to 18 computations (0% saved)

bsearch9.0ms (0.1%)

Memory

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

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
7.0ms	2.8024111158712468e-11	0.0008506019476004978
1.0ms	1.1332452323252468e-168	4.565971039731393e-166

Samples

4.0ms

32×

valid

Compiler

Compiled 1 140 to 842 computations (26.1% saved)

Precisions

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

ival-sin: 2.0ms (62.7% of total)

ival-pow2: 1.0ms (31.3% of total)

ival-div: 0.0ms (0% of total)

ival-add: 0.0ms (0% of total)

ival-mult: 0.0ms (0% of total)

adjust: 0.0ms (0% of total)

ival-assert: 0.0ms (0% of total)

ival-true: 0.0ms (0% of total)

ival-sqrt: 0.0ms (0% of total)

bsearch0.0ms (0%)

Memory

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

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	5.356380741910121e-10	0.08107474740111843

Compiler

Compiled 19 to 19 computations (0% saved)

bsearch0.0ms (0%)

Memory

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

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	5.356380741910121e-10	0.08107474740111843

Compiler

Compiled 19 to 19 computations (0% saved)

bsearch0.0ms (0%)

Memory

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

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	0.08107474740111843	0.1415616170744201

Compiler

Compiled 19 to 19 computations (0% saved)

bsearch0.0ms (0%)

Memory

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

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	9.436583468668601e-41	4.995701813470053e-38

Compiler

Compiled 19 to 19 computations (0% saved)

bsearch0.0ms (0%)

Memory

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

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	2.1576e-320	4.844632791187196e-307

Compiler

Compiled 19 to 19 computations (0% saved)

simplify53.0ms (0.7%)

Memory

-4.6MiB live, 41.3MiB allocated; 4ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	208	2111
1	239	2111
2	315	2111
3	481	2111
4	828	2111
5	3106	2111

Stop Event

1×	node limit

Calls

Call 1

Inputs
(if (<=.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal 2 binary64)) (.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th)) #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx ( (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (/.f64 (sin.f64 th) #s(approx (sin kx) kx))) (sin.f64 ky))))
(if (<=.f64 ky #s(literal 4719536086477339/36304123742133375556593322708737806643829594767075060035541305159080582450205184901005085803128817153071257905034008131114613897596311174506612074733945181293529561534361813328678867427595159591558574115780064384913763396164010744339772923348355910229786257457376560371673958711296 binary64)) #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx ( (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (/.f64 (sin.f64 th) (sin.f64 kx))) #s(approx (sin ky) ky))) (if (<=.f64 ky #s(literal 4019129502659983/365375409332725729550921208179070754913983135744 binary64)) (.f64 (/.f64 #s(approx (sin ky) ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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)))))) (sin.f64 th)) (.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))))
(if (<=.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal -1080863910568919/1125899906842624 binary64)) (.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th)) (if (<=.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal -3602879701896397/18014398509481984 binary64)) (.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(approx (sin th) th)) (if (<=.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal 5404319552844595/18014398509481984 binary64)) (.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 th)) (if (<=.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal 8962163258467287/9007199254740992 binary64)) (/.f64 (.f64 (sin.f64 ky) #s(approx (sin th) th)) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th))))))
(if (<=.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal -1080863910568919/1125899906842624 binary64)) (.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th)) (if (<=.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal -3602879701896397/18014398509481984 binary64)) (.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(approx (sin th) th)) (if (<=.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal 5404319552844595/18014398509481984 binary64)) (.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 th)) (if (<=.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal 8962163258467287/9007199254740992 binary64)) (.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(approx (sin th) th)) #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th))))))
(if (<=.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal -1080863910568919/1125899906842624 binary64)) (.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th)) (if (<=.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal -3602879701896397/18014398509481984 binary64)) (.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(approx (sin th) th)) (if (<=.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal 5404319552844595/18014398509481984 binary64)) (.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 th)) (if (<=.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal 8962163258467287/9007199254740992 binary64)) (.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(approx (sin th) th)) #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th))))))
(if (<=.f64 ky #s(literal 4719536086477339/36304123742133375556593322708737806643829594767075060035541305159080582450205184901005085803128817153071257905034008131114613897596311174506612074733945181293529561534361813328678867427595159591558574115780064384913763396164010744339772923348355910229786257457376560371673958711296 binary64)) #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx ( (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (/.f64 (sin.f64 th) (sin.f64 kx))) #s(approx (sin ky) ky))) (if (<=.f64 ky #s(literal 2206763817411543/9007199254740992 binary64)) (.f64 (/.f64 #s(approx (sin ky) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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)) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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)))))) (sin.f64 th)) (*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))))
(if (<=.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal -3152519739159347/4503599627370496 binary64)) (.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))))) (sin.f64 th)) (if (<=.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal 3152519739159347/4503599627370496 binary64)) (.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 th)) #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th))))
(if (<=.f64 ky #s(literal 4719536086477339/36304123742133375556593322708737806643829594767075060035541305159080582450205184901005085803128817153071257905034008131114613897596311174506612074733945181293529561534361813328678867427595159591558574115780064384913763396164010744339772923348355910229786257457376560371673958711296 binary64)) #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx ( (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (/.f64 (sin.f64 th) (sin.f64 kx))) #s(approx (sin ky) ky))) (if (<=.f64 ky #s(literal 5494391545392005/18014398509481984 binary64)) (.f64 (/.f64 #s(approx (sin ky) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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)) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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)))))) (sin.f64 th)) (.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (sin.f64 th))))
(if (<=.f64 ky #s(literal 4719536086477339/36304123742133375556593322708737806643829594767075060035541305159080582450205184901005085803128817153071257905034008131114613897596311174506612074733945181293529561534361813328678867427595159591558574115780064384913763396164010744339772923348355910229786257457376560371673958711296 binary64)) #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx ( (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (/.f64 (sin.f64 th) (sin.f64 kx))) #s(approx (sin ky) ky))) (if (<=.f64 ky #s(literal 7839866231326559/9223372036854775808 binary64)) (.f64 (/.f64 #s(approx (sin ky) ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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)))))) (sin.f64 th)) (.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))))) (sin.f64 th))))
(if (<=.f64 ky #s(literal 2987651209594315/33196124551047943668099262909529289208099569857939495199965258637525222491303265171197656391576830354305583092890406313459161208603294202463094998672911709496489454427212076189483008 binary64)) (.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (sin.f64 kx))) (sin.f64 th)) (if (<=.f64 ky #s(literal 5494391545392005/18014398509481984 binary64)) (.f64 (/.f64 #s(approx (sin ky) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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)))))) (sin.f64 th)) (.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))))) (sin.f64 th))))
(if (<=.f64 (sin.f64 ky) #s(literal -3602879701896397/36028797018963968 binary64)) (.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(approx (sin th) th)) (if (<=.f64 (sin.f64 ky) #s(literal 4249103942534137/2124551971267068394758352826209874509318372470908127692797776552801614239443408970956650009060917142675557317944986004061386317350610828957638079915066349407775325083341572876126912512 binary64)) (.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sin.f64 kx))) (sin.f64 th)) (if (<=.f64 (sin.f64 ky) #s(literal 7737125245533627/154742504910672534362390528 binary64)) (.f64 (/.f64 #s(approx (sin ky) ky) (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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)))))) (sin.f64 th)) #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th)))))
(if (<=.f64 (sin.f64 ky) #s(literal 4249103942534137/2124551971267068394758352826209874509318372470908127692797776552801614239443408970956650009060917142675557317944986004061386317350610828957638079915066349407775325083341572876126912512 binary64)) (.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sin.f64 kx))) (sin.f64 th)) (if (<=.f64 (sin.f64 ky) #s(literal 7737125245533627/154742504910672534362390528 binary64)) (.f64 (/.f64 #s(approx (sin ky) ky) (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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)))))) (sin.f64 th)) #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th))))
(if (<=.f64 (sin.f64 ky) #s(literal 5065326622169181/1013065324433836171511818326096474890383898005918563696288002277756507034036354527929615978746851512277392062160962106733983191180520452956027069051297354415786421338721071661056 binary64)) #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx ( (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (/.f64 (sin.f64 th) (sin.f64 kx))) (sin.f64 ky))) (if (<=.f64 (sin.f64 ky) #s(literal 7737125245533627/154742504910672534362390528 binary64)) (.f64 (/.f64 #s(approx (sin ky) ky) (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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)))))) (sin.f64 th)) #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th))))
(if (<=.f64 ky #s(literal 2987651209594315/33196124551047943668099262909529289208099569857939495199965258637525222491303265171197656391576830354305583092890406313459161208603294202463094998672911709496489454427212076189483008 binary64)) (.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (sin.f64 kx))) (sin.f64 th)) (if (<=.f64 ky #s(literal 48999163945791/72057594037927936 binary64)) (.f64 (/.f64 #s(approx (sin ky) ky) (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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)))))) (sin.f64 th)) #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th))))
(if (<=.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal 4835703278458517/4835703278458516698824704 binary64)) #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx ( (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (/.f64 (sin.f64 th) (sin.f64 kx))) #s(approx (sin ky) ky))) #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th)))
(if (<=.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal 4835703278458517/4835703278458516698824704 binary64)) #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx ( (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (/.f64 (sin.f64 th) #s(approx (sin kx) kx))) (sin.f64 ky))) #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th)))
(if (<=.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal 3602879701896397/36028797018963968 binary64)) #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx ( (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (/.f64 #s(approx (sin th) th) (sin.f64 kx))) (sin.f64 ky))) #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th)))
(if (<=.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal 1225996432692711/12259964326927110866866776217202473468949912977468817408 binary64)) #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (.f64 #s(approx (+ ( (* th th) -1/6) 1) (.f64 (.f64 th th) #s(literal -1/6 binary64))) th))) #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th)))
(if (<=.f64 (.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)) #s(literal 253/6325070415853456823515479584966165845298645305129441198653167438357198111499854590373761990669910140474596183259900372230931523043306046152094168748148078435047419508642698792639590866940413010663742739952273283392562733857021646831815729864036236135650314266011211548510419206725953204130822734645187695728365866909171712 binary64)) #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (.f64 #s(approx (+ ( (* th th) -1/6) 1) (.f64 (.f64 th th) #s(literal -1/6 binary64))) th))) #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) th))

Outputs
(if (<=.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal 2 binary64)) (.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th)) #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx ( (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (/.f64 (sin.f64 th) #s(approx (sin kx) kx))) (sin.f64 ky))))
(if (<=.f64 ky #s(literal 4719536086477339/36304123742133375556593322708737806643829594767075060035541305159080582450205184901005085803128817153071257905034008131114613897596311174506612074733945181293529561534361813328678867427595159591558574115780064384913763396164010744339772923348355910229786257457376560371673958711296 binary64)) #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx ( (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (/.f64 (sin.f64 th) (sin.f64 kx))) #s(approx (sin ky) ky))) (if (<=.f64 ky #s(literal 4019129502659983/365375409332725729550921208179070754913983135744 binary64)) (.f64 (/.f64 #s(approx (sin ky) ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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)))))) (sin.f64 th)) (.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))))
(if (<=.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal -1080863910568919/1125899906842624 binary64)) (.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th)) (if (<=.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal -3602879701896397/18014398509481984 binary64)) (.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(approx (sin th) th)) (if (<=.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal 5404319552844595/18014398509481984 binary64)) (.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 th)) (if (<=.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal 8962163258467287/9007199254740992 binary64)) (/.f64 (.f64 (sin.f64 ky) #s(approx (sin th) th)) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th))))))
(if (<=.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal -1080863910568919/1125899906842624 binary64)) (.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th)) (if (<=.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal -3602879701896397/18014398509481984 binary64)) (.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(approx (sin th) th)) (if (<=.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal 5404319552844595/18014398509481984 binary64)) (.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 th)) (if (<=.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal 8962163258467287/9007199254740992 binary64)) (.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(approx (sin th) th)) #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th))))))
(if (<=.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal -1080863910568919/1125899906842624 binary64)) (.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th)) (if (<=.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal -3602879701896397/18014398509481984 binary64)) (.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(approx (sin th) th)) (if (<=.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal 5404319552844595/18014398509481984 binary64)) (.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 th)) (if (<=.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal 8962163258467287/9007199254740992 binary64)) (.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(approx (sin th) th)) #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th))))))
(if (<=.f64 ky #s(literal 4719536086477339/36304123742133375556593322708737806643829594767075060035541305159080582450205184901005085803128817153071257905034008131114613897596311174506612074733945181293529561534361813328678867427595159591558574115780064384913763396164010744339772923348355910229786257457376560371673958711296 binary64)) #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx ( (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (/.f64 (sin.f64 th) (sin.f64 kx))) #s(approx (sin ky) ky))) (if (<=.f64 ky #s(literal 2206763817411543/9007199254740992 binary64)) (.f64 (/.f64 #s(approx (sin ky) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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)) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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)))))) (sin.f64 th)) (*.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (sin.f64 th))))
(if (<=.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal -3152519739159347/4503599627370496 binary64)) (.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))))) (sin.f64 th)) (if (<=.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal 3152519739159347/4503599627370496 binary64)) (.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))) (sin.f64 th)) #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th))))
(if (<=.f64 ky #s(literal 4719536086477339/36304123742133375556593322708737806643829594767075060035541305159080582450205184901005085803128817153071257905034008131114613897596311174506612074733945181293529561534361813328678867427595159591558574115780064384913763396164010744339772923348355910229786257457376560371673958711296 binary64)) #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx ( (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (/.f64 (sin.f64 th) (sin.f64 kx))) #s(approx (sin ky) ky))) (if (<=.f64 ky #s(literal 5494391545392005/18014398509481984 binary64)) (.f64 (/.f64 #s(approx (sin ky) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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)) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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)))))) (sin.f64 th)) (.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (sin.f64 th))))
(if (<=.f64 ky #s(literal 4719536086477339/36304123742133375556593322708737806643829594767075060035541305159080582450205184901005085803128817153071257905034008131114613897596311174506612074733945181293529561534361813328678867427595159591558574115780064384913763396164010744339772923348355910229786257457376560371673958711296 binary64)) #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx ( (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (/.f64 (sin.f64 th) (sin.f64 kx))) #s(approx (sin ky) ky))) (if (<=.f64 ky #s(literal 7839866231326559/9223372036854775808 binary64)) (.f64 (/.f64 #s(approx (sin ky) ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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)))))) (sin.f64 th)) (.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))))) (sin.f64 th))))
(if (<=.f64 ky #s(literal 2987651209594315/33196124551047943668099262909529289208099569857939495199965258637525222491303265171197656391576830354305583092890406313459161208603294202463094998672911709496489454427212076189483008 binary64)) (.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (sin.f64 kx))) (sin.f64 th)) (if (<=.f64 ky #s(literal 5494391545392005/18014398509481984 binary64)) (.f64 (/.f64 #s(approx (sin ky) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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)))))) (sin.f64 th)) (.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))))) (sin.f64 th))))
(if (<=.f64 (sin.f64 ky) #s(literal -3602879701896397/36028797018963968 binary64)) (.f64 (/.f64 (sin.f64 ky) (sqrt.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(approx (sin th) th)) (if (<=.f64 (sin.f64 ky) #s(literal 4249103942534137/2124551971267068394758352826209874509318372470908127692797776552801614239443408970956650009060917142675557317944986004061386317350610828957638079915066349407775325083341572876126912512 binary64)) (.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sin.f64 kx))) (sin.f64 th)) (if (<=.f64 (sin.f64 ky) #s(literal 7737125245533627/154742504910672534362390528 binary64)) (.f64 (/.f64 #s(approx (sin ky) ky) (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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)))))) (sin.f64 th)) #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th)))))
(if (<=.f64 (sin.f64 ky) #s(literal 4249103942534137/2124551971267068394758352826209874509318372470908127692797776552801614239443408970956650009060917142675557317944986004061386317350610828957638079915066349407775325083341572876126912512 binary64)) (.f64 (/.f64 (sin.f64 ky) #s(approx (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))) (sin.f64 kx))) (sin.f64 th)) (if (<=.f64 (sin.f64 ky) #s(literal 7737125245533627/154742504910672534362390528 binary64)) (.f64 (/.f64 #s(approx (sin ky) ky) (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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)))))) (sin.f64 th)) #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th))))
(if (<=.f64 (sin.f64 ky) #s(literal 5065326622169181/1013065324433836171511818326096474890383898005918563696288002277756507034036354527929615978746851512277392062160962106733983191180520452956027069051297354415786421338721071661056 binary64)) #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx ( (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (/.f64 (sin.f64 th) (sin.f64 kx))) (sin.f64 ky))) (if (<=.f64 (sin.f64 ky) #s(literal 7737125245533627/154742504910672534362390528 binary64)) (.f64 (/.f64 #s(approx (sin ky) ky) (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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)))))) (sin.f64 th)) #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th))))
(if (<=.f64 ky #s(literal 2987651209594315/33196124551047943668099262909529289208099569857939495199965258637525222491303265171197656391576830354305583092890406313459161208603294202463094998672911709496489454427212076189483008 binary64)) (.f64 #s(approx (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 ky (sin.f64 kx))) (sin.f64 th)) (if (<=.f64 ky #s(literal 48999163945791/72057594037927936 binary64)) (.f64 (/.f64 #s(approx (sin ky) ky) (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) #s(approx (pow (sin ky) 2) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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)))))) (sin.f64 th)) #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th))))
(if (<=.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal 4835703278458517/4835703278458516698824704 binary64)) #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx ( (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (/.f64 (sin.f64 th) (sin.f64 kx))) #s(approx (sin ky) ky))) #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th)))
(if (<=.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal 4835703278458517/4835703278458516698824704 binary64)) #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx ( (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (/.f64 (sin.f64 th) #s(approx (sin kx) kx))) (sin.f64 ky))) #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th)))
(if (<=.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal 3602879701896397/36028797018963968 binary64)) #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (.f64 #s(approx ( (pow (+ (pow (sin ky) 2) (pow (sin kx) 2)) -1/2) (sin th)) (/.f64 #s(approx (sin th) th) (sin.f64 kx))) (sin.f64 ky))) #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th)))
(if (<=.f64 (/.f64 (sin.f64 ky) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal 1225996432692711/12259964326927110866866776217202473468949912977468817408 binary64)) #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (.f64 #s(approx (+ ( (* th th) -1/6) 1) (.f64 (.f64 th th) #s(literal -1/6 binary64))) th))) #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) (sin.f64 th)))
(if (<=.f64 (.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)) #s(literal 253/6325070415853456823515479584966165845298645305129441198653167438357198111499854590373761990669910140474596183259900372230931523043306046152094168748148078435047419508642698792639590866940413010663742739952273283392562733857021646831815729864036236135650314266011211548510419206725953204130822734645187695728365866909171712 binary64)) #s(approx ( (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) (.f64 #s(approx (+ ( (* th th) -1/6) 1) (.f64 (.f64 th th) #s(literal -1/6 binary64))) th))) #s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) th)))
#s(approx (* (/ (sin ky) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sin th)) #s(approx (sin th) th))

derivations492.0ms (6.7%)

Memory

4.0MiB live, 370.6MiB allocated; 33ms collecting garbage

Stop Event

1×

fuel

Compiler

Compiled 2 111 to 211 computations (90% saved)

preprocess187.0ms (2.6%)

Memory: 30.5MiB live, 213.2MiB allocated; 52ms collecting garbage
Remove: (negabs th)
Compiler: Compiled 4 994 to 788 computations (84.2% saved)

end0.0ms (0%)

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

start0.0ms (0%)

analyze219.0ms (3%)

sample2.0s (27.3%)

explain286.0ms (3.9%)

preprocess182.0ms (2.5%)

eval0.0ms (0%)

prune1.0ms (0%)

series36.0ms (0.5%)

rewrite213.0ms (2.9%)

eval20.0ms (0.3%)

prune51.0ms (0.7%)

series39.0ms (0.5%)

rewrite256.0ms (3.5%)

eval73.0ms (1%)

prune44.0ms (0.6%)

series42.0ms (0.6%)

rewrite214.0ms (2.9%)

eval58.0ms (0.8%)

prune65.0ms (0.9%)

series269.0ms (3.7%)

rewrite213.0ms (2.9%)

eval71.0ms (1%)

prune80.0ms (1.1%)

regimes916.0ms (12.5%)

regimes377.0ms (5.1%)

regimes207.0ms (2.8%)

regimes22.0ms (0.3%)

regimes22.0ms (0.3%)

regimes32.0ms (0.4%)

regimes31.0ms (0.4%)

regimes29.0ms (0.4%)

regimes17.0ms (0.2%)

regimes65.0ms (0.9%)

regimes61.0ms (0.8%)

regimes10.0ms (0.1%)

regimes9.0ms (0.1%)

regimes24.0ms (0.3%)

regimes28.0ms (0.4%)

regimes25.0ms (0.3%)

regimes76.0ms (1%)

regimes25.0ms (0.3%)

regimes19.0ms (0.3%)

regimes11.0ms (0.2%)

bsearch1.0ms (0%)

bsearch42.0ms (0.6%)

bsearch1.0ms (0%)

bsearch1.0ms (0%)

bsearch1.0ms (0%)

bsearch19.0ms (0.3%)

bsearch1.0ms (0%)

bsearch15.0ms (0.2%)

bsearch28.0ms (0.4%)

bsearch26.0ms (0.4%)

bsearch1.0ms (0%)

bsearch1.0ms (0%)

bsearch1.0ms (0%)

bsearch9.0ms (0.1%)

bsearch0.0ms (0%)

bsearch0.0ms (0%)

bsearch0.0ms (0%)

bsearch0.0ms (0%)

bsearch0.0ms (0%)

simplify53.0ms (0.7%)

derivations492.0ms (6.7%)

preprocess187.0ms (2.6%)

end0.0ms (0%)

Profiling